Привет.Подскажите пожалуйста.Есть Процедура,которая создает на основании одного документа документ Требование-Накладная,необходимо после записи его открыть...
Такая запись ОткрытьФорму("Документ.ТребованиеНакладная"); открывает форму нового документа,а мне нужно открыть именно мой только что созданный документ.
Заранее спасибо.
Процедура Сформировать()
Док = СоздатьОбъект("Документ.ТребованиеНакладная");
Док.Новый();
Док.ДатаДок = ДокПост.ДатаДок;
Док.МестоХранения = ДокПост.МестоХранения;
Справочник = СоздатьОбъект("Справочник.СтатьиИздержекОбращения");
Док.Субконто2 = Справочник.НайтиПоКоду(44395);
Док.Комментарий = "Введен на основании Поступления материалов " + Док.НомерДок;
//Для каждого строка из Док.
ДокПост.ВыбратьСтроки();
Пока ДокПост.ПолучитьСтроку() =1 Цикл
Док.НоваяСтрока();
Док.Материал = ДокПост.Материал;
Док.КоличествоЗатребовано = ДокПост.Количество;
Док.КоличествоОтпущено = ДокПост.Количество;
Док.Сумма = ДокПост.сумма;
КонецЦикла;
Док.Записать();
ОткрытьФорму("Документ.ТребованиеНакладная");
КонецПроцедуры
Такая запись ОткрытьФорму("Документ.ТребованиеНакладная"); открывает форму нового документа,а мне нужно открыть именно мой только что созданный документ.
Заранее спасибо.
Процедура Сформировать()
Док = СоздатьОбъект("Документ.ТребованиеНакладная");
Док.Новый();
Док.ДатаДок = ДокПост.ДатаДок;
Док.МестоХранения = ДокПост.МестоХранения;
Справочник = СоздатьОбъект("Справочник.СтатьиИздержекОбращения");
Док.Субконто2 = Справочник.НайтиПоКоду(44395);
Док.Комментарий = "Введен на основании Поступления материалов " + Док.НомерДок;
//Для каждого строка из Док.
ДокПост.ВыбратьСтроки();
Пока ДокПост.ПолучитьСтроку() =1 Цикл
Док.НоваяСтрока();
Док.Материал = ДокПост.Материал;
Док.КоличествоЗатребовано = ДокПост.Количество;
Док.КоличествоОтпущено = ДокПост.Количество;
Док.Сумма = ДокПост.сумма;
КонецЦикла;
Док.Записать();
ОткрытьФорму("Документ.ТребованиеНакладная");
КонецПроцедуры
По теме из базы знаний
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот