Page Comparison

Use this event to

...

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrderLines_OnIncludeSalesLine', '', true, true)]
    local procedure OnGetPickOrderLines_OnIncludeSalesLine(_SalesLine: Record "Sales Line"; var _IncludeInOrderLines: Boolean)
    begin
    end;

Example

    // [Example]: Do not include items that are blocked
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrderLines_OnIncludeSalesLine', '', true, true)]
    local procedure MyOnGetPickOrderLines_OnIncludeSalesLine(_SalesLine: Record "Sales Line"; var _IncludeInOrderLines: Boolean)
    var
        Item: Record Item;
    begin
        if Item.Get(_SalesLine."No.") and Item.Blocked then
            _IncludeInOrderLines := false;
    end;

...