Page Comparison

Use this event to

Template

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Count", 'OnGetCountOrders_OnAfterSetFromWarehouseJournalBatch', '', true, true)]
    local procedure OnGetCountOrders_OnAfterSetFromWarehouseJournalBatch(_WhseJnlBatch: Record "Warehouse Journal Batch"; var _BaseOrderElement: Record "MOB Ns BaseDataModel Element")
    begin
    end;

Example 1

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Count", 'OnGetCountOrders_OnAfterSetFromWarehouseJournalBatch', '', true, true)]
    local procedure OnGetCountOrders MyOnGetCountOrders_OnAfterSetFromWarehouseJournalBatch(_WhseJnlBatch: Record "Warehouse Journal Batch"; var _BaseOrderElement: Record "MOB Ns BaseDataModel Element")
    begin
        with _BaseOrderElement do begin
            Set_BaseOrderElement.Set_DisplayLine1('Set from OnCountOnAfterSetFromWarehouseJournalBatch');
            Set        _BaseOrderElement.Set_HeaderValue1(Format(_WhseJnlBatch."Template Type"));
        end;
    end;

Example 2

    // [Example]: Sort by custom tag
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Count", 'OnGetCountOrders_OnAfterSetFromWarehouseJournalBatch', '', true, true)]
    local procedure SortByCustomTag_OnGetCountOrders_OnAfterSetFromWarehouseJournalBatch(_WhseJnlBatch: Record "Warehouse Journal Batch"; var _BaseOrderElement: Record "MOB Ns BaseDataModel Element")
    begin
        with _BaseOrderElement do begin
            Set_BaseOrderElement.Set_Sorting1(Format(_WhseJnlBatch."Template TypeTemplate Type".AsInteger());

            SetValue        _BaseOrderElement.SetValue('MyTemplateName', _WhseJnlBatch."Journal Template Name");
            Set        _BaseOrderElement.Set_Sorting2(CopyStr(_BaseOrderElement.GetValue('MyTemplateName'), 1, MaxStrLen(_BaseOrderElement."Sorting1 (internal)")));
        end;
    end;

...