Копирование документа Заказ покупателя

Форум Программирование Общие вопросы программирования (Dev)

1С:Управление производственным предприятием

1. user989287 07.08.24 13:36 Сейчас в теме

Добрый день. Ниже в коде пытаюсь сбросить поле НовЗаказ.ДатаОплаты
Поле сбрасывается, Сообщить (НовЗаказ.ДатаОплаты); выводит все верно.
Но при создании документа при нажатии на кнопку это поле заполняется из предыдущего документа датой его создания.
Т.е. Документ 1
Поле От 23.07.2024 15:34:40
Поле Оплата 30.07.2024

Новый документ на его базе создается с
Поле От 23.07.2024 15:34:40
Поле Оплата 23.07.2024

Процедура ДействияФормыКопироватьОдисс(Кнопка)
	//Конит ПЕА+ 030724
	ПроцентНаценки=5;
	
	НовЗаказ=Документы.ЗаказПокупателя.СоздатьДокумент(); 
	ЗаполнитьЗначенияСвойств(НовЗаказ,ЭтотОбъект,,"Номер,Менеджер,Агентские,Агентские1,Основание,НомерДоговора,ДатаДоговора,НомерСпецификации,Оплата,Координатор,Техспециалист");   
	НовЗаказ.Организация=Справочники.Организации.НайтиПоКоду("000000001");//ООО "1"
	НовЗаказ.Контрагент=Справочники.Контрагенты.НайтиПоКоду("000000933");//ООО 2" 
	НовЗаказ.СкладГруппа=Справочники.Склады.НайтиПоКоду("000000004"); //Готовая продукция
	НовЗаказ.ДатаОплаты= Дата("00010101");
	Сообщить (НовЗаказ.ДатаОплаты);
	ЗаполнениеДокументов.ПриИзмененииЗначенияКонтрагента(НовЗаказ, мСтруктураПараметровДляПолученияДоговора);
	Для каждого Стр из ЭтотОбъект.Товары цикл
		НовСтр=НовЗаказ.Товары.Добавить();
		ЗаполнитьЗначенияСвойств(НовСтр,Стр);
		НовСтр.ПроцентСкидкиНаценки=НовСтр.ПроцентСкидкиНаценки+ПроцентНаценки;
		ОбработкаТабличныхЧастей.РассчитатьСуммуТабЧасти(НовСтр, НовЗаказ);
		ОбработкаТабличныхЧастей.РассчитатьСуммуНДСТабЧасти(НовСтр, НовЗаказ);
	КонецЦикла;
	Сообщить (НовЗаказ.ДатаОплаты);
	ПараметрыФормы = Новый Структура("Ключ", НовЗаказ);    
	ОткрытьФорму("Документ.ЗаказПокупателя.Форма.ФормаДокумента", ПараметрыФормы);
    //-
КонецПроцедуры

Показать

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. user2033930 07.08.24 13:39 Сейчас в теме

ЗаполнениеДокументов.ПриИзмененииЗначенияКонтрагента()

Происходит заполнение необходимых реквизитов. В том числе и относящихся к графику оплат по договору (или соглашению) данного контрагента.

3. user989287 07.08.24 13:56 Сейчас в теме

Да нет, никак не влияет.
Закоментировал строчку

ЗаполнениеДокументов.ПриИзмененииЗначенияКонтрагента(НовЗаказ, мСтруктураПараметровДляПолученияДоговора);

Изменения никаких. Да и если бы меняла, то во втором сообщении (Сообщить (НовЗаказ.ДатаОплаты);) вылетала бы другая дата.

Прикрепленные файлы:

4. user989287 07.08.24 16:24 Сейчас в теме

Нашел где происходит изменение даты.

ПриОтркытии (){
...
УправлениеЗаказами.УстановитьДатуОплатыПоДоговору(ЭтотОбъект);

}

Видимо буду руками убирать, чтобы дальше в дебри не лезть.

Оставьте свое сообщение

E-mail: