Skip to content

[E-Documents Core] - Events for attaching E-Documents when using Digital Vouchers #7006

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Open
GMatuleviciute wants to merge 3 commits into
base: main
Choose a base branch
from
+13 −1
Open

[E-Documents Core] - Events for attaching E-Documents when using Digital Vouchers #7006

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
3 commits
Select commit Hold shift + click to select a range
82553cb
Adds integration events for E-Document export and update
AndriusAndrulevicius Feb 24, 2026
279035e
Add Enforced Digital Vouchers as a dependency in app.json
AndriusAndrulevicius Feb 27, 2026
7acb313
Removed Enforced Digital Vouchers dependancy
GMatuleviciute Mar 4, 2026
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
6 changes: 6 additions & 0 deletions src/Apps/W1/EDocument/App/src/Processing/EDocExport.Codeunit.al
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -167,6 +167,7 @@ codeunit 6102 "E-Doc. Export"
ErrorCount := EDocumentErrorHelper.ErrorMessageCount(EDocument);
CreateEDocument(EDocumentService, EDocument, SourceDocumentHeaderMapped, SourceDocumentLineMapped, TempBlob);
Success := EDocumentErrorHelper.ErrorMessageCount(EDocument) = ErrorCount;
OnExportEDocumentAfterCreateEDocument(EDocumentService, EDocument, SourceDocumentHeaderMapped, SourceDocumentLineMapped, TempBlob, Success);
if Success then
EDocServiceStatus := Enum::"E-Document Service Status"::Exported
else
Expand Down Expand Up @@ -530,4 +531,9 @@ codeunit 6102 "E-Doc. Export"
local procedure OnAfterCreateEDocument(var EDocument: Record "E-Document"; var SourceDocumentHeader: RecordRef)
begin
end;

[IntegrationEvent(false, false)]
local procedure OnExportEDocumentAfterCreateEDocument(EDocumentService: Record "E-Document Service"; EDocument: Record "E-Document"; SourceDocumentHeaderMapped: RecordRef; SourceDocumentLineMapped: RecordRef; var TempBlob: Codeunit "Temp Blob"; Success: Boolean)
begin
end;
}
8 changes: 7 additions & 1 deletion src/Apps/W1/EDocument/App/src/Processing/EDocumentSubscribers.Codeunit.al
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -573,7 +573,9 @@ codeunit 6103 "E-Document Subscribers"
EDocument."Document Type" := DocumentType;
EDocument.Status := Enum::"E-Document Status"::Processed;
EDocument.Modify(true);


OnAfterUpdateToPostedPurchaseEDocument(EDocument, PostedRecord, PostedDocumentNo, DocumentType);

EDocService := EDocumentLog.GetLastServiceFromLog(EDocument);
EDocLogHelper.InsertLog(EDocument, EDocService, Enum::"E-Document Service Status"::"Imported Document Created");
end;
Expand Down Expand Up @@ -632,4 +634,8 @@ codeunit 6103 "E-Document Subscribers"
Telemetry.LogMessage('0000PYF', DraftChangeTok, Verbosity::Normal, DataClassification::SystemMetadata, TelemetryScope::All, TelemetryDimensions);
end;

[IntegrationEvent(false, false)]
local procedure OnAfterUpdateToPostedPurchaseEDocument(var EDocument: Record "E-Document"; PostedRecord: Variant; PostedDocumentNo: Code[20]; DocumentType: Enum "E-Document Type")
begin
end;
}
Loading