Dynamics Community Forum Thread Details

Field Validation: Skip errors

Hi all,

We have the below custom table created in Business Central:

We would like to create a background process (via job queue) that loops through the payment lines and for each record, create a cash receipt journal. High evel code we have uptill now is as per below;

procedure ProcessPayments()
    var
        PaymentLine: Record PaymentLine;
        CashRcptJnl: Record "Gen. Journal Line";
    begin
        if PaymentLine.Findset() then begin
            repeat
            begin
                CashRcptJnl.Reset();
                CashRcptJnl.Init();
                CashRcptJnl.Validate("Journal Template Name", 'RECEIPTS');
                CashRcptJnl.Validate("Journal Batch Name", 'CASHRCPT');
                CashRcptJnl.Validate("Posting Date", Today());
                CashRcptJnl.Validate("Account Type", CashRcptJnl."Account Type"::Customer);
                CashRcptJnl.Validate("Account No.", PaymentLine.CustomerNo);
                CashRcptJnl.Validate(Amount, PaymentLine.Amount);
                CashRcptJnl.Validate("Currency Code", PaymentLine.CurrencyCode);
                CashRcptJnl.Validate("Bal. Account Type", CashRcptJnl."Bal. Account Type"::"Bank Account");
                CashRcptJnl.Validate("Bal. Account No.", PaymentLine.BankNo);
                if CashRcptJnl.Insert() then begin
                    PaymentLine.Validate(Processed, true);
                    PaymentLine.modify(true);
                end;
            end;
            until (PaymentLine.Next = 0);
        end
    end;

We would like that if one of the payment line fails validation on any o the fields, the process does not stop or issues an error - we would like it to proceed to the next payment line (we will be holding a seperate custom table as a log and we will keep errors there). At the moment it is failing on one of the validate lines (in one particular example, USD did not exist as currency and therefore it returned an error that it does not exist).

How can we run all the validates without stopping the process in case one of the validations is not successful? We do not want to use value assignments (example CashRcptJnl."Currency Code" := PaymentLine.CurrencyCode) because we still want the validation to run... just not output any error that stops the process.

Is there a way how we can do this, please?

Any help is appreciated.

Thanks in advance!

Quick Links

Leaderboard