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