import "layer92.dll"

UserSetSimv()
{
  rsimv = "Р7";
  // Сюда можно вставлять инициализацию симолов табеля.
  // Примеры инициализации 
  // в файле SCRIPT\SetSim.S

  // Можно некоторым символам нормативных рабочих дней поставить в соответствие
  // некоторое количество ночных часов:
  // AddNightHours('3',4.00);
}

User_ssc_calc(sscd, day1, day2, krabot, c)
{
  return Sys_ssc_calc(sscd, day1, day2, krabot, c);
}

User_perevod_ls_dop()
{
  // Сюда можно вставить дополнительные операции при переводе 
  // каждого лицевого счета в следующий месяц
  // Если выполнить return ESC; то перевод в следующий месяц прервется. 
  return 1;
}

User_Tabel_Sootv()
{
   Sys_Tabel_Sootv();

   // ниже если надо можно задавать свои соответствия символов или переопределять поставочные
   // TA[]-табель АМБы,TB[]-табель буквенный,TD[]-табель цифровой,TC[]-табель буквенный-бюджетный
   // ON[]- внутренние коды( -1 - выходные дни; 0-10 - отработаные; больше 10 - неотработанные)

   // TA[36]="?"; TB[36]="?"; TC[36]="?";   TD[36]="37"; ON[36]= 36;
}

DopUserActionsAfterRM(tip, &Ved, &Ost, &Dolg, reg, Prop)
{
  // Сюда можно вставить дополнительные операции, выполняемые после расчета за месяц. 
  // функция вызывается несколько раз! на каждый набор балансных свойств(ист./объект/подр/совм-во) в ЛС

     // reg - режим расчета за месяц.
     // reg = 3, если в ЛС проставлена дата увольнения.
     // Prop - класс ApropBE с текущим источником/объектом/подразд... по которому подводится баланс
     // tip - тип расчета за месяц.
     // tip : 'n' : получить новые результаты
     //       'i' : очистить ячейки в ЛС для тек. месяца
     //       'r' : чтение данных за mtek
     //       'R' : чтение данных за mrasch
     //       'w' : запись того, что передали       + Finish('w')
     //       'W' : запись из интерактивного режима + Finish('W')
     //       'U' : запись из авт.разноски сумм     + Finish('U')
     //       'u' : запись по F5 из lslook          + Finish('u')
     //       'v' : запись без "финиша"
     //       'f' : "финиш" без записи                Finish('u')
     //       'F' : получить новые рез-ты 'n'       + Finish('u')

     
     // Пример использования:
//      if (tip=='u') // вызов после расчета и подтверждения суммы в ведомость
//      { 
//         char Src=Prop.GetSrc(); // текущий источник
//         if (Src==GetGeneralSrcLS()) // проверяем только после расчета основного источника 
//         {
//           // проверим чтобы действовала строка налога
//           if (poisk_row(205., 0, data, 0)==EOF && poisk_row(207., 0, data, 0)==EOF)
//              AmbaMessageBox("Внимание! В данном лицевом счете нет действующих строк НДФЛ!!!","Внимание",MB_ICONSTOP,0);
//         }
//      }


     return 0;
}