function LoadWorkingTable( Account: comp; Month, Year: word): integer;
|
Top Previous Next |
Назначение Загружает табель работника с лицевым счетом Account за месяц Month года Year. Если табель не был ранее сформирован, он рассчитывается на основе информации из лицевого счета работника, данных о переходах в межпериод, больничных и отпусках. Все ранее установленные фильтры снимаются. Параметры Account – nrec лицевого счета работника. Month – месяц. Year – год. Возвращаемое значение Возвращает -1 в случае неудачного завершения или 0 в противном случае. Замечание В случае удачного завершения функция устанавливает контекст, в котором затем работают практически все функции подсчета количества дней/часов. Повторный вызов функции с теми же аргументами не выполнит никаких действий, если только текущие лицевой счет, табель или маска ручной корректировки табеля не были модифицированы. Чтобы гарантировать попытку загрузки табеля вставьте вызов процедуры ReSetWorkingTable перед вызовом LoadWorkingTable. Пример if InitWorkingTable { … if LoadWorkingTable(LSCHET.NREC, Month(Cur_Date), Year(Cur_Date)) = 0 Message('Табель загрузился', mfInformation or OkButton); else Message('Табель не загрузился', mfError or OkButton); DoneWorkingTable; } См. также: |