Процедура ВводНового(ПризнКопирования) // Предопределенная процедура
// для новых элементов устанавливаем
// дату записи периодических реквизитов на '01.01.1980'
ИспользоватьДату('01.01.1980');
Если ПризнКопирования=0 Тогда
// новый элемент не скопирован
ВидКонтрагента = Перечисление.ВидыКонтрагентов.Организация;
ВалютаВзаиморасчетов = Константа.ВалютаВзаиморасчетов;
ВалютаКредита = Константа.ОсновнаяВалюта;
ВалютаКредитаПоставщика = Константа.ОсновнаяВалюта;
Иначе
// контрагент скопирован. нужно удалить договор по умолчанию
ОсновнойДоговорТорг = ПолучитьПустоеЗначение("Документ.Договор");
СлужебныйДоговорТорг = ПолучитьПустоеЗначение("Документ.Договор");
КонецЕсли;
ЭлементНовый = 1;
КонецПроцедуры // ВводНового
Программа ТИС 7.7