0
Дина88
17.09.19
✎
11:03
|
Добрый день! Дорогие друзья, помогите, пожалуйста!!!
Печатная форма документа Договор
Уже введенные данные:
и [Контрагент] [ДанныеКонтрагента], именуемый в дальнейшем «Соавтор», [Контрагент1] [ДанныеКонтрагента1], именуемая в дальнейшем «Соавтор», с другой стороны, заключили настоящий договор о следующем:
Вознаграждение выплачивается Соавторам в долях, установленных Соглашением между авторами: [ИмяСоавтораДоля] – [50 %], что составляет [3674,46] ([Три тысячи шестьсот семьдесят четыре руб. 46 коп.]); [ИмяСоавтораДоля] – [50 %], что составляет [3674,45] ([Три тысячи шестьсот семьдесят четыре руб. 45 коп.]); – 0%.
Нужно сделать ссылку для [ИмяСоавтораДоля] на [Контрагент], один и тот же человек.
ТабДок=Новый ТабличныйДокумент;
Макет=ПолучитьМакет("Макет");
Макет.Параметры.НомерДоговора=Номер;
Макет.Параметры.ДатаДоговора=Дата;
//Здесь ссылка на контрагента из справочника
Макет.Параметры.Контрагент=Контрагент;
Макет.Параметры.Контрагент1=Контрагент1;
ДанныеКонтрагента=Контрагент.ДанныеКонтрагента;
Макет.Параметры.ДанныеКонтрагента=ДанныеКонтрагента;
ДанныеКонтрагента1=Контрагент1.ДанныеКонтрагента;
Макет.Параметры.ДанныеКонтрагента1=ДанныеКонтрагента1;
СрокИИП=СрокИИП;
Макет.Параметры.СрокПользования=СрокИИП;
ФормСтрока = "Л = ru_RU;ДП=Ложь";
ПарПредмета="год,года,лет,м";
ПрописьЧисла = ЧислоПрописью(СрокИИП,ФормСтрока,ПарПредмета);
ПрописьЧисла=СтрЗаменить(ПрописьЧисла, "00", "");
Макет.Параметры.СрокИИП_Прописью=ПрописьЧисла;
Произведение=Контрагент.Произведение;
Макет.Параметры.НазваниеПроизведения=Произведение;
Тиражирование=ТиражПроизведения;
Макет.Параметры.Тираж=Тиражирование;
ИнтервалТиражирования=ПериодТиражирования;
Макет.Параметры.ПериодТиражирования=ИнтервалТиражирования;
Фамилии=ФамилияНаОбложке;
Макет.Параметры.ФамилииАвторов=Фамилии;
Макет.Параметры.СрокПользованияИИП=СрокИИП;
СрокПередачиРук=ПередачаРукописиСрок;
Макет.Параметры.ДатаПередачиРукописи=СрокПередачиРук;
ДействиеДоговора=СрокДоговора;
Макет.Параметры.СрокДействияДоговора=ДействиеДоговора;
СуммаАвторам=СуммаГонорара;
Макет.Параметры.Сумма=СуммаАвторам;
ФормСтрока= "Л = ru_RU; ДП = Истина";
ПарПредмета="рубль, рубля, рублей, м, копейка, копейки, копеек, ж, 2";
ПрописьЧисла= ЧислоПрописью(СуммаГонорара, ФормСтрока, ПарПредмета);
Макет.Параметры.СуммаПрописью=ПрописьЧисла;
//Здесь нужно исправить код для ссылки на верхнего контрагента
ФИОСоавтораВДоле=Договор.Контрагент;???
ИмяСоавтора1=ФИОСоавтораВДоле;
Макет.Параметры.ИмяСоавтораДоля=ИмяСоавтора1;
ТабДок.Вывести(Макет);
ТабДок.Показать("Трудовой Договор по Контрагенту"+Контрагент);
|
|