баланс кассы, р/с

[by_HT]

Спасибо конечно всем.... особое спасибо RedFoxу!
если "Account Type"::"Bank Account": то

IF GenJnlLine."Account Type" = GenJnlLine."Account Type"::"Bank Account" THEN BEGIN
 IF (BankAccount.CALCFIELDS(Balance) = TRUE) AND (BankAccount.Balance <> 0) THEN
  IF BankAccount."Min. Balance" >= BankAccount.Balance - GenJnlLine.Amount THEN ERROR(Text013);
END;

в случае "Bal. Account Type"::"Bank Account": то

IF GenJnlLine."Bal. Account Type" = GenJnlLine."Bal. Account Type"::"Bank Account" THEN BEGIN
 IF (BankAccount.CALCFIELDS(Balance) = TRUE) AND (BankAccount.Balance <> 0) THEN
  IF BankAccount."Min. Balance" >= BankAccount.Balance - GenJnlLine.Amount THEN ERROR(Text013);
END;

В случае 200 банковских счетов и 500 строк фин. журнала..... здесь я понятие и не имею что мне делать =(