Пустые субконто.
01.09.2005
15:55
#1
"В модуле документа....
.....
Если СуммаСС <> 0 Тогда
Операция.НоваяПроводка();
Операция.НомерЖурнала = """";
Операция.СодержаниеПроводки = "Начислен соц.страх.";
Операция.Дебет.Счет = Счет;
Операция.Дебет.Субконто(1, ?(ПустоеЗначение(СубконтоОбщее1) = 0, СубконтоОбщее1, Субконто1));
Операция.Дебет.Субконто(2, ?(ПустоеЗначение(СубконтоОбщее2) = 0, СубконтоОбщее2, Субконто2));
Операция.Дебет.Субконто(3, ?(ПустоеЗначение(СубконтоОбщее3) = 0, СубконтоОбщее3, Субконто3));
Операция.Кредит.Счет = СчетПоКоду("69.1");
Операция.Кредит.Субконто(1, Перечисление.ВидыПлатежейВФонды.Взносы); Операция.Кредит.СоцСтрах = Константа.ВводОстатковБУСоцСтрах; Операция.Кредит.Филиалы = Константа.ФилиалОрганизации; Операция.Кредит.Сотрудники = Константа.СотрудникиФилиал; Операция.Сумма = СуммаСС;
КонецЕсли;
Если СуммаССНС <> 0 Тогда
Операция.НоваяПроводка();
Операция.НомерЖурнала = """";
Операция.СодержаниеПроводки = "Начислен соц.страх. НС";
Операция.Дебет.Счет = Счет;
Операция.Дебет.Субконто(1, ?(ПустоеЗначение(СубконтоОбщее1) = 0, СубконтоОбщее1, Субконто1));
Операция.Дебет.Субконто(2, ?(ПустоеЗначение(СубконтоОбщее2) = 0, СубконтоОбщее2, Субконто2));
Операция.Дебет.Субконто(3, ?(ПустоеЗначение(СубконтоОбщее3) = 0, СубконтоОбщее3, Субконто3));
Операция.Кредит.Счет = СчетПоКоду("69.11");
//Операция.Кредит.Субконто(1, Перечисление.ВидыПлатежейВФонды.Взносы); Операция.Кредит.СоцСтрах = Константа.ВводОстатковБУСоцСтрахНС;
Операция.Кредит.Филиалы = Константа.ФилиалОрганизации; Операция.Сумма = СуммаССНС;
КонецЕсли; ....
По кредиту субконто пустые получаются по обоим счетам и 69.1 и 69.11. Хотя перечисления и костанты все заполнены.
Что здесь может быть не так?
"
.....
Если СуммаСС <> 0 Тогда
Операция.НоваяПроводка();
Операция.НомерЖурнала = """";
Операция.СодержаниеПроводки = "Начислен соц.страх.";
Операция.Дебет.Счет = Счет;
Операция.Дебет.Субконто(1, ?(ПустоеЗначение(СубконтоОбщее1) = 0, СубконтоОбщее1, Субконто1));
Операция.Дебет.Субконто(2, ?(ПустоеЗначение(СубконтоОбщее2) = 0, СубконтоОбщее2, Субконто2));
Операция.Дебет.Субконто(3, ?(ПустоеЗначение(СубконтоОбщее3) = 0, СубконтоОбщее3, Субконто3));
Операция.Кредит.Счет = СчетПоКоду("69.1");
Операция.Кредит.Субконто(1, Перечисление.ВидыПлатежейВФонды.Взносы); Операция.Кредит.СоцСтрах = Константа.ВводОстатковБУСоцСтрах; Операция.Кредит.Филиалы = Константа.ФилиалОрганизации; Операция.Кредит.Сотрудники = Константа.СотрудникиФилиал; Операция.Сумма = СуммаСС;
КонецЕсли;
Если СуммаССНС <> 0 Тогда
Операция.НоваяПроводка();
Операция.НомерЖурнала = """";
Операция.СодержаниеПроводки = "Начислен соц.страх. НС";
Операция.Дебет.Счет = Счет;
Операция.Дебет.Субконто(1, ?(ПустоеЗначение(СубконтоОбщее1) = 0, СубконтоОбщее1, Субконто1));
Операция.Дебет.Субконто(2, ?(ПустоеЗначение(СубконтоОбщее2) = 0, СубконтоОбщее2, Субконто2));
Операция.Дебет.Субконто(3, ?(ПустоеЗначение(СубконтоОбщее3) = 0, СубконтоОбщее3, Субконто3));
Операция.Кредит.Счет = СчетПоКоду("69.11");
//Операция.Кредит.Субконто(1, Перечисление.ВидыПлатежейВФонды.Взносы); Операция.Кредит.СоцСтрах = Константа.ВводОстатковБУСоцСтрахНС;
Операция.Кредит.Филиалы = Константа.ФилиалОрганизации; Операция.Сумма = СуммаССНС;
КонецЕсли; ....
По кредиту субконто пустые получаются по обоим счетам и 69.1 и 69.11. Хотя перечисления и костанты все заполнены.
Что здесь может быть не так?
"
Читают тему
(гостей: 1)