[Event Request] - Codeunit Email Scenario Attach Impl - OnAfterInsertEmailAttachments

[DanielHaglo]

Describe the request

local procedure InsertEmailAttachments(EmailScenarioAttachments: Record "Email Scenario Attachments"; var EmailAttachment: Record "Email Attachments"; EmailScenario: Integer)
begin
EmailAttachment.Id := EmailScenarioAttachments.Id;
EmailAttachment."Attachment Name" := EmailScenarioAttachments."Attachment Name";
EmailAttachment."Email Attachment" := EmailScenarioAttachments."Email Attachment";
EmailAttachment.AttachmentDefaultStatus := EmailScenarioAttachments.AttachmentDefaultStatus;
EmailAttachment.Scenario := Enum::"Email Scenario".FromInteger(EmailScenario);
//NewEvent
OnInsertEmailAttachmentsOnBeforeEmailAttachmentInsert(EmailAttachment,EmailScenarioAttachments);
//newevent
EmailAttachment.Insert();
end;

[IntegrationEvent(false, false)]
local procedure OnInsertEmailAttachmentsOnBeforeEmailAttachmentInsert(var EmailAttachment: Record "Email Attachments";EmailScenarioAttachments: Record "Email Scenario Attachments")
begin
end;

Additional context

there is no init on EmailAttachment record, therefor we need an event to clear values because we have fields on this record.
When in page, the EmailAttachment-variable will adopt fields from the record the user is currently on
Internal work item: AB#561285