Главная » 1С Предприятие » ФОРМА СПИСКА ЖУРНАЛА ДОКУМЕНТОВ РАСЧЕТЫ

0

Документы    НачПериода_2   и    Премия    отображаются   в     журнале    документов Расчеты (см.  рис. 7.57).  Форму  списка этого  журнала документов  создадим такую  же, как  и форму  списка журнала  документов Табель  (разд.  7.6.5).

Модуль   формы списка  журнала  документов  Расчеты содержит  предопределенную процедуру ПриОткрытии. Назначение процедуры такое же, как  и у одноименной процедуры  модуля  формы списка журнала кадровых приказов  (разд.  5.8.3.2).

// Список действий по документу. Передается процедуре глобального модуля

// глДействия(ТекущийДокумент, сДейст)

перем  сДейст;

// Формирует список действий и устанавливает интервал журнала,

// отображающий все введенные документы вида НачПериода_2 и Премия процедура ПриОткрытии()

перем  дНач;                               //                  Дата начала  интервала журнала  Расчеты перем флаг, док;

ОчиститьОкноСообщений();

// Определяем список действий для кнопки Действия сДейст.ДобавитьЗначение("Структура подчиненности"); сДейст.ДобавитьЗначение("Движения документа");

флаг = 1;                                //                   Равен единице, если удалось создать  док

попытка

док = СоздатьОбъект("Документ.НачПериода_2"); исключение

попытка

док  =  СоздатьОбъект("Документ.Премия"); исключение

флаг = 0; конецПопытки;

конецПопытки;

// Если документ НачПериода_2 или Премия создан  если флаг = 1 тогда

// Находим документ с наименьшей датой. По умолчанию документы располагаются

// в выборке по возрастанию их дат док.ВыбратьДокументы();

если док.ПолучитьДокумент() = 1 тогда дНач = док.ДатаДок;

иначе

дНач = ТекущаяДата(); конецЕсли;

иначе                                    //                     Искомых документов нет дНач  = ТекущаяДата();

конецЕсли;

УстановитьИнтервал(дНач,  ТекущаяДата(  )); конецПроцедуры // ПриОткрытии

// В основной  программе модуля всего один оператор сДейст  = СоздатьОбъект("СписокЗначений");

Источник: Бартеньев О. В. 1С:Предприятие:  программирование для  всех.  Базовые объекты и расчеты на одной дискете. М.: Диалог-МИФИ, 2005. 464 с.

По теме:

  • Комментарии