0
servicenn
10.02.17
✎
11:30
|
День добрый , задача стоит перебросить данные с 76.09(контрагенты,договор) на 76.15(физ лицо), соответственно делается проводка Если сальдо дебетовое проводкой Дт 76.15 Кт 76.09 , но ест кривые нестандартные остатки по 76.09 в аналитику контрагент записаны договоры, есть ли возможность программно в субконто контрагент записать договор (по крайней мере до меня кто то умудрился так сделать)?
пример остаток по 76.09 сумма кт =777
субконто контрагенты =основной договор
субконто договор = пустой
|
|
1
servicenn
10.02.17
✎
14:49
|
Если вдруг кому интересно , взял кусок процедуры установитьСубконто из общего модуля переделал и добавил в обработку
//Кт 76.09
//субконто1 контрагент
Если КонтрагентКоректный тогда
БухгалтерскийУчет.УстановитьСубконто(ЗХозрасчетный.СчетКт, ЗХозрасчетный.СубконтоКт, 1 , стр.Субконто1,,);
Иначе
//Контрагент не корректный , вместо контрагента записываем договор
ИмяСубконто =1;
Субконто = ЗХозрасчетный.СубконтоКт;
ВидыСубконтоСчета = ЗХозрасчетный.СчетКт.ВидыСубконто;
ВидСубк = ВидыСубконтоСчета[ИмяСубконто - 1].ВидСубконто;
Субконто.Вставить(ВидСубк, стр.Субконто1);
КонецЕсли;
|
|