интересует кусок модуля ГлПолучитьРаспределдениеРезультата ЗиК 7.70.323
16.04.2012
11:52
#1
"Смотрю проводки в ЖР по удержанию - Исполнительный лист.
-------------------
ИФДебета = ВременныйШаблон.СчетДебета.ИсточникФинансирования;
Если ШаблонПроводки.СчетКредита.ИсточникФинансирования = ИФДебета Тогда // кредитуемый счет основного
...;
Иначе // подберем другой субсчет по источнику финансирования
НомерСчетаРаботника = Лев(ШаблонПроводки.СчетКредита.Код,3);
Счета=СоздатьОбъект("Справочник.ПланСчетов");
Счета.ВыбратьЭлементы();
СчетРаботника = ПолучитьПустоеЗначение("Справочник.ПланСчетов");
Пока Счета.ПолучитьЭлемент()=1 Цикл
Если (Лев(Счета.Код,3) = НомерСчетаРаботника) и (Счета.ИсточникФинансирования=ИФДебета) Тогда
СчетРаботника = Счета.ТекущийЭлемент()
КонецЕсли;
КонецЦикла;
Если СчетРаботника.Выбран() = 1 Тогда // подобрали подходящий счет
ШаблонУточнен = 1;
ВременнаяТаблицаРаспределения.Шаблон = глПодобратьШаблонПроводки("Вспомогательный шаблон по неденежным доходам",
ВременныйШаблон.СчетДебета,ВременныйШаблон.Субконто1Дебета,ВременныйШаблон.Субконто2Дебета,ВременныйШаблон.Субконто3Дебета,ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),
СчетРаботника,ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),0,ВременныйШаблон.Балансодержатель);
КонецЕсли;
КонецЕсли;
-----------------------------
То, что выделено жирным шрифтом интересует особенно. У нас получается проводка с любым последним ХХ в 302.ХХ счетом, который есть в плане счетов и пустыми КБК. Поэтому и отчеты неверные по ИФ и КБК. Подскажите, что мы делаем неверно, что выходит на данный кусок модуля в определении счета. у Сотрудника стоит бюджетный счет, проводка на основе БЛ Внебюджет по Исполнительному листу, по умолчанию стоит также бюджетная."
-------------------
ИФДебета = ВременныйШаблон.СчетДебета.ИсточникФинансирования;
Если ШаблонПроводки.СчетКредита.ИсточникФинансирования = ИФДебета Тогда // кредитуемый счет основного
...;
Иначе // подберем другой субсчет по источнику финансирования
НомерСчетаРаботника = Лев(ШаблонПроводки.СчетКредита.Код,3);
Счета=СоздатьОбъект("Справочник.ПланСчетов");
Счета.ВыбратьЭлементы();
СчетРаботника = ПолучитьПустоеЗначение("Справочник.ПланСчетов");
Пока Счета.ПолучитьЭлемент()=1 Цикл
Если (Лев(Счета.Код,3) = НомерСчетаРаботника) и (Счета.ИсточникФинансирования=ИФДебета) Тогда
СчетРаботника = Счета.ТекущийЭлемент()
КонецЕсли;
КонецЦикла;
Если СчетРаботника.Выбран() = 1 Тогда // подобрали подходящий счет
ШаблонУточнен = 1;
ВременнаяТаблицаРаспределения.Шаблон = глПодобратьШаблонПроводки("Вспомогательный шаблон по неденежным доходам",
ВременныйШаблон.СчетДебета,ВременныйШаблон.Субконто1Дебета,ВременныйШаблон.Субконто2Дебета,ВременныйШаблон.Субконто3Дебета,ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),
СчетРаботника,ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),ПолучитьПустоеЗначение("Справочник"),0,ВременныйШаблон.Балансодержатель);
КонецЕсли;
КонецЕсли;
-----------------------------
То, что выделено жирным шрифтом интересует особенно. У нас получается проводка с любым последним ХХ в 302.ХХ счетом, который есть в плане счетов и пустыми КБК. Поэтому и отчеты неверные по ИФ и КБК. Подскажите, что мы делаем неверно, что выходит на данный кусок модуля в определении счета. у Сотрудника стоит бюджетный счет, проводка на основе БЛ Внебюджет по Исполнительному листу, по умолчанию стоит также бюджетная."
Re: Передача табличного документа из одной формы в другую.После обмена документ становится модифицированным.
Читают тему
(гостей: 1)