Skip to content

[Event Request] [ES][Table][21][Cust. Ledger Entry] CheckBillSituation OnBeforeCheckBillSituation #30427

Description

Why do you need this change?

We need to add this ishandle to this procedure because we need to settle any items included in a recorded remittance. And it doesn't make sense to disallow it because, if the bill is already unpaid, whether it's in a closed or registered remittance depends only on whether there are other bills in the remittance that are still outstanding.

Describe the request

Describe the request
[ES][Table][21][Cust. Ledger Entry]

CheckBillSituation()

Would like to add a new event OnBeforeCheckBillSituation:

[Scope('OnPrem')]
procedure CheckBillSituation()
var
    CarteraDoc: Record "Cartera Doc.";
    PostedCarteraDoc: Record "Posted Cartera Doc.";
    >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
    Ishandled: Boolean;
    <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
begin
    >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
    OnBeforeCheckBillSituation(Rec, Ishandled);

    if Ishandled then
        exit;
    <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

    case true of
        CarteraDoc.Get(CarteraDoc.Type::Receivable, "Entry No."):
            if CarteraDoc."Bill Gr./Pmt. Order No." <> '' then
                Error(CheckBillSituationGroupErr, Description);
        PostedCarteraDoc.Get(PostedCarteraDoc.Type::Receivable, "Entry No."):
            if PostedCarteraDoc."Bill Gr./Pmt. Order No." <> '' then
                Error(CheckBillSituationPostedErr, Description);
    end;
end;


[IntegrationEvent(false, false)]
local procedure OnBeforeCheckBillSituation(var CustLedgerEntry: Record "Cust. Ledger Entry"; var Ishandled: Boolean)
begin
end;

Alternatives Evaluated
We have tried to use alternatives to avoid making the change, but we don't see a way to skip the error when it performs the GET request on PostedCarteraDoc.

Why a regular event is not enough
With the current event, you can't either ignore the error or cause the error to occur in various cases.

Performance and execution frequency
This code would not harm the code in any way; rather, it would allow for the addition of more functionality and make it more complete.

Data Sensitivity Review
No, this feature could not lead to the disclosure of confidential data.

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Type

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions