не получается написать обработку
|
Bio Frode
15.07.2009 - 09:22
|
бюджетная бухгалтерия 7.7, задача стоит следующая: сделать обработку, которая на основании косгу будет заполнять счет дебета в документе Кассовое выбытие, вроде все просто, только вот в документе есть процедура "привыбореСчДт" которая при выборе счета подставляет значение субконто контрагенты и субконто договора, исходя из реквизитов шапки, если же обработка выбирает счет то это не происходит. как описать это действие в обработке, чтобы подставлял согласно процедуре "привыбореСчДт" . вот код обработки: Процедура Сформировать() Док = СоздатьоБЪЕКТ("Документ.КассовоеВыбытие"); НачатьТранзакцию(); Док.ВыбратьДокументы(НачДата,КонДата); Пока Док.ПолучитьДокумент() = 1 Цикл Док.ТекущийДокумент(); Док.ВыбратьСтроки(); Пока док.ПолучитьСтроку()= 1 Цикл Если док.КОСГУНазначениеПлатежа.Код="221" Тогда Док.УстановитьАтрибут("СчетДт",счетпокоду("302.04.1")); иначеЕсли док.КОСГУНазначениеПлатежа.Код="222" Тогда Док.УстановитьАтрибут("СчетДт",счетпокоду("302.05.1")); иначеЕсли док.КОСГУНазначениеПлатежа.Код="223" Тогда Док.УстановитьАтрибут("СчетДт",счетпокоду("302.06.1")); конецесли; Док.Записать(); //Док.Провести(); КонецЦикла; КонецЦикла; ЗафиксироватьТранзакцию(); Сообщить("Готово"); КонецПроцедуры |