[event publisher insert] in event "Copy Document Mgt." (Codeunit 6620) proc "CheckFirstLineShipped"

[hobali]

Dear Support,

Could you please create a new publisher in "Copy Document Mgt." (Codeunit 6620) and a bit the following code, at procedure "CheckFirstLineShipped"? The publishers name could be: "OnAfterSetSalesCombDocLineNoOnCheckFirstLineShipped".

<<<<< Original Code >>>>>

if (DocNo = '') and (ShipmentLineNo = 0) and FirstLineShipped then begin
            FirstLineShipped := false;
            SalesCombDocLineNo := NextLineNo;
            NextLineNo := NextLineNo + 10000;
        end;

<<<<< Modified >>>>>

[IntegrationEvent(false, false)]
local procedure OnAfterSetSalesCombDocLineNoOnCheckFirstLineShipped(FromSalesLineArchive: Record "Sales Line Archive"; NextLineNo: Integer; var IsHandled: Boolean)
    begin
    end;

if (DocNo = '') and (ShipmentLineNo = 0) and FirstLineShipped then begin
            FirstLineShipped := false;
            SalesCombDocLineNo := NextLineNo;
            IsHandled := false;
            OnAfterSetSalesCombDocLineNoOnCheckFirstLineShipped(FromSalesLineArchive, NextLineNo, IsHandled);
            if not IsHandled then
                NextLineNo := NextLineNo + 10000;
        end;

Additional context
We need to skip the Release part of the code for several times due to a customer condition.

Thank you in advance.