Skip to end of metadata
Go to start of metadata

You are viewing an old version of this page. View the current version.

Compare with Current View Page History

« Previous Version 22 Next »

Use this event to

Change the data on the selected label just before it is sent to the Cloud Print Service

  • Make sure you are only handling the desired template.
  • Use GetValue/SetValue to modify the dataset


See also:

Standard Label Designs


Template

    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB Print"'OnPrintLabel_OnAfterPopulateDataset''', true, true)]
    procedure OnPrintLabel_OnAfterPopulateDataset(_TemplateName: Text_SourceRecRefRecordRefvar _DatasetRecord "MOB Common Element" temporary)
    begin
    end;

 

Example 1: Modify labels on Item Label


    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB Print", 'OnPrintLabel_OnAfterPopulateDataset''', true, true)]
    procedure Ex02OnPrintLabel_OnAfterPopulateDataset(_TemplateName: Text[50]; _SourceRecRef: RecordRefvar _Dataset: Record "MOB Common Element")
    begin

        // Making sure we only handle our own Label-Template
        if _TemplateName <> 'Item Label 4x6' then
            exit;

        // Modify labels
        _Dataset.SetValue('UnitOfMeasure_Label''Units');
        _Dataset.SetValue('LotNumber_Label''Batch No. ');
    end;


Example 2: Set extra info fields and their labels


    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB Print", 'OnPrintLabel_OnAfterPopulateDataset''', true, true)]
    procedure Ex03OnPrintLabel_OnAfterPopulateDataset(_TemplateName: Text[50]; _SourceRecRef: RecordRefvar _Dataset: Record "MOB Common Element")
    begin

        // Making sure we only handle our own Label-Template
        if _TemplateName <> 'Item Label 4x6' then
            exit;

        // Set extra info fields and their labels
        _Dataset.SetValue('ExtraInfo01''ExtraInfo01_Value');
        _Dataset.SetValue('ExtraInfo01_Label''ExtraInfo01_Label');

        _Dataset.SetValue('ExtraInfo02''ExtraInfo02_Value');
        _Dataset.SetValue('ExtraInfo02_Label''ExtraInfo02_Label');

        _Dataset.SetValue('ExtraInfo03''ExtraInfo03_Value');
        _Dataset.SetValue('ExtraInfo03_Label''ExtraInfo03_Label');

        _Dataset.SetValue('ExtraInfo04''ExtraInfo04_Value');
        _Dataset.SetValue('ExtraInfo04_Label''ExtraInfo04_Label');
    end;


More examples

  


Version History

VersionChanges
MOB5.16Introduced



  • No labels