Page Comparison

...

...

What has changed?

Version MOB5.14 includes refactored functionality for creating ReferenceData Headers and -Steps (headerConfigurations and registrationCollectorConfigurations).
We are introducing a new syntax that will allow our partners to work with ReferenceData without knowing or understanding the specifics of the underlying Xml-response.

...

          OnGetReferenceData_OnAddHeaderConfigurations
          OnGetReferenceData_OnAfterAddHeaderField

When will I need to update my existing customizations?

When installed on-premise:

...

• In general you manually controls when an extension is updated in an existing environment (by uninstalling/reinstalling/upgrading the extension).
• However, during next major version deployment you will likely be auto-updated to latest Mobile WMS al extension version (April, October).
• It is recommended to update your Mobile WMS al extension to latest version prior to next major launch to avoid issues during that upgrade process.
  
  

How to rewrite your existing customization

Rewrite your existng OnGetReferenceData_OnAfterCreateHeaderConfigurations eventsubscriber to use OnGetReferenceData_OnAddHeaderConfigurations instead.

All references to Record "MOB RefD HeaderConfig Element" should now be Record "MOB HeaderField Element".
Existing calls to helper methods on this input parameter table must be changed to follow new naming conventions (see examples below).

Example - existing code from MOB5.00 - MOB5.13

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Reference Data", 'OnGetReferenceData_OnAfterCreateHeaderConfigurations', '', true, true)]

    local procedure OnGetReferenceData_OnAfterCreateHeaderConfigurations(var _HeaderConfigurationElement: Record "MOB RefD HeaderConfig Element")
    begin
        with _HeaderConfigurationElement do begin
            Create('CustomPrintLabel'); // New ConfigurationKey

            // ItemNumber
            Add_TextValue(
                1, //id
                'ItemNumber', //name
                CopyStr(MobWmsLanguage.GetMessage('ITEM') + ':', 1, 100), //label
                100, //label width
                true, //clear on clear
                true, //accept barcode
                30, //length
                false, //optional
                'ItemSearch', //search type
                CopyStr(MobBaseToolbox.GetItemNoGS1Ai(), 1, 30), //ean GS1Ai
                false); //locked

                // Lot Number
            Add_TextValue(
                2, //id
                'LotNumber', //name
                CopyStr(MobWmsLanguage.GetMessage('LOT_NO_LABEL') + ':', 1, 100), //label
                100, //label width
                true, //clear on clear
                true, //accept barcode
                30, //length
                false, //optional
                '', //search type
                CopyStr(MobBaseToolbox.GetLotNoGS1Ai(), 1, 30), //ean GS1Ai
                false); //locked
        end;
    end;

Example 1 - new code (1:1 conversion)

       [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Reference Data", 'OnGetReferenceData_OnAddHeaderConfigurations', '', true, true)]
    local procedure My01OnGetReferenceData_OnAddHeaderConfigurations(var _HeaderFields: Record "MOB HeaderField Element")
    var
        MobToolbox: Codeunit "MOB Toolbox";
        MobWmsLanguage: Codeunit "MOB WMS Language";
    begin
        with _HeaderFields do begin
            InitConfigurationKey_HeaderFields.InitConfigurationKey('CustomPrintLabel'); // New ConfigurationKey

                    /// Field: ItemNumber
            Create        _HeaderFields.Create_TextField(1, 'ItemNumber');
            Set        _HeaderFields.Set_label(MobWmsLanguage.GetMessage('ITEM') + ':');
            Set        _HeaderFields.Set_clearOnClear(true);
            Set        _HeaderFields.Set_acceptBarcode(true);
            Set        _HeaderFields.Set_length(20);
            Set        _HeaderFields.Set_searchType('ItemSearch');
            Set        _HeaderFields.Set_eanAi(MobToolbox.GetItemNoGS1Ai());
                    // Default values no longer needs to be set:
                    // Set _HeaderFields.Set_labelWidth(100);
                    // Set _HeaderFields.Set_optional(false);
                    // Set _HeaderFields.Set_locked(false);
            
        // Field: LotNumber
            Create        _HeaderFields.Create_TextField(2, 'LotNumber');
            Set        _HeaderFields.Set_label(MobWmsLanguage.GetMessage('LOT_NO_LABEL') + ':');
            Set        _HeaderFields.Set_clearOnClear(true);
            Set        _HeaderFields.Set_acceptBarcode(true);
            Set        _HeaderFields.Set_length(20);
            Set        _HeaderFields.Set_eanAi(MobToolbox.GetLotNoGS1Ai());
                    // Default values no longer needs to be set:
                    // Set _HeaderFields.Set_searchType('');
        end;
    end;

Example 2 - new code using templates - then setting only properties different from the template (if any)

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Reference Data", 'OnGetReferenceData_OnAddHeaderConfigurations', '', true, true)]
    local procedure My02OnGetReferenceData_OnAddHeaderConfigurations(var _HeaderFields: Record "MOB HeaderField Element")
    begin
        with _HeaderFields do begin
            InitConfigurationKey_HeaderFields.InitConfigurationKey('CustomPrintLabel'); // New ConfigurationKey

                    // ItemNumber by template
            Create        _HeaderFields.Create_TextField_ItemNumber(1);
            Set        _HeaderFields.Set_length(20);
            
        // LotNumber by template
            Create        _HeaderFields.Create_TextField_LotNumber(2);
            Set        _HeaderFields.Set_length(20);
        end;
    end;