1С и ВЕБ + прием платежей на opencart Данные есть н ЯндексДиск

сохранение  и поиск элемента справочника

https://helpf.pro/faq/view/298.html

Элемент = Справочники.Номенклатура.НайтиПоНаименованию("Товар").ПолучитьОбъект();
Элемент.Наименование = "Новое наименование";
Элемент.Записать();

 &НаКлиенте
Процедура ПоКнопкеНовыйКонтрагент(Команда)
       // Вставить содержимое обработчика.
        Перем НовыйКонтрагент;

        НовыйКонтрагент = Новый Структура("Наименование, ПолноеНаименование, ИНН");
        НовыйКонтрагент.Наименование = "РиК ООО";
        НовыйКонтрагент.ПолноеНаименование = "ООО Рога и копыта"; 
        НовыйКонтрагент.ИНН =  "123456789012";

 
        Если СоздатьНовогоКонтрагента(НовыйКонтрагент) = 0 Тогда
                Сообщить("Не удалось создать нового контрагента");
        КонецЕсли;

КонецПроцедуры
 

&НаСервере
Функция СоздатьНовогоКонтрагента(СтруктураСправочника)

        Перем НовыйКонтрагент,СпрПользователи;

        СпрКонтрагенты = Справочники.Контрагенты;
        НовыйКонтрагент = СпрКонтрагенты.СоздатьЭлемент();
        НовыйКонтрагент.Наименование = СтруктураСправочника.Наименование;
        НовыйКонтрагент.ПолноеНаименование = СтруктураСправочника.ПолноеНаименование; 
        НовыйКонтрагент.ИНН = СтруктураСправочника.ИНН;
        Попытка
                НовыйКонтрагент.Записать();
                Возврат 1;
        Исключение
                Возврат 0;
        КонецПопытки;

КонецФункции    

---

Код 1C v 8.х

 //Пример 1
НовыйЭлемент = Справочники.Контрагенты.СоздатьЭлемент(); 
НовыйЭлемент.Наименование = "ООО Березка"; 
// Установить другие реквизиты.  
НовыйЭлемент.Записать(); 

НовыйЭлемент = Справочники.Банки.СоздатьЭлемент(); 
// Получить ссылку на группу, в которой будет находиться новый элемент. 
Родитель = Справочники.Банки.НайтиПоКоду("000000001"); 
НовыйЭлемент.Наименование = "ВТБ"; 
НовыйЭлемент.Код = "000000011"; 
НовыйЭлемент.Родитель = Родитель; 

// Установить другие реквизиты.  
НовыйЭлемент.Записать(); 

//Пример 2
СпрСотр = Справочники.Сотрудники;
//или так:
//СпрСотр = Справочники["Сотрудники"]
НовЭл = СпрСотр.СоздатьЭлемент();
НовЭл.Наименование = "Иванов Иван Иванович";
НовЭл.Оклад = 100;
НовЭл.Записать();

Внешняя обработка 1С которая подключается по ftp к хостингу и передает в файл наменклатуру по запросу SQL

Также запрашивает GET параметром HTML страницу, и читает ее содежание на экран.

 ****s://**di.sk/d/TUb37it9M57dRw

**************** Магазин в битрикс 24

&НаСервере
Функция ПодключитьсяКFTPСерверу()
Соединение = Новый FTPСоединение(
"ftp.io******232009.****i232.cp.regruhosting.ru", // адрес ftp сервера
21, // порт
"z7*3@****3.ru", // логин
"H*****44", // пароль

Неопределено, // прокси не используется
Истина, // пассивный режим работы
0, // таймаут (0 - без ограничений)
Неопределено // незащищенное соединение
);
Возврат Соединение;
КонецФункции
&НаСервере
Процедура ЗаписатьФайлНаСервере()
Соединение = ПодключитьсяКFTPСерверу();
Соединение.УстановитьТекущийКаталог("/public_html/");
ТекстовыйДок = Новый ТекстовыйДокумент;
Запрос = Новый Запрос;
Запрос.Текст =                                "ВЫБРАТЬ
| ЦеныНоменклатурыСрезПоследних.Номенклатура.Артикул КАК Артикул,
| ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Номенклатура,
| ЦеныНоменклатурыСрезПоследних.Цена КАК Цена
|ИЗ
| РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК ЦеныНоменклатурыСрезПоследних";
Запрос.УстановитьПараметр("ВидЦены", Справочники.ВидыЦен.НайтиПоНаименованию("Мин цена продажи"));
РезультатЗапроса = Запрос.Выполнить();
Выборка = РезультатЗапроса.Выбрать();
//Текст файла начало
ТекстовыйДок.ДобавитьСтроку("<h3 align = ""center"">Прайс</h3>");
ТекстовыйДок.ДобавитьСтроку("<table border = ""1"" align = ""center""><tbody>");
ТекстовыйДок.ДобавитьСтроку("<tr><td><b>Артикул111</b></td><td><b>Товар</b></td><td><b>Цена</b></td></tr>");
Пока Выборка.Следующий() Цикл
ТекстовыйДок.ДобавитьСтроку("<tr><td>" + Выборка.Артикул + "</td><td>" + Выборка.Номенклатура + "</td><td>" + Выборка.Цена + "</td></tr>");
КонецЦикла;
ТекстовыйДок.ДобавитьСтроку("</tbody></table>");
//Текст файла конец
ВременныйФайл = ПолучитьИмяВременногоФайла("html");
ТекстовыйДок.Записать(ВременныйФайл);
Соединение.Записать(ВременныйФайл,"testprice.html");
//GET компонент начало
Сервер = "avia3.ru";
Соединение = Новый HTTPСоединение(Сервер);
Заголовки = Новый Соответствие;
Заголовки.Вставить("host", Сервер);   
Запрос = Новый HTTPЗапрос("/sitemap.html", Заголовки);
Ответ =Соединение.Получить(Запрос);
Если Ответ.КодСостояния = 200 Тогда // Данные получены, обрабатываем их
ТекстСтраницы= Ответ.ПолучитьТелоКакСтроку();
//Выведем тест полученной страницы
Сообщить(ТекстСтраницы);
КонецЕсли; 
//GET компонент конец
КонецПроцедуры
&НаКлиенте
Процедура ЗаписатьФайл(Команда)
ЗаписатьФайлНаСервере();
КонецПроцедуры