Use this event to
Excerpt |
---|
Modify label data before transfer to the Cloud Print Service |
...
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB Print", 'OnPrintLabel_OnAfterPopulateDataset', '', true, true)]
local procedure OnPrintLabel_OnAfterPopulateDataset(_TemplateName: Text[50]; _SourceRecRef: RecordRef; var _Dataset: Record "MOB Common Element")
begin
end;
Expand | ||
---|---|---|
| ||
|
...
Example 1: Modify labels on Item Label
// [Example 01]
// Read the Item No. from Dataset and change it
// Making sure we only handle our own Label-Template
if _TemplateName <> 'My custom Label-Template' then
exit;
// Read the Item No. from Dataset and change it
// Item No. could have been collected or transferred from "context"/source table, where the print action was selected by the user
if _Dataset.GetValue('ItemNumber') = 'ItemA' then
_Dataset.SetValue('ItemNumber', 'ItemB');
end;
Example 2: Included Default Bin as Extrainfo
Standard Label Template Designs has extrainfo fields you can use to include new information.
...
Standard Label Template Designs has extrainfo fields you can use to include new information. // [Example 02]
// Read Source record
// Set ExtraInfo fields, their labels in dataset
Item: Record Item;
Vendor: Record Vendor;
begin
// Making sure we only handle our own Label-Template
if _TemplateName <> 'Item Label 4x6' then
exit;
// If source is "Item" = Get record from RecordRef
if _SourceRecRef.Number = database::Item then
_SourceRecRef.SetTable(Item);
// Set extrainfo fields and their labels in the Dataset
_Dataset.SetValue('ExtraInfo01_Label', 'Desc.');
_Dataset.SetValue('ExtraInfo01', Item.Description);
_Dataset.SetValue('ExtraInfo02_Label', 'GTIN');
_Dataset.SetValue('ExtraInfo02', Item.GTIN);
_Dataset.SetValue('ExtraInfo03_Label', 'Purchasing Unit');
_Dataset.SetValue('ExtraInfo03', Item."Purch. Unit of Measure");
_Dataset.SetValue('ExtraInfo04_Label', 'Vendor');
if Vendor.Get(item."Vendor No.") then
_Dataset.SetValue('ExtraInfo04', Vendor.Name);
// Additional custom values can also be used on the label
_Dataset.SetValue('CustomValueA', 'A');
_Dataset.SetValue('CustomValueB', 'B');
end;
Filter by label (Content by label) | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
|
...