табель рабочего времени

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
MarinaE
Сообщения: 8
Зарегистрирован: 15 дек 2005, 13:23

табель рабочего времени

Сообщение MarinaE »

Всем здравствуйте!
Пытаюсь разобраться с табелем учета рабочего времени, не могу понять что означают поля used[1], used[2]... в таблице lstabmsk.
Вроде как признак использования ручной корректировки, но какие значения принимают?
Кто нибудь знает?
Заранее спасибо!
Max_Fin
На пенсии
Сообщения: 797
Зарегистрирован: 29 мар 2005, 17:49
Откуда: г. Тюмень
Контактная информация:

Сообщение Max_Fin »

Код: Выделить всё

      _loop SMASK
      {
....
        if (SMASK.WORKINGHOURS = 0)
          LSTABMSK.DAILYMARKS[SMASK.DAY] := WeekEndMark;
        else
          LSTABMSK.DAILYMARKS[SMASK.DAY] := string(SMASK.WORKINGHOURS, 0, 2);

        LSTABMSK.USED[SMASK.DAY] := SMASK.MASK;
        LSTABMSK.WORKINGHOURS[SMASK.DAY] := SMASK.WORKINGHOURS;
        LSTABMSK.EVENINGHOURS[SMASK.DAY] := SMASK.EVENINGHOURS;
        LSTABMSK.NIGHTHOURS[SMASK.DAY] := SMASK.NIGHTHOURS;
      };
...
      update current LSTABMSK;

Код: Выделить всё

                  for (I := 1; I <= Last_Day(date(1, Imp.GetMonth, Imp.GetYear)); I := I + 1)
                  {
                    LSTABMSK.USED[I] := 0;
                    // рабочие часы
                    if Imp.GetDailyHours(I, hkWorking, Hours)
                    {
                      LSTABMSK.WORKINGHOURS[I] := Hours;
                      LSTABMSK.USED[I] := LSTABMSK.USED[I] or coWorkingHoursMask;
                      //LSTABMSK.DAILYMARKS[vi + 1] := CurStr;
                    }

                    if Imp.GetDailyHours(I, hkEvening, Hours)
                    {
                      LSTABMSK.EVENINGHOURS[I] := Hours;
                      LSTABMSK.USED[I] := LSTABMSK.USED[I] or coEveningHoursMask;
                      //LSTABMSK.DAILYMARKS[vi + 1] := CurStr;
                    }

                    if Imp.GetDailyHours(I, hkNight, Hours)
                    {
                      LSTABMSK.NIGHTHOURS[I] := Hours;
                      LSTABMSK.USED[I] := LSTABMSK.USED[I] or coNightHoursMask;
                      //LSTABMSK.DAILYMARKS[vi + 1] := CurStr;
                    }
                  }
Жду выхода Вселенная 2.12!
MarinaE
Сообщения: 8
Зарегистрирован: 15 дек 2005, 13:23

Сообщение MarinaE »

Не уверена, что разобралась в коде.
Правильно ли я поняла, что в поля used[..] пишется 0 в выходные дни и отработанные часы в рабочие дни?
На что это влияет?
Screw
Слесарь-системщик
Сообщения: 304
Зарегистрирован: 29 мар 2005, 17:49
Откуда: р.Беларусь, Унитарное предприятие "ТОП СОФТ"
Контактная информация:

Сообщение Screw »

Дам досужий совет: не трогайте табель и его составляющие напрямую, лучше используйте специально разработанный для работы с ним функционал. Шлите вопросы на Vitaly.Korzyuk@galaktika.by, я вышлю доку, помогу добрым словом или примером.
Виталий
Ответить