Не заполняютя субконто в доке Кассовое поступление

Новая тема
Показывать по 10 20 40 сообщений
"Пытаюсь записать документ кассовое поступление. заполняются все реквизиты  кроме СубконтоКредита2 и СубконтоКредита3. Ошибки в коде не вижу. Помогите люди добрые...
Процедура СформироватьКассовоеПоступление();
  НовыйДокумент = Документы.КассовоеПоступление.СоздатьДокумент();
  ВидОперации=Справочники.ВидыОпераций.НайтиПоНаименованию("Поступление доходов от реализации (205 02, 03, 09, 10)");
  НовыйДокумент.ВидОперации = ВидОперации;
  НовыйДокумент.ЛицевойСчет = ЛицевойСчет;
  НовыйДокумент.Дата = ДатаДокумента;
  НовыйДокумент.Учреждение = Учреждение;
  НовыйДокумент.КВД = КВД;
  НовыйДокумент.ВалютаДокумента = ВалютаДокумента;
  НовыйДокумент.Курс = 1.0000;
  НовыйДокумент.Кратность=1;
  НовыйДокумент.СуммаДокумента = СуммаРеестра;
  НовыйДокумент.СуммаДокументаВВалюте = СуммаРеестра;

////// перебираем табличную часть

Для Каждого Строка Из ЗаписиДляПроводок Цикл
 ДокСтрока = НовыйДокумент.РасшифровкаПлатежа.Добавить();
 ДокСтрока.СчетДебета= СчетДебета;
 ДокСтрока.КБКСчетДебета= КБКСчетДебета;
 ДокСтрока.КОСГУСчетДебета= КОСГУСчетДебета;
 ДокСтрока.СубконтоСчетДебета2=РазделЛицевогоСчета;
 
 //////////////////////////////////////////////////
//СчетКредита=ПланыСчетов.ЕПСБУ.НайтиПоКоду("205.03.00");
// КБКСчетКредита=Справочники.КБК.НайтиПоНаименованию("07430201010010000");
 ДокСтрока.КБКНазначениеПлатежа= КБКСчетКредита;
 ДокСтрока.КОСГУНазначениеПлатежа= КОСГУЗабалансовыйДебет;
 ДокСтрока.РазделЛицевогоСчета=РазделЛицевогоСчета;
 
 ДокСтрока.СчетКредита= СчетКредита;
 ДокСтрока.КБКСчетКредита= КБКСчетКредита;
 ДокСтрока.КОСГУСчетКредита= КОСГУСчетКредита;

 Договор_п=Справочники.Договоры.НайтиПоКоду(СокрЛП(Строка.КодДоговора));
Если Договор_п = Справочники.Договоры.ПустаяСсылка() Тогда
   Сообщить("Договора "+Строка.КодДоговора  + """"" еще нет");
КонецЕсли;

 Контрагент_п= Договор_п.Контрагент;
Сообщить(Договор);
Сообщить(Договор.Контрагент);  
 ДокСтрока.СубконтоСчетКредита2=Контрагент_п ;
 ДокСтрока.СубконтоСчетКредита3= Договор_п;
Сообщить(ДокСтрока.СубконтоСчетКредита2);
Сообщить(ДокСтрока.СубконтоСчетКредита3);  


////////// забалансовый счет
 ДокСтрока.ЗабалансовыйДебет= ЗабалансовыйДебет;
 ДокСтрока.КБКЗабалансовыйДебет= КБКЗабалансовыйДебет;
 ДокСтрока.КОСГУЗабалансовыйДебет= КОСГУЗабалансовыйДебет;
 ДокСтрока.СубконтоЗабалансовыйДебет2=РазделЛицевогоСчета;

//  ДокСтрока.СтрокаНазначениеПлатежа= Строка.Договор.НаправлениеДеятельности;


ДокСтрока.СуммаВал=Строка.СуммаПроводки;
ДокСтрока.Сумма=Строка.СуммаПроводки;

КонецЦикла;


КонецЦикла;
Форма = НовыйДокумент.ПолучитьФорму();

Форма.Открыть();"
Наверное сначала надо установить тип субконто, а уже потом пихать туда, что не попадя!
" почему-то "ДокСтрока.СубконтоСчетДебета2=РазделЛицевогоСчета;" - срабатывает, субконто заполняется корректно без установки типа субконто?"
Откуда я знаю почему!? Я даже не знаю, что за конфигурация!?
Бухгалтерия бюджетного учреждения, редакция 1.0 (1.0.22.2)
Может быть у этого: ДокСтрока.СубконтоСчетДебета2 тип не составной, а у других составной. У меня сейчас нет под рукой бюджетки, сказать не могу. Да и счета приведите, что по дебету, что по кредиту.
в дебете 201.01, в кредите 205.03
а как установить тип субконто?
в типовой посмотри, сейчас у меня качается бюджетка, только тогда смогу что либо сказать.
у меня нет типовой...
Читают тему
(гостей: 1)

Быстрый переход