Microsoft/bcquality
1
0
Fork 0
mirror of https://github.com/microsoft/BCQuality.git synced 2026-08-06 17:36:53 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Add lifecycle error and privacy knowledge (#99)

Browse source 
* Add lifecycle error and privacy knowledge

Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com>

Copilot-Session: 95c06ad8-377d-4faa-8d07-06300b1c81ec

* Fix lifecycle privacy review findings

Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com>
Copilot-Session: a26cd6d6-ff49-433e-bc53-f645c455ebdd

* Refine lifecycle privacy retrieval

Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com>

Copilot-Session: 95c06ad8-377d-4faa-8d07-06300b1c81ec

* Make review gates explicit

Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com>

Copilot-Session: 95c06ad8-377d-4faa-8d07-06300b1c81ec

---------

Co-authored-by: Jesper Schulz-Wedde <jesper.schulzwedde@microsoft.com>
Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com>
This commit is contained in:
Jesper Schulz-Wedde 2026-07-14 12:52:56 +02:00 • committed by GitHub
parent 363f08f47e
commit e0ebdd35c7
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
25 changed files with 459 additions and 39 deletions
Download patch file Download diff file Expand all files Collapse all files

48
microsoft/knowledge/upgrade/install-code-does-not-run-on-version-upgrade.good.al Normal file
View file

@ -0,0 +1,48 @@
codeunit 50304 "My App Install"
{
Subtype = Install;
trigger OnInstallAppPerCompany()
begin
InitializeSetup();
end;
local procedure InitializeSetup()
var
MyAppSetup: Record "My App Setup";
begin
if MyAppSetup.IsEmpty() then
MyAppSetup.Insert(true);
end;
}
codeunit 50305 "My App Upgrade"
{
Subtype = Upgrade;
trigger OnUpgradePerCompany()
var
UpgradeTag: Codeunit "Upgrade Tag";
begin
if UpgradeTag.HasUpgradeTag(ConfigurationVersionTag()) then
exit;
MigrateLegacySetup();
UpgradeTag.SetUpgradeTag(ConfigurationVersionTag());
end;
local procedure MigrateLegacySetup()
var
MyAppSetup: Record "My App Setup";
begin
if MyAppSetup.Get() then begin
MyAppSetup."Configuration Version" := 2;
MyAppSetup.Modify(true);
end;
end;
local procedure ConfigurationVersionTag(): Code[250]
begin
exit('MS-50305-ConfigurationVersion-20260714');
end;
}