Obsolete E-Document Purchase Order Matching Copilot

Magnus Hartvig Grønbech · Copilot · Magnus Hartvig Grønbech · commit 5442028d72fe · 2026-07-17T13:24:40.000+02:00
Mark the E-Document Purchase Order Matching Copilot objects as
ObsoleteState = Pending (tag 29.0) and guard the objects and all their
references with #if not CLEAN29 so they compile out of Clean builds.

The shared "E-Document Matching Assistance" Copilot capability is left
registered because it is still used by the active AI tool import flow.

Co-authored-by: Copilot &lt;223556219+Copilot@users.noreply.github.com&gt;
diff --git a/src/Apps/W1/EDocument/App/Permissions/EDocCoreEdit.PermissionSet.al b/src/Apps/W1/EDocument/App/Permissions/EDocCoreEdit.PermissionSet.al
@@ -7,7 +7,9 @@ namespace Microsoft.eServices.EDocument;
 
 using Microsoft.eServices.EDocument.IO.Peppol;
 using Microsoft.EServices.EDocument.OrderMatch;
+#if not CLEAN29
 using Microsoft.eServices.EDocument.OrderMatch.Copilot;
+#endif
 using Microsoft.eServices.EDocument.Processing.Import;
 using Microsoft.eServices.EDocument.Processing.Import.Purchase;
 using Microsoft.EServices.EDocument.Processing.Import.Sales;
@@ -39,7 +41,9 @@ permissionset 6102 "E-Doc. Core - Edit"
         tabledata "E-Doc. Order Match" = IMD,
         tabledata "Service Participant" = IMD,
         tabledata "E-Doc. Import Parameters" = IMD,
+#if not CLEAN29
         tabledata "E-Doc. PO Match Prop. Buffer" = IMD,
+#endif
         tabledata "E-Document Header Mapping" = IMD,
         tabledata "E-Document Line Mapping" = IMD,
         tabledata "E-Document Purchase Header" = IMD,
diff --git a/src/Apps/W1/EDocument/App/Permissions/EDocCoreObjects.PermissionSet.al b/src/Apps/W1/EDocument/App/Permissions/EDocCoreObjects.PermissionSet.al
@@ -12,7 +12,9 @@ using Microsoft.eServices.EDocument.Integration.Send;
 using Microsoft.eServices.EDocument.IO;
 using Microsoft.eServices.EDocument.IO.Peppol;
 using Microsoft.EServices.EDocument.OrderMatch;
+#if not CLEAN29
 using Microsoft.EServices.EDocument.OrderMatch.Copilot;
+#endif
 using Microsoft.eServices.EDocument.Processing.Import;
 using Microsoft.eServices.EDocument.Processing.Import.Purchase;
 using Microsoft.EServices.EDocument.Processing.Import.Sales;
@@ -37,7 +39,9 @@ permissionset 6100 "E-Doc. Core - Objects"
         table "E-Doc. Service Supported Type" = X,
         table "E-Doc. Order Match" = X,
         table "E-Doc. Imported Line" = X,
+#if not CLEAN29
         table "E-Doc. PO Match Prop. Buffer" = X,
+#endif
         table "Service Participant" = X,
         table "E-Doc. Import Parameters" = X,
         table "E-Document Header Mapping" = X,
@@ -91,8 +95,10 @@ permissionset 6100 "E-Doc. Core - Objects"
         codeunit "Pre-Map Service Inv. Line" = X,
         codeunit "EDoc PEPPOL BIS 3.0" = X,
         codeunit "E-Doc. Line Matching" = X,
+#if not CLEAN29
         codeunit "E-Doc. PO AOAI Function" = X,
         codeunit "E-Doc. PO Copilot Matching" = X,
+#endif
         codeunit "E-Doc. Attachment Processor" = X,
         codeunit "Service Participant" = X,
         page "E-Doc. Changes Part" = X,
@@ -114,8 +120,10 @@ permissionset 6100 "E-Doc. Core - Objects"
         page "E-Doc. Purchase Order Sub" = X,
         page "E-Doc. Order Map. Activities" = X,
         page "E-Doc Service Supported Types" = X,
+#if not CLEAN29
         page "E-Doc. PO Copilot Prop" = X,
         page "E-Doc. PO Match Prop. Sub" = X,
+#endif
         page "E-Doc. Order Match Act." = X,
         page "E-Doc. Select PO Lines" = X,
         page "E-Doc. Select Receipt Lines" = X,
diff --git a/src/Apps/W1/EDocument/App/Permissions/EDocCoreRead.PermissionSet.al b/src/Apps/W1/EDocument/App/Permissions/EDocCoreRead.PermissionSet.al
@@ -6,7 +6,9 @@ namespace Microsoft.eServices.EDocument;
 
 using Microsoft.eServices.EDocument.IO.Peppol;
 using Microsoft.EServices.EDocument.OrderMatch;
+#if not CLEAN29
 using Microsoft.eServices.EDocument.OrderMatch.Copilot;
+#endif
 using Microsoft.eServices.EDocument.Processing;
 using Microsoft.eServices.EDocument.Processing.Import;
 using Microsoft.eServices.EDocument.Processing.Import.Purchase;
@@ -35,7 +37,9 @@ permissionset 6101 "E-Doc. Core - Read"
     #endregion Logging
         tabledata "E-Doc. Imported Line" = R,
         tabledata "E-Doc. Order Match" = R,
+#if not CLEAN29
         tabledata "E-Doc. PO Match Prop. Buffer" = R,
+#endif
     #region Service
         tabledata "E-Document Service" = R,
         tabledata "E-Doc. Service Data Exch. Def." = R,
diff --git a/src/Apps/W1/EDocument/App/Permissions/EDocCoreUser.PermissionSet.al b/src/Apps/W1/EDocument/App/Permissions/EDocCoreUser.PermissionSet.al
@@ -6,7 +6,9 @@ namespace Microsoft.eServices.EDocument;
 
 using Microsoft.eServices.EDocument.IO.Peppol;
 using Microsoft.eServices.EDocument.OrderMatch;
+#if not CLEAN29
 using Microsoft.eServices.EDocument.OrderMatch.Copilot;
+#endif
 using Microsoft.eServices.EDocument.Processing;
 using Microsoft.eServices.EDocument.Processing.Import;
 using Microsoft.eServices.EDocument.Processing.Import.Purchase;
@@ -41,7 +43,9 @@ permissionset 6105 "E-Doc. Core - User"
     #endregion Logging
         tabledata "E-Doc. Imported Line" = IMD,
         tabledata "E-Doc. Order Match" = IMD,
+#if not CLEAN29
         tabledata "E-Doc. PO Match Prop. Buffer" = IMD,
+#endif
         tabledata "Service Participant" = IMD,
     #region Purchase draft
         tabledata "E-Doc. Import Parameters" = IMD,
diff --git a/src/Apps/W1/EDocument/App/src/Document/EDocument.Page.al b/src/Apps/W1/EDocument/App/src/Document/EDocument.Page.al
@@ -8,7 +8,9 @@ using Microsoft.Bank.Reconciliation;
 using Microsoft.eServices.EDocument.Integration.Receive;
 using Microsoft.eServices.EDocument.Integration.Send;
 using Microsoft.eServices.EDocument.OrderMatch;
+#if not CLEAN29
 using Microsoft.eServices.EDocument.OrderMatch.Copilot;
+#endif
 using Microsoft.eServices.EDocument.Processing.Import;
 using Microsoft.eServices.EDocument.Processing.Import.Purchase;
 using Microsoft.eServices.EDocument.Service;
@@ -599,8 +601,10 @@ page 6121 "E-Document"
         EDocService: Record "E-Document Service";
         EDocServiceStatus2: Record "E-Document Service Status";
         EDocLog: Codeunit "E-Document Log";
+#if not CLEAN29
         FeatureTelemetry: Codeunit "Feature Telemetry";
         EDocPOCopilotMatching: Codeunit "E-Doc. PO Copilot Matching";
+#endif
     begin
         if not IsIncomingDoc then
             exit;
@@ -610,7 +614,9 @@ page 6121 "E-Document"
             EDocServiceStatus2.Get(Rec."Entry No", EDocService.Code);
             ShowMapToOrder := EDocServiceStatus2.Status = Enum::"E-Document Service Status"::"Order Linked";
             ShowRelink := true;
+#if not CLEAN29
             FeatureTelemetry.LogUptake('0000MMK', EDocPOCopilotMatching.FeatureName(), Enum::"Feature Uptake Status"::Discovered);
+#endif
         end;
     end;
 
diff --git a/src/Apps/W1/EDocument/App/src/EDocumentInstall.Codeunit.al b/src/Apps/W1/EDocument/App/src/EDocumentInstall.Codeunit.al
@@ -4,7 +4,9 @@
 // ------------------------------------------------------------------------------------------------
 namespace Microsoft.eServices.EDocument.IO;
 
+#if not CLEAN29
 using Microsoft.eServices.EDocument.OrderMatch.Copilot;
+#endif
 using System.IO;
 using System.Reflection;
 using System.Upgrade;
@@ -21,12 +23,14 @@ codeunit 6161 "E-Document Install"
         InsertDataExchV2();
     end;
 
+#if not CLEAN29
     trigger OnInstallAppPerDatabase()
     var
         EDocAIMatching: Codeunit "E-Doc. PO Copilot Matching";
     begin
         EDocAIMatching.RegisterAICapability();
     end;
+#endif
 
     internal procedure InsertDataExch()
     var
diff --git a/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/Copilot/EDocPOAOAIFunction.Codeunit.al b/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/Copilot/EDocPOAOAIFunction.Codeunit.al
@@ -1,9 +1,13 @@
+#if not CLEAN29
 #pragma warning disable AA0247
 codeunit 6167 "E-Doc. PO AOAI Function" implements "AOAI Function"
 {
     Access = Internal;
     InherentPermissions = X;
     InherentEntitlements = X;
+    ObsoleteState = Pending;
+    ObsoleteReason = 'The E-Document Purchase Order Matching Copilot has been deprecated.';
+    ObsoleteTag = '29.0';
 
     [NonDebuggable]
     procedure GetPrompt() Prompt: JsonObject
@@ -89,3 +93,4 @@ codeunit 6167 "E-Doc. PO AOAI Function" implements "AOAI Function"
         MatchLineTxt: Label 'Matched to Purchase Order Line %1', Comment = '%1 = Number of the order line that the E-Document line is matched to';
         FailedToGetPromptSecretErr: Label 'Failed to get the prompt secret from Azure Key Vault', Locked = true;
 }
+#endif
diff --git a/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/Copilot/EDocPOCopilotMatching.Codeunit.al b/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/Copilot/EDocPOCopilotMatching.Codeunit.al
@@ -1,3 +1,4 @@
+#if not CLEAN29
 namespace Microsoft.eServices.EDocument.OrderMatch.Copilot;
 
 using Microsoft.eServices.EDocument;
@@ -14,6 +15,9 @@ codeunit 6163 "E-Doc. PO Copilot Matching"
     Access = Internal;
     InherentPermissions = X;
     InherentEntitlements = X;
+    ObsoleteState = Pending;
+    ObsoleteReason = 'The E-Document Purchase Order Matching Copilot has been deprecated.';
+    ObsoleteTag = '29.0';
 
     var
         EDocAIMatchingFunction: Codeunit "E-Doc. PO AOAI Function";
@@ -329,3 +333,4 @@ codeunit 6163 "E-Doc. PO Copilot Matching"
         RegisterAICapability();
     end;
 }
+#endif
diff --git a/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/Copilot/EDocPOCopilotProp.Page.al b/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/Copilot/EDocPOCopilotProp.Page.al
@@ -1,3 +1,4 @@
+#if not CLEAN29
 namespace Microsoft.eServices.EDocument.OrderMatch.Copilot;
 
 using Microsoft.eServices.EDocument;
@@ -18,6 +19,9 @@ page 6166 "E-Doc. PO Copilot Prop"
     InherentPermissions = X;
     InherentEntitlements = X;
     ContextSensitiveHelpPage = 'map-edocuments-with-copilot';
+    ObsoleteState = Pending;
+    ObsoleteReason = 'The E-Document Purchase Order Matching Copilot has been deprecated.';
+    ObsoleteTag = '29.0';
 
     layout
     {
@@ -331,4 +335,5 @@ page 6166 "E-Doc. PO Copilot Prop"
 
         CurrPage.ProposalDetails.Page.Load(TempAIProposalBuffer, TempLocalEDocOrderMatches);
     end;
-}
+}
+#endif
diff --git a/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/Copilot/EDocPOMatchPropBuffer.Table.al b/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/Copilot/EDocPOMatchPropBuffer.Table.al
@@ -1,3 +1,4 @@
+#if not CLEAN29
 namespace Microsoft.EServices.EDocument.OrderMatch.Copilot;
 
 using Microsoft.eServices.EDocument;
@@ -13,6 +14,9 @@ table 6163 "E-Doc. PO Match Prop. Buffer"
     InherentPermissions = X;
     InherentEntitlements = X;
     DataClassification = CustomerContent;
+    ObsoleteState = Pending;
+    ObsoleteReason = 'The E-Document Purchase Order Matching Copilot has been deprecated.';
+    ObsoleteTag = '29.0';
 
 #pragma warning disable AA0473
     fields
@@ -106,3 +110,4 @@ table 6163 "E-Doc. PO Match Prop. Buffer"
     end;
 
 }
+#endif
diff --git a/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/Copilot/EDocPOMatchPropSub.Page.al b/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/Copilot/EDocPOMatchPropSub.Page.al
@@ -1,3 +1,4 @@
+#if not CLEAN29
 namespace Microsoft.eServices.EDocument.OrderMatch.Copilot;
 
 using Microsoft.eServices.EDocument.OrderMatch;
@@ -15,6 +16,9 @@ page 6163 "E-Doc. PO Match Prop. Sub"
     InsertAllowed = false;
     InherentPermissions = X;
     InherentEntitlements = X;
+    ObsoleteState = Pending;
+    ObsoleteReason = 'The E-Document Purchase Order Matching Copilot has been deprecated.';
+    ObsoleteTag = '29.0';
 
     layout
     {
@@ -119,3 +123,4 @@ page 6163 "E-Doc. PO Match Prop. Sub"
         TempEDocOrderMatches.Reset();
     end;
 }
+#endif
diff --git a/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/EDocOrderLineMatching.Page.al b/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/EDocOrderLineMatching.Page.al
@@ -1,7 +1,9 @@
 namespace Microsoft.eServices.EDocument.OrderMatch;
 
 using Microsoft.eServices.EDocument;
+#if not CLEAN29
 using Microsoft.eServices.EDocument.OrderMatch.Copilot;
+#endif
 using Microsoft.Purchases.Document;
 using System.AI;
 using System.Telemetry;
@@ -165,6 +167,7 @@ page 6167 "E-Doc. Order Line Matching"
         }
         area(Prompting)
         {
+#if not CLEAN29
             action(MatchCopilot)
             {
                 Caption = 'Match with Copilot';
@@ -178,6 +181,7 @@ page 6167 "E-Doc. Order Line Matching"
                     SetUserInteractions();
                 end;
             }
+#endif
         }
         area(Navigation)
         {
@@ -203,7 +207,9 @@ page 6167 "E-Doc. Order Line Matching"
             }
             group(Matching)
             {
+#if not CLEAN29
                 actionref(MatchCopilot_Promoted; MatchCopilot) { }
+#endif
                 actionref(MatchManual_Promoted; MatchManual) { }
                 actionref(MatchAuto_Promoted; MatchAutomatic) { }
                 actionref(RemoveMatch_Promoted; RemoveMatch) { }
@@ -218,12 +224,16 @@ page 6167 "E-Doc. Order Line Matching"
     }
 
     var
+#if not CLEAN29
         FeatureTelemetry: Codeunit "Feature Telemetry";
+#endif
         EDocMatchOrderLines: Codeunit "E-Doc. Line Matching";
         CostNotification: Notification;
         AutoRunCopilot: Boolean;
         LineCostVaryMatchMsg: Label 'Matched e-document lines (%1) has cost different from matched purchase order line. Please verify matches are correct.', Comment = '%1 - Line number';
+#if not CLEAN29
         NoMatchesFoundMsg: Label 'Copilot could not find any line matches. Please review manually';
+#endif
         GlobalDataCaptionExpressionTxt: Label 'Purchase Order %1', Comment = '%1 - Purchase order number';
 
     trigger OnAfterGetRecord()
@@ -236,12 +246,14 @@ page 6167 "E-Doc. Order Line Matching"
 
         OpenPurchaseHeader();
 
+#if not CLEAN29
         if AutoRunCopilot then begin
             AutoRunCopilot := false;
             EDocOrderMatch.SetRange("E-Document Entry No.", Rec."Entry No");
             if EDocOrderMatch.IsEmpty() then
                 MatchWithCopilot(false);
         end;
+#endif
     end;
 
     local procedure OpenPurchaseHeader()
@@ -313,6 +325,7 @@ page 6167 "E-Doc. Order Line Matching"
         end;
     end;
 
+#if not CLEAN29
     local procedure MatchWithCopilot(CheckToOverwrite: Boolean)
     var
         TempEDocImportedLines: Record "E-Doc. Imported Line" temporary;
@@ -342,6 +355,7 @@ page 6167 "E-Doc. Order Line Matching"
 
         CurrPage.Update();
     end;
+#endif
 
     local procedure SetUserInteractions()
     begin
diff --git a/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/EDocOrderMatch.Table.al b/src/Apps/W1/EDocument/App/src/Processing/OrderMatching/EDocOrderMatch.Table.al
@@ -1,7 +1,9 @@
 namespace Microsoft.eServices.EDocument.OrderMatch;
 
 using Microsoft.eServices.EDocument;
+#if not CLEAN29
 using Microsoft.eServices.EDocument.OrderMatch.Copilot;
+#endif
 using Microsoft.Purchases.Document;
 
 table 6164 "E-Doc. Order Match"
@@ -110,6 +112,7 @@ table 6164 "E-Doc. Order Match"
         ImportedLine.Get(Rec."E-Document Entry No.", Rec."E-Document Line No.");
     end;
 
+#if not CLEAN29
     procedure InsertMatch(var TempAIProposalBuffer: Record "E-Doc. PO Match Prop. Buffer" temporary; var TempEDocMatches: Record "E-Doc. Order Match" temporary)
     begin
         TempEDocMatches.Init();
@@ -125,6 +128,7 @@ table 6164 "E-Doc. Order Match"
         TempEDocMatches."PO Description" := TempAIProposalBuffer."PO Description";
         TempEDocMatches.Insert();
     end;
+#endif
 
 
 }
diff --git a/src/Apps/W1/EDocument/Test/src/Copilot/EDocCopilotPOAccuracy.Codeunit.al b/src/Apps/W1/EDocument/Test/src/Copilot/EDocCopilotPOAccuracy.Codeunit.al
@@ -1,3 +1,4 @@
+#if not CLEAN29
 namespace Microsoft.Sales.Document.Test;
 
 using Microsoft.eServices.EDocument;
@@ -160,3 +161,4 @@ codeunit 133502 EDocCopilotPOAccuracy
 
     end;
 }
+#endif
diff --git a/src/Apps/W1/EDocument/Test/src/Copilot/EDocCopilotPOGeneralHarms.Codeunit.al b/src/Apps/W1/EDocument/Test/src/Copilot/EDocCopilotPOGeneralHarms.Codeunit.al
@@ -1,3 +1,4 @@
+#if not CLEAN29
 namespace Microsoft.Sales.Document.Test;
 
 using Microsoft.eServices.EDocument;
@@ -118,3 +119,4 @@ codeunit 133528 EDocCopilotPOGeneralHarms
     end;
 
 }
+#endif
diff --git a/src/Apps/W1/EDocument/Test/src/Copilot/EDocCopilotPORedTeaming.Codeunit.al b/src/Apps/W1/EDocument/Test/src/Copilot/EDocCopilotPORedTeaming.Codeunit.al
diff --git a/src/Apps/W1/EDocument/Test/src/Copilot/EDocCopilotPOUPIAHarms.Codeunit.al b/src/Apps/W1/EDocument/Test/src/Copilot/EDocCopilotPOUPIAHarms.Codeunit.al
