Показать содержимое по тегу: 1с

После создания и публикации web-сервиса 1С хочется протестировать его работу.

Можно это сделать из другой конфигурации 1С, но иногда надо показать разработчикам на других языках работу сервиса.
Для этого есть несколько инструментов: SoapUI, Postman или мой любимый бесплатный и функциональный Insomnia

По нему к сожалению нет инструкций, поэтому решил написать.

Итак, Вы опубликовали web-сервис из 1С.

Теперь если перейти по адресу сервера в браузере (типа http://localhost/mybase/ws/MyWebService.1cws?wsdl ), и введя имя пользователя и пароль, получите ответ в виде XML-файла со схемой сервиса.

Для того чтобы протестировать функции сервиса через Insomnia, нужно:

1. Cоздать новый HTTP Запрос
2. Установить метод запроса "POST"

3. Ввести в строке адреса запроса, Ваш адрес по которому вы получали XML-файл схемы сервиса без "?wsdl" http://localhost/mybase/ws/MyWebService.1cws
3. Установить тип авторизации "Basic", ввести логин и пароль пользователя 1С имеющего доступ к функци web-сервиса

4. На вкладке headers установить Content-Type = text/xml

5. Тип тела запроса установить XML

В тело запроса ввести следующий код:

<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
<soap:Header/>
<soap:Body>
<MyFunction xmlns="http://mysite/">
</MyFunction>
</soap:Body>
</soap:Envelope>

Важные моменты:
MyFunction - замените на имя вашей функции
http://mysite/ - замените на URI пространства имен, установленный в Вашей конфигурации

Готово. Нажимайте "Send" и получайте результат выполнения функции.

db = Новый COMобъект("V83.COMConnector");
Попытка 
	соединение= db.Connect(СтрокаПодключения);
Исключение
	сообщить("база не открыта");
	Предупреждение(ОписаниеОшибки());
	Возврат ложь;
КонецПопытки;


НоваяНоменклатура=Справочники.Номенклатура.НайтиПоКоду("ВашКод");

GUID = НоваяНоменклатура.УникальныйИдентификатор();
GUIDCom  = соединение.NewObject("УникальныйИдентификатор", Строка(GUID)); 
НоменклатураСсылкаCom = ТекПодключение.Справочники.Номенклатура.ПолучитьСсылку(GUIDCom);

НовКартинкаОбъект = Соединение.Справочники.ХранилищеДополнительнойИнформации.СоздатьЭлемент();

НовКартинкаОбъект.Объект = НоменклатураСсылкаCom;
НовКартинкаОбъект.Наименование = НоваяНоменклатура.ОсновноеИзображение.Наименование;
НовКартинкаОбъект.ВидДанных = Соединение.Перечисления.ВидыДополнительнойИнформацииОбъектов.Изображение;
НовКартинкаОбъект.ИмяФайла = НоваяНоменклатура.ОсновноеИзображение.ИмяФайла;
	  
Картинка=НоваяНоменклатура.ОсновноеИзображение.Хранилище.Получить();
Двоичные        = Картинка.ПолучитьДвоичныеДанные();
ДвоичныеСтрокой    = Base64Строка(Двоичные);
ДвоичныеCOM        = Соединение.Base64Значение(ДвоичныеСтрокой);
МояКартинкаCOM  = Соединение.NewObject("Картинка",ДвоичныеCOM);
НовКартинкаОбъект.Хранилище = Соединение.NewObject("ХранилищеЗначения",МояКартинкаCOM);
		   
НовКартинкаОбъект.Записать();

Старенький слабенький компьютер после перепроведения центральной базы не смог принять файл обмена с сообщением "не недостаточно памяти". После него программа вылетала.

Помогло ограничение на количество объектов в транзакции (я поставил 100)

Потребовалось настроить выгрузку из 1С:УНФ в 1С:Бухгалтерия 3.0

Базовая настройка простая и не вызывает сложностей, подробно про нее можно почитать, например, здесь.

Но далее возникли проблемы:

1) Запуск регламентного задания обмена на файловой базе.

Регламентные задачи на SQL-базах работают на стороне SQL-сервера и не вызывают проблем, на файловых базах они, конечно, тоже, теоретически, должны работать, если запущен хотя бы один сеанс, но по факту то работали то нет.

В связи с этим, было решено вызывать обмен вручную с помощью внешней обработки и планировщика задач.

Вручную из обработки обмен можно вызвать командой:

ОбменДаннымиСервер.ВыполнитьОбменДаннымиПоРегламентномуЗаданию("00001"); //где 00001 год регламентного задания в справочнике "Сценарии синхронизации данных"

2) Исключить документы из обмена.

Поскольку в УНФ приходы от клиентов на расчетный счет и оплаты поставщикам ведутся вручную, а в бухгалтерии используется обработка "обмен с клиент-банком", то нужно было исключить выгрузку эти операций введенных вручную в бухгалтерскую программу.
Список документов в обмене определен правилами обмена и настройками не меняется, нужно было бы исправлять сами правила обмена и исключать документы. Но есть более простой способ. Тем более, поскольку мы вызываем обмен обработкой, в той же обработке перед вызовом обмена, отменяем регистрацию изменений по нужным нам типам документов, в частности ПоступлениеНаСчет и РасходСоСчета.

//отменяем отправку поступлений на счет
Док = Метаданные.Документы.ПоступлениеНаСчет;
Узел = ПланыОбмена.СинхронизацияДанныхЧерезУниверсальныйФормат.НайтиПоНаименованию("МойОбмен");
ПланыОбмена.УдалитьРегистрациюИзменений(Узел,Док);
//отменяем отправку расходов со счета
Док = Метаданные.Документы.РасходСоСчета;
Узел = ПланыОбмена.СинхронизацияДанныхЧерезУниверсальныйФормат.НайтиПоНаименованию("МойОбмен");
ПланыОбмена.УдалитьРегистрациюИзменений(Узел,Док);

Ниже приложена рабочая обработка, можете скачать и использовать.