function WT_GHBD(

       HourKind: byte;

       BeginningHour, MaxDailyHoursAmount: double;

       ScheduleType: integer;

       DateRangeStart, DateRangeEnd: date): double;

Назначение

Возвращает количество часов вида HourKind в диапазоне дат от DateRangeStart до DateRangeEnd по графику типа ScheduleType, считая ежедневно от часа BeginningHour, но не более MaxDailyHoursAmount часов, если MaxDailyHoursAmount > 0.

Параметры

HourKind – вид часов

BeginningHour – час начала отсчета

MaxDailyHoursAmount – часов ежедневно, не более

ScheduleType – тип графика

DateRangeStart – начальная дата

DateRangeEnd – конечая дата

Замечание

Значение параметра HourKind может содержать т.н. управляющие флаги.

Пример

if InitWorkingTable

{

  …

  var Beginning, Ending: date;

  Beginning := Sub_Months(Cur_Date, 2);

  Ending := Add_Months(Beginning, 1)

  // Лучше загрузить табель за месяц и год, соответствующие началу периода

  if LoadWorkingTable(LSCHET.NREC, Month(Beginning), Year(Beginning)) = 0

  {

    var Hours: double;

    // Количество фактически отработанных за предыдущие два месяца часов

    Hours := WT_GHBD(hkWorking, 0, 0, stActual, Beginning, Ending);

    …

  }

  DoneWorkingTable;

}