Skip to content

Commit 371cb96

Browse files
committed
New rules principal app
1 parent cccd6b8 commit 371cb96

29 files changed

+170
-167
lines changed

Dependency-Graph/.vscode/launch.json

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -13,7 +13,7 @@
1313
"launchBrowser": true,
1414
"enableLongRunningSqlStatements": true,
1515
"enableSqlInformationDebugger": true,
16-
"tenant": "7be8f1f7-bc67-46c0-9487-d836aad47bea"
16+
"tenant": "6de27021-dcdb-4539-b0e1-c5ecb27c4e48"
1717
},
1818
{
1919
"name": "Docker - DependencyGraph",

Dependency-Graph/Translations/Dependency-Graph.g.xlf

Lines changed: 105 additions & 105 deletions
Large diffs are not rendered by default.

Dependency-Graph/app.json

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -14,7 +14,7 @@
1414
"dependencies": [],
1515
"screenshots": [],
1616
"platform": "1.0.0.0",
17-
"application": "23.0.0.0",
17+
"application": "25.0.0.0",
1818
"idRanges": [
1919
{
2020
"from": 80800,
@@ -30,5 +30,5 @@
3030
"allowDownloadingSource": false,
3131
"includeSourceInSymbolFile": false
3232
},
33-
"runtime": "13.0"
33+
"runtime": "14.0"
3434
}

Dependency-Graph/src/Base/CleanTemporaryTablesANJ.Codeunit.al

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -5,6 +5,7 @@ namespace ANJ.Tools.Graph;
55
codeunit 80811 CleanTemporaryTables_ANJ
66
{
77
Access = Public;
8+
Permissions = tabledata Extensions_ANJ = RD, tabledata Relations_ANJ = RD;
89

910
/// <summary>
1011
/// Clean.

Dependency-Graph/src/Base/DefaultFillProcessTabImpANJ.Codeunit.al

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@
22
/// Codeunit "DefaultFillProcessTabImp_ANJ" (ID 80815) implements Interface FillingProcessingTables_ANJ.
33
/// </summary>
44
namespace ANJ.Tools.Graph;
5-
codeunit 80815 DefaultFillProcessTabImp_ANJ implements FillingProcessingTables_ANJ
5+
codeunit 80815 DefaultFillProcessTabImp_ANJ implements IFillingProcessingTables_ANJ
66
{
77
Access = Internal;
88

Dependency-Graph/src/Base/DependencyGraphFacadeANJ.Codeunit.al

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -112,7 +112,7 @@ codeunit 80810 DependencyGraphFacade_ANJ
112112
/// GetInterfaceFillProcessingTables.
113113
/// </summary>
114114
/// <param name="FillingProcessingTables">VAR Interface FillingProcessingTables_ANJ.</param>
115-
procedure GetInterfaceFillProcessingTables(var FillingProcessingTables: Interface FillingProcessingTables_ANJ)
115+
procedure GetInterfaceFillProcessingTables(var FillingProcessingTables: Interface IFillingProcessingTables_ANJ)
116116
var
117117
DependencyGraphSetup: Record DependencyGraphSetup_ANJ;
118118
begin
@@ -127,7 +127,7 @@ codeunit 80810 DependencyGraphFacade_ANJ
127127
/// </summary>
128128
/// <param name="FillingProcessingTables"></param>
129129
[IntegrationEvent(false, false)]
130-
local procedure OnAfterGetFillingProcessingTables(var FillingProcessingTables: Interface FillingProcessingTables_ANJ)
130+
local procedure OnAfterGetFillingProcessingTables(var FillingProcessingTables: Interface IFillingProcessingTables_ANJ)
131131
begin
132132
end;
133133

Dependency-Graph/src/Base/FillingProcessingTablesANJ.Enum.al

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -2,17 +2,17 @@
22
/// Enum FillingProcessingTables_ANJ (ID 80802).
33
/// </summary>
44
namespace ANJ.Tools.Graph;
5-
enum 80802 FillingProcessingTables_ANJ implements FillingProcessingTables_ANJ
5+
enum 80802 FillingProcessingTables_ANJ implements IFillingProcessingTables_ANJ
66
{
77
Access = Public;
88
Caption = 'Filling Processing Tables';
9-
DefaultImplementation = FillingProcessingTables_ANJ = DefaultFillProcessTabImp_ANJ;
9+
DefaultImplementation = IFillingProcessingTables_ANJ = DefaultFillProcessTabImp_ANJ;
1010
Extensible = true;
11-
UnknownValueImplementation = FillingProcessingTables_ANJ = DefaultFillProcessTabImp_ANJ;
11+
UnknownValueImplementation = IFillingProcessingTables_ANJ = DefaultFillProcessTabImp_ANJ;
1212

1313
value(1; WSAndModuleDependencyInfo)
1414
{
1515
Caption = 'WS And ModuleDependencyInfo';
16-
Implementation = FillingProcessingTables_ANJ = WSAndMDInfoImp_ANJ;
16+
Implementation = IFillingProcessingTables_ANJ = WSAndMDInfoImp_ANJ;
1717
}
1818
}

Dependency-Graph/src/Base/GenerateTablesANJ.Codeunit.al

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -5,6 +5,7 @@ namespace ANJ.Tools.Graph;
55
codeunit 80807 GenerateTables_ANJ
66
{
77
Access = Public;
8+
Permissions = tabledata Extensions_ANJ = RD, tabledata Relations_ANJ = RD, tabledata DependencyGraphSetup_ANJ = RM;
89

910
/// <summary>
1011
/// GenerateTables.

Dependency-Graph/src/Base/FillingProcessingTablesANJ.Interface.al renamed to Dependency-Graph/src/Base/IFillingProcessingTablesANJ.Interface.al

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,8 @@
11
/// <summary>
2-
/// Interface FillingProcessingTables_ANJ.
2+
/// Interface "FillingProcessingTables_ANJ."
33
/// </summary>
44
namespace ANJ.Tools.Graph;
5-
interface FillingProcessingTables_ANJ
5+
interface IFillingProcessingTables_ANJ
66
{
77
Access = Public;
88

Dependency-Graph/src/Base/WSAndMDInfoImpANJ.Codeunit.al

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,10 @@
22
/// Codeunit "WSAndMDInfoImp_ANJ" (ID 80812) implements Interface FillingProcessingTables_ANJ.
33
/// </summary>
44
namespace ANJ.Tools.Graph;
5-
codeunit 80812 WSAndMDInfoImp_ANJ implements FillingProcessingTables_ANJ
5+
codeunit 80812 WSAndMDInfoImp_ANJ implements IFillingProcessingTables_ANJ
66
{
77
Access = Internal;
8+
Permissions = tabledata Extensions_ANJ = RD, tabledata Relations_ANJ = RD;
89

910
/// <summary>
1011
/// GetExtensions.
@@ -142,7 +143,8 @@ codeunit 80812 WSAndMDInfoImp_ANJ implements FillingProcessingTables_ANJ
142143
Company: Record System.Environment.Company;
143144
begin
144145
Company.SetLoadFields(Id);
145-
Company.Get(CompanyName());
146+
if not Company.Get(CompanyName()) then
147+
exit;
146148

147149
exit(Format(Company.Id, 0, 4).ToLower());
148150
end;

0 commit comments

Comments
 (0)