Анализ счета (запросом)
// Анализ счета // —————— // использования запроса для работы с бухгалтерскими операциями и проводками. // Запрос обрабатывает корреспонденции счета Сч // по счетам КорСч за расчетный период. // Значение счета для анализа задается в диалоге установкой ВыбСч.
//Создание объекта типа Запрос Запрос = СоздатьОбъект(“Запрос”); ТекстЗапроса = “ |Период с Дата1 по Дата2; |Сч = Операция.Счет; |КорСч = Операция.КорСчет; |Сумма = Операция.Сумма; |Группировка Сч упорядочить по Сч.Код; |Группировка КорСч упорядочить по КорСч.Код; |Функция КорДо = КорДО(Сумма); |Функция КорКо = КорКО(Сумма); |Условие(Сч = ВыбСч);”;
//Если ошибка в запросе, то выход из процедуры Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Предупреждение(“Запрос по бухгалтерскими операциями и проводками не выполнился!”);
Возврат;
КонецЕсли;
//Подготовка к заполнению выходных форм данными запроса Пока Запрос.Группировка(“Сч”) = 1 Цикл // Заполнение полей Сч Сч = Запрос.Сч; Пока Запрос.Группировка(“КорСч”) = 1 Цикл // Заполнение полей КорСч КорСч = Запрос.КорСч; // Дальнейшая обработка... КонецЦикла; КонецЦикла;
|