Advertisement
Guest User

KA 1.1

a guest
Aug 23rd, 2018
140
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.94 KB | None | 0 0
  1. Процедура ЗаполнитьДокументНаОснованииТТН_ЕГАИС(ДокументОснование)
  2.  
  3. УстановитьПривилегированныйРежим(Истина);
  4. Запрос = Новый Запрос;
  5. Запрос.УстановитьПараметр("ДокументОснование", ДокументОснование);
  6. Запрос.Текст =
  7. "ВЫБРАТЬ
  8. | ТоварноТранспортнаяНакладнаяЕГАИС.НомерТТН КАК НомерВходящегоДокумента,
  9. | ТоварноТранспортнаяНакладнаяЕГАИС.ДатаТТН КАК ДатаВходящегоДокумента,
  10. и далее запрос...
  11.  
  12. ПакетЗапросов = Запрос.ВыполнитьПакет();
  13.  
  14. // ЭтотОбъект - это существующий док ПоступлениеТоваровУслуг
  15.  
  16. // поле Склад на форме документа корректно заполняется
  17. ЭтотОбъект.СкладОрдер = Справочники.Склады.НайтиПоНаименованию("Торговый зал (Универсам )");
  18.  
  19. // поле Контрагент не заполняется на форме документа, хотя отладчик показывает, что Контрагент найден
  20. // !!! Вот тут проблема
  21. ЭтотОбъект.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию("ИВАНОВ");
  22.  
  23. // поле ДоговорКонтрагента корректно заполняется
  24. ЭтотОбъект.ДоговорКонтрагента = Справочники.ДоговорыКонтрагентов.НайтиПоНаименованию("Основной", Истина, ,Справочники.Контрагенты.НайтиПоНаименованию("ИВАНОВ"));
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement