Сообщение от
by_HT
Ошибка:
Значение COPYSTR параметра 3 находится за пределам и разрешеного интервала.
Текущие значение: -1
// calc work&fact time and salary by months
PayrollCalculate.CalcTimes(EmployeeSalary,UOM,TypeCalc::Vacation,VacationData,MQ
ty,TotalSalary,Month);
TempDate := "Starting Date AE";
FOR i := 1 TO 12 DO BEGIN
IF (Month[i] <> '') THEN BEGIN
TmpMonth := Month[i];
Month[i] := COPYSTR(TmpMonth,1,STRLEN(TmpMonth)-4);
Y[i] := COPYSTR(TmpMonth,STRLEN(TmpMonth)-4,5);
END;
END;