...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
Use this event to
Excerpt |
---|
Populate new Item Reference prior to record being inserted. |
...
Template
// [Template]
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB Item Reference Mgt.", 'OnPostAdhocRegistrationOnItemCrossReference_OnBeforeInsertItemReference', '', true, true)]
local procedure OnPostAdhocRegistrationOnItemCrossReference_OnBeforeInsertItemReference(var _RequestValues: Record "MOB NS Request Element"; var _ItemReference: Record "Item Reference")
begin
end;
Example
// [Example]: Populate Description on new Item Reference
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB Item Reference Mgt.", 'OnPostAdhocRegistrationOnItemCrossReference_OnBeforeInsertItemReference', '', true, true)]
local procedure MyOnPostAdhocRegistrationOnItemCrossReference_OnBeforeInsertItemReference(var _RequestValues: Record "MOB NS Request Element"; var _ItemReference: Record "Item Reference")
var
RegistrationType: Text;
ItemNo: Text;
VariantCode: Text;
UoM: Text;
begin
RegistrationType := _RequestValues.GetValue('RegistrationType');
ItemNo := _RequestValues.GetValue('ItemNumber');
VariantCode := _RequestValues.GetValue('Variant');
UoM := _RequestValues.GetValue('UoM');
_ItemReference.Validate(Description, CopyStr(StrSubstNo('%1 Item: %2 Variant: %3 UoM: %4', RegistrationType, ItemNo, VariantCode, UoM), 1, MaxStrLen(_ItemReference.Description)));
end;
Filter by label (Content by label) | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
|
Version History
Version | Changes |
---|---|
MOB5.23 | Introduced |
...