![]() |
#8 |
Участник
|
Вроде все должно выглядеть так:
Код: IF GenJnlLine."Bal. Account Type"= Acc::"Bank Account" THEN GenJnlLine."Bal. Account Type" :=4; IF GenJnlLine."Bal. Account Type"=4 THEN BEGIN IF BankAccount.FIND('-') THEN REPEAT IF BankAccount."No." = GenJnlLine."Bal. Account No." THEN if BankAccount."Min. Balance" > BankAccount.Balance - GenJnlLine.Amount THEN EXIT; UNTIL BankAccount.NEXT =0; END; |
|