Тут такая фишка, при печате расчетного листа, выдается ошибка рис:
по дебагеру получеется:
ЧТО ВАЛИТЬСЯ в функцие CalculateBalanse в CU 14800
Код:
TempPayrollJnlLine.COPYFILTERS(PayrollJnlLine);
IF TempPayrollJnlLine.CALCSUMS(Amount) THEN BEGIN
IF PayrollJnlLine."Line No." <> 0 THEN // 0 = New record
TotalAmount := TempPayrollJnlLine.Amount
ELSE BEGIN
TotalAmount := TempPayrollJnlLine.Amount + LastPayrollJnlLine.Amount;
END;
ShowTotalBalance := TRUE;
END ELSE BEGIN
ShowTotalBalance := FALSE;
END;
IF PayrollJnlLine."Line No." <> 0 THEN BEGIN // 0 = New record
TempPayrollJnlLine.SETFILTER("Line No.",'<=%1',PayrollJnlLine."Line No.");
IF TempPayrollJnlLine.CALCSUMS(Amount) THEN BEGIN
Amount := TempPayrollJnlLine.Amount;
ShowBalance := TRUE;
END ELSE
ShowBalance := FALSE;
END ELSE BEGIN -----> здесь
TempPayrollJnlLine.SETFILTER("Line No.",'<=%1',LastPayrollJnlLine."Line No.");
IF TempPayrollJnlLine.CALCSUMS(Amount) THEN BEGIN
TempPayrollJnlLine2.COPYFILTERS(PayrollJnlLine);
TempPayrollJnlLine2 := LastPayrollJnlLine;
IF TempPayrollJnlLine2.NEXT <> 0 THEN BEGIN
Amount := TempPayrollJnlLine.Amount;
END ELSE BEGIN
Amount := TempPayrollJnlLine.Amount + LastPayrollJnlLine.Amount;
END;
ShowBalance := TRUE;
END ELSE
ShowBalance := FALSE;
END;
теперь вопрос, а откуда он взял таблицу сатрудник????
что за таблица TempPayrollJnlLine если она даже не объявлена???
Nav 4.0 sp 2