From 4cb42fc8740f88918035adb2d8a926fa89f6bd43 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:38:17 +0000 Subject: [PATCH 01/38] Initial plan From 13638971a3e96e39abc53e88772f42acee34f14f Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:42:02 +0000 Subject: [PATCH 02/38] Add sell-to flowfields for production analysis Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- .../PVSProductionAnalysisSellTo.TableExt.al | 22 +++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 Prototyping/PVSProductionAnalysisSellTo.TableExt.al diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al new file mode 100644 index 0000000..1cc7ce6 --- /dev/null +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -0,0 +1,22 @@ +tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Production Analysis" +{ + fields + { + field(50100; "Sell-to No."; Code[20]) + { + CalcFormula = lookup("PVS Case"."Sell-To No." where("Order No." = field("PrintVis Order No."))); + Caption = 'Sell-to No.'; + DataClassification = CustomerContent; + Editable = false; + FieldClass = FlowField; + } + field(50101; "Sell-to Name"; Text[100]) + { + CalcFormula = lookup("PVS Case"."Sell-To Name" where("Order No." = field("PrintVis Order No."))); + Caption = 'Sell-to Name'; + DataClassification = CustomerContent; + Editable = false; + FieldClass = FlowField; + } + } +} From ddb271deb2d038dbf171b63db50369a1661e975a Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:43:40 +0000 Subject: [PATCH 03/38] Populate production analysis sell-to fields safely Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- .../PVSProductionAnalysisInstall.Codeunit.al | 23 ++++++++++ .../PVSProductionAnalysisSellTo.Codeunit.al | 46 +++++++++++++++++++ .../PVSProductionAnalysisSellTo.TableExt.al | 6 --- .../PVSProductionAnalysisUpgrade.Codeunit.al | 23 ++++++++++ Prototyping/app.json | 2 +- 5 files changed, 93 insertions(+), 7 deletions(-) create mode 100644 Prototyping/PVSProductionAnalysisInstall.Codeunit.al create mode 100644 Prototyping/PVSProductionAnalysisSellTo.Codeunit.al create mode 100644 Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al diff --git a/Prototyping/PVSProductionAnalysisInstall.Codeunit.al b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al new file mode 100644 index 0000000..5f619a7 --- /dev/null +++ b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al @@ -0,0 +1,23 @@ +codeunit 50102 "PVS Prod. Analysis Install" +{ + Subtype = Install; + + trigger OnInstallAppPerCompany() + begin + BackfillSellToFields(); + end; + + local procedure BackfillSellToFields() + var + ProductionAnalysis: Record "PrintVis Production Analysis"; + ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; + begin + if not ProductionAnalysis.FindSet() then + exit; + + repeat + if ProductionAnalysisSellTo.SyncSellToFields(ProductionAnalysis) then + ProductionAnalysis.Modify(false); + until ProductionAnalysis.Next() = 0; + end; +} diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al new file mode 100644 index 0000000..1cbe94e --- /dev/null +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -0,0 +1,46 @@ +codeunit 50101 "PVS Prod. Analysis SellTo" +{ + [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeInsertEvent', '', false, false)] + local procedure OnBeforeInsertProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) + begin + SyncSellToFields(Rec); + end; + + [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeModifyEvent', '', false, false)] + local procedure OnBeforeModifyProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) + begin + SyncSellToFields(Rec); + end; + + procedure SyncSellToFields(var ProductionAnalysis: Record "PrintVis Production Analysis"): Boolean + var + PVSCase: Record "PVS Case"; + SellToNo: Code[20]; + SellToName: Text[100]; + begin + if FindUniqueCaseByOrderNo(ProductionAnalysis."PrintVis Order No.", PVSCase) then begin + SellToNo := PVSCase."Sell-To No."; + SellToName := PVSCase."Sell-To Name"; + end; + + if (ProductionAnalysis."Sell-to No." = SellToNo) and (ProductionAnalysis."Sell-to Name" = SellToName) then + exit(false); + + ProductionAnalysis."Sell-to No." := SellToNo; + ProductionAnalysis."Sell-to Name" := SellToName; + exit(true); + end; + + local procedure FindUniqueCaseByOrderNo(PrintVisOrderNo: Code[20]; var PVSCase: Record "PVS Case"): Boolean + begin + if PrintVisOrderNo = '' then + exit(false); + + PVSCase.SetCurrentKey("Order No."); + PVSCase.SetRange("Order No.", PrintVisOrderNo); + if not PVSCase.FindFirst() then + exit(false); + + exit(PVSCase.Next() = 0); + end; +} diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index 1cc7ce6..14e644a 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -4,19 +4,13 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Producti { field(50100; "Sell-to No."; Code[20]) { - CalcFormula = lookup("PVS Case"."Sell-To No." where("Order No." = field("PrintVis Order No."))); Caption = 'Sell-to No.'; DataClassification = CustomerContent; - Editable = false; - FieldClass = FlowField; } field(50101; "Sell-to Name"; Text[100]) { - CalcFormula = lookup("PVS Case"."Sell-To Name" where("Order No." = field("PrintVis Order No."))); Caption = 'Sell-to Name'; DataClassification = CustomerContent; - Editable = false; - FieldClass = FlowField; } } } diff --git a/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al b/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al new file mode 100644 index 0000000..eeaadb1 --- /dev/null +++ b/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al @@ -0,0 +1,23 @@ +codeunit 50103 "PVS Prod. Analysis Upgrade" +{ + Subtype = Upgrade; + + trigger OnUpgradePerCompany() + begin + BackfillSellToFields(); + end; + + local procedure BackfillSellToFields() + var + ProductionAnalysis: Record "PrintVis Production Analysis"; + ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; + begin + if not ProductionAnalysis.FindSet() then + exit; + + repeat + if ProductionAnalysisSellTo.SyncSellToFields(ProductionAnalysis) then + ProductionAnalysis.Modify(false); + until ProductionAnalysis.Next() = 0; + end; +} diff --git a/Prototyping/app.json b/Prototyping/app.json index 1e78a2d..cc23142 100644 --- a/Prototyping/app.json +++ b/Prototyping/app.json @@ -2,7 +2,7 @@ "id": "b7d23e82-11ae-4172-9289-6e9584df4759", "name": "Prototyping", "publisher": "PrintVis", - "version": "1.0.0.0", + "version": "1.0.0.1", "brief": "", "description": "", "privacyStatement": "", From 5cc846be285593ef888d06397743af46d30c3ee1 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:44:56 +0000 Subject: [PATCH 04/38] Refine production analysis order uniqueness check Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 1cbe94e..ca262d5 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -38,9 +38,9 @@ codeunit 50101 "PVS Prod. Analysis SellTo" PVSCase.SetCurrentKey("Order No."); PVSCase.SetRange("Order No.", PrintVisOrderNo); - if not PVSCase.FindFirst() then + if PVSCase.Count <> 1 then exit(false); - exit(PVSCase.Next() = 0); + exit(PVSCase.FindFirst()); end; } From 791898c4f1b10b00aae051b0c2599c78a009aad8 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:45:27 +0000 Subject: [PATCH 05/38] Optimize sell-to case uniqueness detection Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index ca262d5..a307b0d 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -32,15 +32,23 @@ codeunit 50101 "PVS Prod. Analysis SellTo" end; local procedure FindUniqueCaseByOrderNo(PrintVisOrderNo: Code[20]; var PVSCase: Record "PVS Case"): Boolean + var + MatchCount: Integer; begin if PrintVisOrderNo = '' then exit(false); PVSCase.SetCurrentKey("Order No."); PVSCase.SetRange("Order No.", PrintVisOrderNo); - if PVSCase.Count <> 1 then + if not PVSCase.FindSet() then exit(false); + repeat + MatchCount += 1; + if MatchCount > 1 then + exit(false); + until PVSCase.Next() = 0; + exit(PVSCase.FindFirst()); end; } From 989f8dafec40639275aca7e07f72b68268425a98 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:46:02 +0000 Subject: [PATCH 06/38] Guard production analysis sell-to sync on order changes Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- .../PVSProductionAnalysisSellTo.Codeunit.al | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index a307b0d..842852a 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -9,6 +9,9 @@ codeunit 50101 "PVS Prod. Analysis SellTo" [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeModifyEvent', '', false, false)] local procedure OnBeforeModifyProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) begin + if Rec."PrintVis Order No." = xRec."PrintVis Order No." then + exit; + SyncSellToFields(Rec); end; @@ -33,7 +36,7 @@ codeunit 50101 "PVS Prod. Analysis SellTo" local procedure FindUniqueCaseByOrderNo(PrintVisOrderNo: Code[20]; var PVSCase: Record "PVS Case"): Boolean var - MatchCount: Integer; + FirstPVSCase: Record "PVS Case"; begin if PrintVisOrderNo = '' then exit(false); @@ -43,12 +46,11 @@ codeunit 50101 "PVS Prod. Analysis SellTo" if not PVSCase.FindSet() then exit(false); - repeat - MatchCount += 1; - if MatchCount > 1 then - exit(false); - until PVSCase.Next() = 0; + FirstPVSCase := PVSCase; + if PVSCase.Next() <> 0 then + exit(false); - exit(PVSCase.FindFirst()); + PVSCase := FirstPVSCase; + exit(true); end; } From 15555ce3838c791b1afb3b6e6dd1a5b314bf5b05 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:46:32 +0000 Subject: [PATCH 07/38] Refresh sell-to sync on production analysis edits Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 842852a..69dfcb8 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -9,7 +9,8 @@ codeunit 50101 "PVS Prod. Analysis SellTo" [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeModifyEvent', '', false, false)] local procedure OnBeforeModifyProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) begin - if Rec."PrintVis Order No." = xRec."PrintVis Order No." then + if (Rec."PrintVis Order No." = xRec."PrintVis Order No.") and + ((Rec."Sell-to No." <> xRec."Sell-to No.") or (Rec."Sell-to Name" <> xRec."Sell-to Name")) then exit; SyncSellToFields(Rec); From e49da305e12638a79ce502bb278ceb840a43ead2 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:47:22 +0000 Subject: [PATCH 08/38] Gate install backfill and tighten case lookup Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisInstall.Codeunit.al | 6 ++++++ Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 6 +++++- 2 files changed, 11 insertions(+), 1 deletion(-) diff --git a/Prototyping/PVSProductionAnalysisInstall.Codeunit.al b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al index 5f619a7..14ee030 100644 --- a/Prototyping/PVSProductionAnalysisInstall.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al @@ -3,7 +3,13 @@ codeunit 50102 "PVS Prod. Analysis Install" Subtype = Install; trigger OnInstallAppPerCompany() + var + AppInfo: ModuleInfo; begin + NavApp.GetCurrentModuleInfo(AppInfo); + if AppInfo.DataVersion() <> Version.Create('0.0.0.0') then + exit; + BackfillSellToFields(); end; diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 69dfcb8..55e95d8 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -48,7 +48,11 @@ codeunit 50101 "PVS Prod. Analysis SellTo" exit(false); FirstPVSCase := PVSCase; - if PVSCase.Next() <> 0 then + PVSCase.Reset(); + PVSCase.SetCurrentKey("Order No."); + PVSCase.SetRange("Order No.", PrintVisOrderNo); + PVSCase.SetFilter(SystemId, '<>%1', FirstPVSCase.SystemId); + if PVSCase.FindFirst() then exit(false); PVSCase := FirstPVSCase; From ae7388bff29bc685cfd44e35b2482759886169a0 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:47:47 +0000 Subject: [PATCH 09/38] Simplify sell-to unique case lookup Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 55e95d8..c94741c 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -44,15 +44,11 @@ codeunit 50101 "PVS Prod. Analysis SellTo" PVSCase.SetCurrentKey("Order No."); PVSCase.SetRange("Order No.", PrintVisOrderNo); - if not PVSCase.FindSet() then + if not PVSCase.FindFirst() then exit(false); FirstPVSCase := PVSCase; - PVSCase.Reset(); - PVSCase.SetCurrentKey("Order No."); - PVSCase.SetRange("Order No.", PrintVisOrderNo); - PVSCase.SetFilter(SystemId, '<>%1', FirstPVSCase.SystemId); - if PVSCase.FindFirst() then + if PVSCase.Next() <> 0 then exit(false); PVSCase := FirstPVSCase; From f6274dcdfca714da1a738e8b6f6fe5a8aae29838 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:48:14 +0000 Subject: [PATCH 10/38] Always resync production analysis sell-to fields Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 4 ---- 1 file changed, 4 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index c94741c..36561a6 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -9,10 +9,6 @@ codeunit 50101 "PVS Prod. Analysis SellTo" [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeModifyEvent', '', false, false)] local procedure OnBeforeModifyProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) begin - if (Rec."PrintVis Order No." = xRec."PrintVis Order No.") and - ((Rec."Sell-to No." <> xRec."Sell-to No.") or (Rec."Sell-to Name" <> xRec."Sell-to Name")) then - exit; - SyncSellToFields(Rec); end; From 1bf86f39a7caf8ee3a0913504c6afbb545bdb7ce Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:48:49 +0000 Subject: [PATCH 11/38] Make sell-to sync order-driven on production analysis Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 36561a6..8003cf8 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -6,8 +6,8 @@ codeunit 50101 "PVS Prod. Analysis SellTo" SyncSellToFields(Rec); end; - [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeModifyEvent', '', false, false)] - local procedure OnBeforeModifyProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) + [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnAfterValidateEvent', 'PrintVis Order No.', false, false)] + local procedure OnAfterValidatePrintVisOrderNo(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis") begin SyncSellToFields(Rec); end; From 4f8ca068629bf19451227e8411434f12f1abbcb8 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:49:20 +0000 Subject: [PATCH 12/38] Persist sell-to sync after order validation Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 8003cf8..6d54465 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -8,8 +8,11 @@ codeunit 50101 "PVS Prod. Analysis SellTo" [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnAfterValidateEvent', 'PrintVis Order No.', false, false)] local procedure OnAfterValidatePrintVisOrderNo(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis") + var + EmptyGuid: Guid; begin - SyncSellToFields(Rec); + if SyncSellToFields(Rec) and (xRec.SystemId <> EmptyGuid) then + Rec.Modify(false); end; procedure SyncSellToFields(var ProductionAnalysis: Record "PrintVis Production Analysis"): Boolean From ce96a854eb97e48a215148b1bcc9204601092681 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:49:59 +0000 Subject: [PATCH 13/38] Sync production analysis sell-to values on write Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 9 +++------ Prototyping/PVSProductionAnalysisSellTo.TableExt.al | 2 ++ 2 files changed, 5 insertions(+), 6 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 6d54465..36561a6 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -6,13 +6,10 @@ codeunit 50101 "PVS Prod. Analysis SellTo" SyncSellToFields(Rec); end; - [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnAfterValidateEvent', 'PrintVis Order No.', false, false)] - local procedure OnAfterValidatePrintVisOrderNo(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis") - var - EmptyGuid: Guid; + [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeModifyEvent', '', false, false)] + local procedure OnBeforeModifyProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) begin - if SyncSellToFields(Rec) and (xRec.SystemId <> EmptyGuid) then - Rec.Modify(false); + SyncSellToFields(Rec); end; procedure SyncSellToFields(var ProductionAnalysis: Record "PrintVis Production Analysis"): Boolean diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index 14e644a..6363f99 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -6,11 +6,13 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Producti { Caption = 'Sell-to No.'; DataClassification = CustomerContent; + Editable = false; } field(50101; "Sell-to Name"; Text[100]) { Caption = 'Sell-to Name'; DataClassification = CustomerContent; + Editable = false; } } } From 00926abe3ac5b0d09508290381efa5d10c7425ed Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:50:41 +0000 Subject: [PATCH 14/38] Split sell-to sync between validate and modify Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 36561a6..f67826e 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -6,9 +6,18 @@ codeunit 50101 "PVS Prod. Analysis SellTo" SyncSellToFields(Rec); end; + [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnAfterValidateEvent', 'PrintVis Order No.', false, false)] + local procedure OnAfterValidatePrintVisOrderNo(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis") + begin + SyncSellToFields(Rec); + end; + [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeModifyEvent', '', false, false)] local procedure OnBeforeModifyProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) begin + if Rec."PrintVis Order No." = xRec."PrintVis Order No." then + exit; + SyncSellToFields(Rec); end; From 308f81c933da35e0d7c67bfd1c8a18a3f8d3b153 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:51:15 +0000 Subject: [PATCH 15/38] Remove modify-time sell-to resync path Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 9 --------- 1 file changed, 9 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index f67826e..8003cf8 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -12,15 +12,6 @@ codeunit 50101 "PVS Prod. Analysis SellTo" SyncSellToFields(Rec); end; - [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeModifyEvent', '', false, false)] - local procedure OnBeforeModifyProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) - begin - if Rec."PrintVis Order No." = xRec."PrintVis Order No." then - exit; - - SyncSellToFields(Rec); - end; - procedure SyncSellToFields(var ProductionAnalysis: Record "PrintVis Production Analysis"): Boolean var PVSCase: Record "PVS Case"; From 7ce55dfc2da1dc7b6a2ac1a8cfc16baf69fd8296 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:51:47 +0000 Subject: [PATCH 16/38] Move sell-to sync into order validation trigger Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 6 ------ Prototyping/PVSProductionAnalysisSellTo.TableExt.al | 10 ++++++++++ 2 files changed, 10 insertions(+), 6 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 8003cf8..341757a 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -6,12 +6,6 @@ codeunit 50101 "PVS Prod. Analysis SellTo" SyncSellToFields(Rec); end; - [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnAfterValidateEvent', 'PrintVis Order No.', false, false)] - local procedure OnAfterValidatePrintVisOrderNo(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis") - begin - SyncSellToFields(Rec); - end; - procedure SyncSellToFields(var ProductionAnalysis: Record "PrintVis Production Analysis"): Boolean var PVSCase: Record "PVS Case"; diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index 6363f99..bad0489 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -15,4 +15,14 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Producti Editable = false; } } + + modify("PrintVis Order No.") + { + trigger OnAfterValidate() + var + ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; + begin + ProductionAnalysisSellTo.SyncSellToFields(Rec); + end; + } } From eee92b8b1e6655ad582a3c4c1f47b971a2ee3036 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:52:17 +0000 Subject: [PATCH 17/38] Enable automatic production analysis insert subscriber Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 341757a..cd80188 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -1,5 +1,7 @@ codeunit 50101 "PVS Prod. Analysis SellTo" { + EventSubscriberInstance = StaticAutomatic; + [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeInsertEvent', '', false, false)] local procedure OnBeforeInsertProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) begin From e3b9f0d3a3c1f3c69311b2aaa808fe701a777947 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:53:03 +0000 Subject: [PATCH 18/38] Move sell-to sync into table extension triggers Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- .../PVSProductionAnalysisSellTo.Codeunit.al | 8 -------- .../PVSProductionAnalysisSellTo.TableExt.al | 14 ++++++++++++++ 2 files changed, 14 insertions(+), 8 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index cd80188..0e41d62 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -1,13 +1,5 @@ codeunit 50101 "PVS Prod. Analysis SellTo" { - EventSubscriberInstance = StaticAutomatic; - - [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeInsertEvent', '', false, false)] - local procedure OnBeforeInsertProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) - begin - SyncSellToFields(Rec); - end; - procedure SyncSellToFields(var ProductionAnalysis: Record "PrintVis Production Analysis"): Boolean var PVSCase: Record "PVS Case"; diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index bad0489..0a3ff5a 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -1,5 +1,19 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Production Analysis" { + trigger OnBeforeInsert() + var + ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; + begin + ProductionAnalysisSellTo.SyncSellToFields(Rec); + end; + + trigger OnBeforeModify() + var + ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; + begin + ProductionAnalysisSellTo.SyncSellToFields(Rec); + end; + fields { field(50100; "Sell-to No."; Code[20]) From 21d9c22e94246594c2b3f0dfdcf8cbf2c4a34e97 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:53:31 +0000 Subject: [PATCH 19/38] Limit sell-to sync to insert and order validation Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.TableExt.al | 7 ------- 1 file changed, 7 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index 0a3ff5a..8663807 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -7,13 +7,6 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Producti ProductionAnalysisSellTo.SyncSellToFields(Rec); end; - trigger OnBeforeModify() - var - ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; - begin - ProductionAnalysisSellTo.SyncSellToFields(Rec); - end; - fields { field(50100; "Sell-to No."; Code[20]) From 41024f0317cc07619b2f3b8e27cf2ae37c0b16e1 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:53:59 +0000 Subject: [PATCH 20/38] Optimize production analysis sell-to backfills Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisInstall.Codeunit.al | 2 +- Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisInstall.Codeunit.al b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al index 14ee030..274c4b8 100644 --- a/Prototyping/PVSProductionAnalysisInstall.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al @@ -18,7 +18,7 @@ codeunit 50102 "PVS Prod. Analysis Install" ProductionAnalysis: Record "PrintVis Production Analysis"; ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; begin - if not ProductionAnalysis.FindSet() then + if not ProductionAnalysis.FindSet(true) then exit; repeat diff --git a/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al b/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al index eeaadb1..528ac3d 100644 --- a/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al @@ -12,7 +12,7 @@ codeunit 50103 "PVS Prod. Analysis Upgrade" ProductionAnalysis: Record "PrintVis Production Analysis"; ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; begin - if not ProductionAnalysis.FindSet() then + if not ProductionAnalysis.FindSet(true) then exit; repeat From dfe935fbbde93a4f7dac0e9fb51e74b5c68dd0c2 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:54:32 +0000 Subject: [PATCH 21/38] Restore insert subscriber and persist order validate sync Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 8 ++++++++ Prototyping/PVSProductionAnalysisSellTo.TableExt.al | 11 +++-------- 2 files changed, 11 insertions(+), 8 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 0e41d62..cd80188 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -1,5 +1,13 @@ codeunit 50101 "PVS Prod. Analysis SellTo" { + EventSubscriberInstance = StaticAutomatic; + + [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeInsertEvent', '', false, false)] + local procedure OnBeforeInsertProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) + begin + SyncSellToFields(Rec); + end; + procedure SyncSellToFields(var ProductionAnalysis: Record "PrintVis Production Analysis"): Boolean var PVSCase: Record "PVS Case"; diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index 8663807..d69a960 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -1,12 +1,5 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Production Analysis" { - trigger OnBeforeInsert() - var - ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; - begin - ProductionAnalysisSellTo.SyncSellToFields(Rec); - end; - fields { field(50100; "Sell-to No."; Code[20]) @@ -27,9 +20,11 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Producti { trigger OnAfterValidate() var + EmptyGuid: Guid; ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; begin - ProductionAnalysisSellTo.SyncSellToFields(Rec); + if ProductionAnalysisSellTo.SyncSellToFields(Rec) and (xRec.SystemId <> EmptyGuid) then + Rec.Modify(false); end; } } From 7587d01b4eb9e842543c60b9c35f6c2bed74a864 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Mon, 21 Sep 2026 14:55:18 +0000 Subject: [PATCH 22/38] Relax backfill locks and keep validate sync in memory Co-authored-by: HenrikL359 <295621344+HenrikL359@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisInstall.Codeunit.al | 2 +- Prototyping/PVSProductionAnalysisSellTo.TableExt.al | 4 +--- Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al | 2 +- 3 files changed, 3 insertions(+), 5 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisInstall.Codeunit.al b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al index 274c4b8..14ee030 100644 --- a/Prototyping/PVSProductionAnalysisInstall.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al @@ -18,7 +18,7 @@ codeunit 50102 "PVS Prod. Analysis Install" ProductionAnalysis: Record "PrintVis Production Analysis"; ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; begin - if not ProductionAnalysis.FindSet(true) then + if not ProductionAnalysis.FindSet() then exit; repeat diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index d69a960..bad0489 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -20,11 +20,9 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Producti { trigger OnAfterValidate() var - EmptyGuid: Guid; ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; begin - if ProductionAnalysisSellTo.SyncSellToFields(Rec) and (xRec.SystemId <> EmptyGuid) then - Rec.Modify(false); + ProductionAnalysisSellTo.SyncSellToFields(Rec); end; } } diff --git a/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al b/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al index 528ac3d..eeaadb1 100644 --- a/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al @@ -12,7 +12,7 @@ codeunit 50103 "PVS Prod. Analysis Upgrade" ProductionAnalysis: Record "PrintVis Production Analysis"; ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; begin - if not ProductionAnalysis.FindSet(true) then + if not ProductionAnalysis.FindSet() then exit; repeat From 93a59e680259f87544266fe68f989f85e60d7b64 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Tue, 22 Sep 2026 06:40:37 +0000 Subject: [PATCH 23/38] Fix AL tableextension field modify scope Co-authored-by: PropmanProphecy <8543071+PropmanProphecy@users.noreply.github.com> --- .../PVSProductionAnalysisSellTo.TableExt.al | 19 +++++++++---------- 1 file changed, 9 insertions(+), 10 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index bad0489..a5055ab 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -14,15 +14,14 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Producti DataClassification = CustomerContent; Editable = false; } - } - - modify("PrintVis Order No.") - { - trigger OnAfterValidate() - var - ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; - begin - ProductionAnalysisSellTo.SyncSellToFields(Rec); - end; + modify("PrintVis Order No.") + { + trigger OnAfterValidate() + var + ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; + begin + ProductionAnalysisSellTo.SyncSellToFields(Rec); + end; + } } } From 421a60dd9badb14e7ccfb2c0e7691b379aa43d75 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Tue, 22 Sep 2026 06:41:15 +0000 Subject: [PATCH 24/38] Handle consistent sell-to duplicates Co-authored-by: PropmanProphecy <8543071+PropmanProphecy@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index cd80188..8468ff5 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -30,6 +30,8 @@ codeunit 50101 "PVS Prod. Analysis SellTo" local procedure FindUniqueCaseByOrderNo(PrintVisOrderNo: Code[20]; var PVSCase: Record "PVS Case"): Boolean var FirstPVSCase: Record "PVS Case"; + SellToNo: Code[20]; + SellToName: Text[100]; begin if PrintVisOrderNo = '' then exit(false); @@ -40,8 +42,12 @@ codeunit 50101 "PVS Prod. Analysis SellTo" exit(false); FirstPVSCase := PVSCase; - if PVSCase.Next() <> 0 then - exit(false); + SellToNo := PVSCase."Sell-To No."; + SellToName := PVSCase."Sell-To Name"; + + while PVSCase.Next() <> 0 do + if (PVSCase."Sell-To No." <> SellToNo) or (PVSCase."Sell-To Name" <> SellToName) then + exit(false); PVSCase := FirstPVSCase; exit(true); From 024a6a1e62a78bd1b454ad792578ffed7c35c260 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Tue, 22 Sep 2026 06:41:55 +0000 Subject: [PATCH 25/38] Respect AL trigger flow for sell-to sync Co-authored-by: PropmanProphecy <8543071+PropmanProphecy@users.noreply.github.com> --- .../PVSProductionAnalysisSellTo.Codeunit.al | 19 ++++++++++++++++++- .../PVSProductionAnalysisSellTo.TableExt.al | 2 +- 2 files changed, 19 insertions(+), 2 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 8468ff5..15e1093 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -5,7 +5,24 @@ codeunit 50101 "PVS Prod. Analysis SellTo" [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeInsertEvent', '', false, false)] local procedure OnBeforeInsertProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) begin - SyncSellToFields(Rec); + if not RunTrigger then + exit; + + ApplySellToFields(Rec); + end; + + [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeModifyEvent', '', false, false)] + local procedure OnBeforeModifyProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) + begin + if not RunTrigger then + exit; + + ApplySellToFields(Rec); + end; + + procedure ApplySellToFields(var ProductionAnalysis: Record "PrintVis Production Analysis") + begin + SyncSellToFields(ProductionAnalysis); end; procedure SyncSellToFields(var ProductionAnalysis: Record "PrintVis Production Analysis"): Boolean diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index a5055ab..e689f4b 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -20,7 +20,7 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Producti var ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; begin - ProductionAnalysisSellTo.SyncSellToFields(Rec); + ProductionAnalysisSellTo.ApplySellToFields(Rec); end; } } From f5c1d27c1775aeee8be4c72f0797df88985451fe Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Tue, 22 Sep 2026 06:42:26 +0000 Subject: [PATCH 26/38] Use standard modify path for sell-to backfill Co-authored-by: PropmanProphecy <8543071+PropmanProphecy@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisInstall.Codeunit.al | 2 +- Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisInstall.Codeunit.al b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al index 14ee030..1c9da11 100644 --- a/Prototyping/PVSProductionAnalysisInstall.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al @@ -23,7 +23,7 @@ codeunit 50102 "PVS Prod. Analysis Install" repeat if ProductionAnalysisSellTo.SyncSellToFields(ProductionAnalysis) then - ProductionAnalysis.Modify(false); + ProductionAnalysis.Modify(true); until ProductionAnalysis.Next() = 0; end; } diff --git a/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al b/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al index eeaadb1..54c7620 100644 --- a/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al @@ -17,7 +17,7 @@ codeunit 50103 "PVS Prod. Analysis Upgrade" repeat if ProductionAnalysisSellTo.SyncSellToFields(ProductionAnalysis) then - ProductionAnalysis.Modify(false); + ProductionAnalysis.Modify(true); until ProductionAnalysis.Next() = 0; end; } From 4e69f5b7ce49d6ce286fbfee8cd9f8471bb1d53c Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Tue, 22 Sep 2026 06:42:50 +0000 Subject: [PATCH 27/38] Limit sell-to modify sync to order changes Co-authored-by: PropmanProphecy <8543071+PropmanProphecy@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 3 +++ 1 file changed, 3 insertions(+) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 15e1093..8510c85 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -17,6 +17,9 @@ codeunit 50101 "PVS Prod. Analysis SellTo" if not RunTrigger then exit; + if Rec."PrintVis Order No." = xRec."PrintVis Order No." then + exit; + ApplySellToFields(Rec); end; From 42d932475aa7fce06c64a2ed250ef46a0a8c5b5c Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Tue, 22 Sep 2026 06:43:26 +0000 Subject: [PATCH 28/38] Persist sell-to updates from order validation Co-authored-by: PropmanProphecy <8543071+PropmanProphecy@users.noreply.github.com> --- Prototyping/PVSProductionAnalysisSellTo.Codeunit.al | 12 ------------ Prototyping/PVSProductionAnalysisSellTo.TableExt.al | 3 ++- 2 files changed, 2 insertions(+), 13 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index 8510c85..d1e6f4d 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -11,18 +11,6 @@ codeunit 50101 "PVS Prod. Analysis SellTo" ApplySellToFields(Rec); end; - [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeModifyEvent', '', false, false)] - local procedure OnBeforeModifyProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) - begin - if not RunTrigger then - exit; - - if Rec."PrintVis Order No." = xRec."PrintVis Order No." then - exit; - - ApplySellToFields(Rec); - end; - procedure ApplySellToFields(var ProductionAnalysis: Record "PrintVis Production Analysis") begin SyncSellToFields(ProductionAnalysis); diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index e689f4b..273487b 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -20,7 +20,8 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Producti var ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; begin - ProductionAnalysisSellTo.ApplySellToFields(Rec); + if ProductionAnalysisSellTo.SyncSellToFields(Rec) and not Rec.IsTemporary() and not IsNullGuid(Rec.SystemId) then + Rec.Modify(true); end; } } From 46309ca868a4f5c2c42952553fc83195ecb867dd Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Tue, 22 Sep 2026 06:44:19 +0000 Subject: [PATCH 29/38] Track order changes through AL validation flow Co-authored-by: PropmanProphecy <8543071+PropmanProphecy@users.noreply.github.com> --- .../PVSProductionAnalysisInstall.Codeunit.al | 2 +- .../PVSProductionAnalysisSellTo.Codeunit.al | 42 +++++++++++++++++++ .../PVSProductionAnalysisSellTo.TableExt.al | 4 +- .../PVSProductionAnalysisUpgrade.Codeunit.al | 2 +- 4 files changed, 46 insertions(+), 4 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisInstall.Codeunit.al b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al index 1c9da11..14ee030 100644 --- a/Prototyping/PVSProductionAnalysisInstall.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisInstall.Codeunit.al @@ -23,7 +23,7 @@ codeunit 50102 "PVS Prod. Analysis Install" repeat if ProductionAnalysisSellTo.SyncSellToFields(ProductionAnalysis) then - ProductionAnalysis.Modify(true); + ProductionAnalysis.Modify(false); until ProductionAnalysis.Next() = 0; end; } diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index d1e6f4d..e46c37d 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -2,6 +2,9 @@ codeunit 50101 "PVS Prod. Analysis SellTo" { EventSubscriberInstance = StaticAutomatic; + var + PreviousOrderNosByRecordId: Dictionary of [Text, Code[20]]; + [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeInsertEvent', '', false, false)] local procedure OnBeforeInsertProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) begin @@ -11,6 +14,18 @@ codeunit 50101 "PVS Prod. Analysis SellTo" ApplySellToFields(Rec); end; + [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeModifyEvent', '', false, false)] + local procedure OnBeforeModifyProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; var xRec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) + begin + if not RunTrigger then + exit; + + if not OrderNoChanged(Rec, xRec) then + exit; + + ApplySellToFields(Rec); + end; + procedure ApplySellToFields(var ProductionAnalysis: Record "PrintVis Production Analysis") begin SyncSellToFields(ProductionAnalysis); @@ -35,6 +50,14 @@ codeunit 50101 "PVS Prod. Analysis SellTo" exit(true); end; + procedure RememberOrderNoBeforeValidate(ProductionAnalysis: Record "PrintVis Production Analysis"; PreviousOrderNo: Code[20]) + begin + if ProductionAnalysis.IsTemporary() or IsNullGuid(ProductionAnalysis.SystemId) then + exit; + + PreviousOrderNosByRecordId.Set(GetRecordKey(ProductionAnalysis), PreviousOrderNo); + end; + local procedure FindUniqueCaseByOrderNo(PrintVisOrderNo: Code[20]; var PVSCase: Record "PVS Case"): Boolean var FirstPVSCase: Record "PVS Case"; @@ -60,4 +83,23 @@ codeunit 50101 "PVS Prod. Analysis SellTo" PVSCase := FirstPVSCase; exit(true); end; + + local procedure OrderNoChanged(ProductionAnalysis: Record "PrintVis Production Analysis"; xProductionAnalysis: Record "PrintVis Production Analysis"): Boolean + var + PreviousOrderNo: Code[20]; + RecordKey: Text; + begin + RecordKey := GetRecordKey(ProductionAnalysis); + if PreviousOrderNosByRecordId.Get(RecordKey, PreviousOrderNo) then begin + PreviousOrderNosByRecordId.Remove(RecordKey); + exit(ProductionAnalysis."PrintVis Order No." <> PreviousOrderNo); + end; + + exit(ProductionAnalysis."PrintVis Order No." <> xProductionAnalysis."PrintVis Order No."); + end; + + local procedure GetRecordKey(ProductionAnalysis: Record "PrintVis Production Analysis"): Text + begin + exit(Format(ProductionAnalysis.RecordId)); + end; } diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index 273487b..5f0e0e4 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -20,8 +20,8 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Producti var ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; begin - if ProductionAnalysisSellTo.SyncSellToFields(Rec) and not Rec.IsTemporary() and not IsNullGuid(Rec.SystemId) then - Rec.Modify(true); + ProductionAnalysisSellTo.RememberOrderNoBeforeValidate(Rec, xRec."PrintVis Order No."); + ProductionAnalysisSellTo.ApplySellToFields(Rec); end; } } diff --git a/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al b/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al index 54c7620..eeaadb1 100644 --- a/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisUpgrade.Codeunit.al @@ -17,7 +17,7 @@ codeunit 50103 "PVS Prod. Analysis Upgrade" repeat if ProductionAnalysisSellTo.SyncSellToFields(ProductionAnalysis) then - ProductionAnalysis.Modify(true); + ProductionAnalysis.Modify(false); until ProductionAnalysis.Next() = 0; end; } From 3311600bf657c2977d8427c6dc36378fecccdd00 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Tue, 22 Sep 2026 06:45:14 +0000 Subject: [PATCH 30/38] Compare order changes against persisted record Co-authored-by: PropmanProphecy <8543071+PropmanProphecy@users.noreply.github.com> --- .../PVSProductionAnalysisSellTo.Codeunit.al | 34 ++++--------------- .../PVSProductionAnalysisSellTo.TableExt.al | 1 - 2 files changed, 7 insertions(+), 28 deletions(-) diff --git a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al index e46c37d..493d56c 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al +++ b/Prototyping/PVSProductionAnalysisSellTo.Codeunit.al @@ -2,9 +2,6 @@ codeunit 50101 "PVS Prod. Analysis SellTo" { EventSubscriberInstance = StaticAutomatic; - var - PreviousOrderNosByRecordId: Dictionary of [Text, Code[20]]; - [EventSubscriber(ObjectType::Table, Database::"PrintVis Production Analysis", 'OnBeforeInsertEvent', '', false, false)] local procedure OnBeforeInsertProductionAnalysis(var Rec: Record "PrintVis Production Analysis"; RunTrigger: Boolean) begin @@ -20,7 +17,7 @@ codeunit 50101 "PVS Prod. Analysis SellTo" if not RunTrigger then exit; - if not OrderNoChanged(Rec, xRec) then + if not OrderNoChanged(Rec) then exit; ApplySellToFields(Rec); @@ -50,14 +47,6 @@ codeunit 50101 "PVS Prod. Analysis SellTo" exit(true); end; - procedure RememberOrderNoBeforeValidate(ProductionAnalysis: Record "PrintVis Production Analysis"; PreviousOrderNo: Code[20]) - begin - if ProductionAnalysis.IsTemporary() or IsNullGuid(ProductionAnalysis.SystemId) then - exit; - - PreviousOrderNosByRecordId.Set(GetRecordKey(ProductionAnalysis), PreviousOrderNo); - end; - local procedure FindUniqueCaseByOrderNo(PrintVisOrderNo: Code[20]; var PVSCase: Record "PVS Case"): Boolean var FirstPVSCase: Record "PVS Case"; @@ -84,22 +73,13 @@ codeunit 50101 "PVS Prod. Analysis SellTo" exit(true); end; - local procedure OrderNoChanged(ProductionAnalysis: Record "PrintVis Production Analysis"; xProductionAnalysis: Record "PrintVis Production Analysis"): Boolean + local procedure OrderNoChanged(ProductionAnalysis: Record "PrintVis Production Analysis"): Boolean var - PreviousOrderNo: Code[20]; - RecordKey: Text; - begin - RecordKey := GetRecordKey(ProductionAnalysis); - if PreviousOrderNosByRecordId.Get(RecordKey, PreviousOrderNo) then begin - PreviousOrderNosByRecordId.Remove(RecordKey); - exit(ProductionAnalysis."PrintVis Order No." <> PreviousOrderNo); - end; - - exit(ProductionAnalysis."PrintVis Order No." <> xProductionAnalysis."PrintVis Order No."); - end; - - local procedure GetRecordKey(ProductionAnalysis: Record "PrintVis Production Analysis"): Text + PersistedProductionAnalysis: Record "PrintVis Production Analysis"; + PersistedProductionAnalysisRef: RecordRef; begin - exit(Format(ProductionAnalysis.RecordId)); + PersistedProductionAnalysisRef.Get(ProductionAnalysis.RecordId); + PersistedProductionAnalysisRef.SetTable(PersistedProductionAnalysis); + exit(ProductionAnalysis."PrintVis Order No." <> PersistedProductionAnalysis."PrintVis Order No."); end; } diff --git a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al index 5f0e0e4..e689f4b 100644 --- a/Prototyping/PVSProductionAnalysisSellTo.TableExt.al +++ b/Prototyping/PVSProductionAnalysisSellTo.TableExt.al @@ -20,7 +20,6 @@ tableextension 50100 "PVS Production Analysis SellTo" extends "PrintVis Producti var ProductionAnalysisSellTo: Codeunit "PVS Prod. Analysis SellTo"; begin - ProductionAnalysisSellTo.RememberOrderNoBeforeValidate(Rec, xRec."PrintVis Order No."); ProductionAnalysisSellTo.ApplySellToFields(Rec); end; } From a3fcce22624a8800800c57baa58082f1503f185f Mon Sep 17 00:00:00 2001 From: Kasper Lind Date: Tue, 22 Sep 2026 08:51:55 +0200 Subject: [PATCH 31/38] Update version number to 28.1.2.9 --- Prototyping/app.json | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Prototyping/app.json b/Prototyping/app.json index cc23142..a8e9338 100644 --- a/Prototyping/app.json +++ b/Prototyping/app.json @@ -15,7 +15,7 @@ "id": "5452f323-059e-499a-9753-5d2c07eef904", "name": "PrintVis", "publisher": "PrintVis A/S", - "version": "28.0.0.0" + "version": "28.1.2.9" } ], "screenshots": [], From 29a5496e872cb55cc9d40963bef4d335f6680095 Mon Sep 17 00:00:00 2001 From: Kasper Lind Date: Tue, 22 Sep 2026 08:53:24 +0200 Subject: [PATCH 32/38] Downgrade PrintVis version to 28.1.2.8 --- Prototyping/app.json | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Prototyping/app.json b/Prototyping/app.json index a8e9338..2f912db 100644 --- a/Prototyping/app.json +++ b/Prototyping/app.json @@ -15,7 +15,7 @@ "id": "5452f323-059e-499a-9753-5d2c07eef904", "name": "PrintVis", "publisher": "PrintVis A/S", - "version": "28.1.2.9" + "version": "28.1.2.8" } ], "screenshots": [], From 04ab795bee5126fa7bc526afb2d4fcb231d76f01 Mon Sep 17 00:00:00 2001 From: Kasper Lind Date: Tue, 22 Sep 2026 08:54:43 +0200 Subject: [PATCH 33/38] Update publisher name in app.json --- Prototyping/app.json | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Prototyping/app.json b/Prototyping/app.json index 2f912db..af4d6c7 100644 --- a/Prototyping/app.json +++ b/Prototyping/app.json @@ -1,7 +1,7 @@ { "id": "b7d23e82-11ae-4172-9289-6e9584df4759", "name": "Prototyping", - "publisher": "PrintVis", + "publisher": "PrintVis A/S", "version": "1.0.0.1", "brief": "", "description": "", From 883b1f32f375d1c25fb044eb020310d741abe7bb Mon Sep 17 00:00:00 2001 From: Kasper Lind Date: Tue, 22 Sep 2026 09:00:08 +0200 Subject: [PATCH 34/38] Update app.json --- Prototyping/app.json | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Prototyping/app.json b/Prototyping/app.json index af4d6c7..10ede88 100644 --- a/Prototyping/app.json +++ b/Prototyping/app.json @@ -15,7 +15,7 @@ "id": "5452f323-059e-499a-9753-5d2c07eef904", "name": "PrintVis", "publisher": "PrintVis A/S", - "version": "28.1.2.8" + "version": "28.1.2.9" } ], "screenshots": [], From 783bb9b29df93c1d5c2522c02d086b3a71eb0e31 Mon Sep 17 00:00:00 2001 From: Kasper Lind Date: Tue, 22 Sep 2026 09:04:50 +0200 Subject: [PATCH 35/38] Update app.json description field --- Prototyping/app.json | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Prototyping/app.json b/Prototyping/app.json index 10ede88..45b1146 100644 --- a/Prototyping/app.json +++ b/Prototyping/app.json @@ -4,7 +4,7 @@ "publisher": "PrintVis A/S", "version": "1.0.0.1", "brief": "", - "description": "", + "description": "Prototyping", "privacyStatement": "", "EULA": "", "help": "", From 9225fd0056505f34cb65f2c16c99b070845c2810 Mon Sep 17 00:00:00 2001 From: Kasper Lind Date: Tue, 22 Sep 2026 09:18:57 +0200 Subject: [PATCH 36/38] Remove description from app.json --- Prototyping/app.json | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Prototyping/app.json b/Prototyping/app.json index 45b1146..10ede88 100644 --- a/Prototyping/app.json +++ b/Prototyping/app.json @@ -4,7 +4,7 @@ "publisher": "PrintVis A/S", "version": "1.0.0.1", "brief": "", - "description": "Prototyping", + "description": "", "privacyStatement": "", "EULA": "", "help": "", From 82df37f3f7a689a530fc71cedee7eeb7b4084edc Mon Sep 17 00:00:00 2001 From: Kasper Lind Date: Tue, 22 Sep 2026 09:30:12 +0200 Subject: [PATCH 37/38] Update app.json description field --- Prototyping/app.json | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Prototyping/app.json b/Prototyping/app.json index 10ede88..45b1146 100644 --- a/Prototyping/app.json +++ b/Prototyping/app.json @@ -4,7 +4,7 @@ "publisher": "PrintVis A/S", "version": "1.0.0.1", "brief": "", - "description": "", + "description": "Prototyping", "privacyStatement": "", "EULA": "", "help": "", From 4ef39a5e3e30d666e2a8fe251c75413f97fd1d55 Mon Sep 17 00:00:00 2001 From: Kasper Lind Date: Tue, 22 Sep 2026 09:33:57 +0200 Subject: [PATCH 38/38] Update description field in app.json --- Prototyping/app.json | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Prototyping/app.json b/Prototyping/app.json index 45b1146..10ede88 100644 --- a/Prototyping/app.json +++ b/Prototyping/app.json @@ -4,7 +4,7 @@ "publisher": "PrintVis A/S", "version": "1.0.0.1", "brief": "", - "description": "Prototyping", + "description": "", "privacyStatement": "", "EULA": "", "help": "",