Use this event to
...
// [Template]
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB Item Reference Mgt.", 'OnPostAdhocRegistrationOnItemReferenceOnPostAdhocRegistrationOnItemCrossReference_OnBeforeInsertItemReference', '', true, true)]
local procedure OnPostAdhocRegistrationOnItemReference 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.", 'OnPostAdhocRegistrationOnItemReferenceOnPostAdhocRegistrationOnItemCrossReference_OnBeforeInsertItemReference', '', true, true)]
local procedure MyOnPostAdhocRegistrationOnItemReference 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) | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
|
...