[Event Request] Codeunit 1685 - OnLogMessageAsInteractionOnAfterInsertInteractionLogEntry (_Exclude_Email_Logging Extension)

[Imbapriest]

Why do you need this change?

In the old implementation of the Codeunit (CU 5064 - E-Mail Logging Dispatcher) we had a similiar event and we use that to add additional informations to the Interaction-Log Entry from the incoming Mail-Subject.

We can also do it on the OnAfterCopyFromSegment(Rec, SegLine); [Table 5065 - procedure CopyFromSegment(SegLine: Record "Segment Line") ] because then it will run to often the procedure is used by other cases.

We want to transfer our old Business Case to the new implementation of Mail-Logging Feature.

Describe the request

What we need is the following change

original Code of Codeunit 1685

            if SegmentLine.FindSet() then 
                repeat
                    NextInteractionLogEntryNo := SequenceNoMgt.GetNextSeqNo(Database::"Interaction Log Entry");
                    InsertInteractionLogEntry(SegmentLine, NextInteractionLogEntryNo);
                    EntryNumbers.Add(NextInteractionLogEntryNo);
                until SegmentLine.Next() = 0;

New Code / required integration Event

             if SegmentLine.FindSet() then
                repeat
                    NextInteractionLogEntryNo := SequenceNoMgt.GetNextSeqNo(Database::"Interaction Log Entry");
                    InsertInteractionLogEntry(SegmentLine, NextInteractionLogEntryNo);
                    OnLogMessageAsInteractionOnAfterInsertInteractionLogEntry(NextInteractionLogEntryNo, SourceEmailLoggingMessage.GetSubject())
                    EntryNumbers.Add(NextInteractionLogEntryNo);
                until SegmentLine.Next() = 0;

EVENT:

    [IntegrationEvent(false, false)]
    local procedure OnLogMessageAsInteractionOnAfterInsertInteractionLogEntry(NextInteractLogEntryNo: Integer; Subject: Text)
    begin
    end;

Internal work item: AB#610620

[JesperSchulz]

Thanks for reporting this. We agree, and we’ll publish a fix asap, either in an update for the current version or in the next major release. Please do not reply to this, as we do not monitor closed issues. If you have follow-up questions or requests, please create a new issue where you reference this one.

Build ID: 48510.