1с, создание нового документа при проведении текущего
Доброго времени суток, задача стояла при проведении одного документа1, создавался другой документ2 и проводился, это я сделал, но если документ1 перепровести то создается новый документ2, а не перепроводится старый, помогите как сделать чтобы при перепроведении ссылался на созданный документ, и так же при пометки на удалении чтоб документ2 тоже помечался на удалении. Речь идет о перемещении товаров(документ1) и комплектация номенклатуры(документ2), у документа 2 создал реквизит с ссылкой на документ1 и поместил на форму. Сразу поясню, в рамках учебной задачи(начинающий программист), спасибо заранее.
УТ 10.3 (10.3.46.2)
1С:Предприятие 8.3 (8.3.10.2466)
УТ 10.3 (10.3.46.2)
1С:Предприятие 8.3 (8.3.10.2466)
Процедура ОбработкаПроведения(Отказ, РежимПроведения)
Если ЭтотОбъект.СкладПолучатель.СкладБрака = Истина Тогда
лДок = Документы.КомплектацияНоменклатуры.СоздатьДокумент();
// заполнение документа 2
//перемещение табличных частей из 1 во 2 документ
ТЗТовары = Этотобъект.Товары.Выгрузить();
лДок.Комплектующие.Загрузить(ТЗТовары);
//заполняется номенклатура комплекта
Запрос = новый запрос;
Запрос.Текст = "ВЫБРАТЬ
| ПеремещениеТоваровТовары.Номенклатура
|ИЗ
| Документ.ПеремещениеТоваров.Товары КАК ПеремещениеТоваровТовары
|ГДЕ
| ПеремещениеТоваровТовары.Ссылка.Ссылка = &Ссылка";
Запрос.УстановитьПараметр("Ссылка", ЭтотОбъект.Ссылка);
ВыборкаНоменклатурыБрака = Запрос.Выполнить().Выгрузить()[0][0];
Если ЗначениеЗаполнено(ВыборкаНоменклатурыБрака.НоменклатураБрака) Тогда
лДок.Номенклатура = ВыборкаНоменклатурыБрака.НоменклатураБрака;
КонецЕсли;
Если лДок.Номенклатура <> лДок.ЕдиницаИзмерения.Владелец Тогда
лДок.ЕдиницаИзмерения = лДок.Номенклатура.ЕдиницаХраненияОстатков;
лДок.Коэффициент = лДок.ЕдиницаИзмерения.Коэффициент;
КонецЕсли;
лДок.Записать(РежимЗаписиДокумента.Проведение);
КонецЕсли;
КонецПроцедуры // ОбработкаПроведения()
ПоказатьПо теме из базы знаний
- Обнуление цен номенклатуры (Создание нового документа "Установка цен номенклатуры" с нулевыми ценами)
- Разработка и сценарное тестирование с Vanessa-ADD. Концепция, теория и сквозной пример создания сценария
- Нагрузочное тестирование в 1С:ERP
- Обмен 1С с Честным Знаком для УТ11, УНФ, КА2, ERP, Розница: Расширение для работы с СУЗ, ГИС МТ, ЦРПТ
- Как рассчитать индексацию заработной платы в конфигурации 1С:Зарплата и управление персоналом
Найденные решения
(3)
Ну и документОснование (или как у тебя реквизит называется) не забываем заполнять при заполнении
запрос = Новый Запрос("
ВЫБРАТЬ ссылка ИЗ Документ.КомплектацияНоменклатуры
ГДЕ ДокументОснование = &док
");
ЗАпрос.УстановитьПараметр("док", Ссылка);
рез = Запрос.Выполнить();
Если рез.пустой() Тогда
///тут делаем новый документ
Иначе
//тут думаем, что нам делать с уже найденным документом.
КОнецЕсли;
ПоказатьНу и документОснование (или как у тебя реквизит называется) не забываем заполнять при заполнении
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(3)
Ну и документОснование (или как у тебя реквизит называется) не забываем заполнять при заполнении
запрос = Новый Запрос("
ВЫБРАТЬ ссылка ИЗ Документ.КомплектацияНоменклатуры
ГДЕ ДокументОснование = &док
");
ЗАпрос.УстановитьПараметр("док", Ссылка);
рез = Запрос.Выполнить();
Если рез.пустой() Тогда
///тут делаем новый документ
Иначе
//тут думаем, что нам делать с уже найденным документом.
КОнецЕсли;
ПоказатьНу и документОснование (или как у тебя реквизит называется) не забываем заполнять при заполнении
(6) написал подходящий код, но как передать переменную лДок с ОбработкеПроведения в процедуру ПередЗаписью, лДок это документ "комплектация номенклатуры", в самом начале модуля написал Перем лДок; но не помогло, "перемещение" это реквизит на форме документа2 ссылающийся на документ1 основания.
Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)
Если РежимЗаписи = РежимЗаписиДокумента.ОтменаПроведения Тогда
лДок = лДок.Перемещение(ЭтотОбъект.Ссылка, "КомплектацияНоменклатуры");
ОбъектКомплектация = лДок.ПолучитьОбъект();
ОбъектКомплектация.Записать(РежимЗаписиДокумента.ОтменаПроведения);
КонецЕсли;
КонецПроцедуры // ПередЗаписью
Еще есть у кого-нибудь предложения? надо сделать чтобы при распроведение документа 1 второй автоматом распроводился, так же при пометки на удаление и при изменении в документе1(количества или добавилась номенклатура), во втором синхронизировалась
(8) Вообще, это плохая реализация. Неявное проведение делать внутри проведения другого объекта - зло. Если будет ошибка проведения второго документа - считай, проблема во вложенной транзакции, вместо ошибки у вас скорее всего будет что-то типа "В данной транзакции уже происходили ошибки". Я бы сделал как-нибудь по другому. Например, узел, или регистр, куда бы регистрировались все документы первого типа при записи, а потом по выборке с узла/регистра регламентное задание бы их получало и по ним уже создавало/синхронизировало документы второго типа.
Если прямо принципиально важно именно так сделать - про пометку удаления вам написали, с проведением примерно то же самое - в обработке проведения анализируйте РежимЗаписи и в зависимости от значения (Запись/Проведение/ОтменаПроведения) пишите алгоритмы какие нужно. Изменение номенклатуры и количества проще всего ловить запросом, если изменилось - я бы получал объект, очищал ТЧ и перезаполнял заново.
Если прямо принципиально важно именно так сделать - про пометку удаления вам написали, с проведением примерно то же самое - в обработке проведения анализируйте РежимЗаписи и в зависимости от значения (Запись/Проведение/ОтменаПроведения) пишите алгоритмы какие нужно. Изменение номенклатуры и количества проще всего ловить запросом, если изменилось - я бы получал объект, очищал ТЧ и перезаполнял заново.
в принципе да зло
то ссылки еще не существует, то проведение откатилось то еще чего
путем долгих мытарств на эту тему выработался такой алгоритм
создавать документ в событии ПослеЗаписи основного документа, в нем же можем проверить провелся ли он и например не создавать/отменить подчиненный
если возникла проблема с подчиненным можем так же отменить основной
+ у меня стояла задача показать подчиненный пользователю т.к. он мог не проводится по своим причинам
во всех остальных событиях пререзаписью, призаписи возникают какие нибудь неразрешимые ситуации
то ссылки еще не существует, то проведение откатилось то еще чего
путем долгих мытарств на эту тему выработался такой алгоритм
создавать документ в событии ПослеЗаписи основного документа, в нем же можем проверить провелся ли он и например не создавать/отменить подчиненный
если возникла проблема с подчиненным можем так же отменить основной
+ у меня стояла задача показать подчиненный пользователю т.к. он мог не проводится по своим причинам
во всех остальных событиях пререзаписью, призаписи возникают какие нибудь неразрешимые ситуации
У документа2 есть созданный реквизит с ссылкой на документ1, вынес его на форму, вот что получилось, при проведении документа1 создается новый автоматически документ2, распровожу документ1 второй автоматом распроводится, провожу этот же документ1, второй создается новый или как сейчас я в условии прописал чтоб выдал что существует, дабы не создавал новый, подскажите какое условие написать после "иначе" чтоб он перепроводил документ2, а не создавал новый
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| КомплектацияНоменклатуры.Ссылка
|ИЗ
| Документ.КомплектацияНоменклатуры КАК КомплектацияНоменклатуры
|ГДЕ
| КомплектацияНоменклатуры.Перемещение = &Перемещение";
Запрос.УстановитьПараметр("Перемещение", ЭтотОбъект.Ссылка);
мРезультат = Запрос.Выполнить();
Если мРезультат.Пустой() Тогда
лДок.Записать(РежимЗаписиДокумента.Проведение);
Иначе
Сообщить("У " +ЭтотОбъект.Ссылка+ " уже создан комплект номенклатуры");
КонецЕсли;
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот