Skip to content

Commit 12649ce

Browse files
ajn-ldrajn-ldr
committed
Number sequence test
1 parent 0ca18ec commit 12649ce

8 files changed

+141
-31
lines changed

‎Dependency-Graph.Test/AppSourceCop.json

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
{
2+
"mandatorySuffix": "_ANJ"
3+
}

‎Dependency-Graph.Test/DepGraphTestANJ.permissionset.al

Lines changed: 9 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,9 @@
1+
permissionset 99990 DepGraphTest_ANJ
2+
{
3+
Access = Public;
4+
Assignable = true;
5+
Permissions = codeunit GenerateFiguresTest_ANJ = X,
6+
codeunit GraphAndMarkdownTest_ANJ = X,
7+
codeunit NumberSequenceTest_ANJ = X,
8+
codeunit TemporaryTablesTest_ANJ = X;
9+
}

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

Lines changed: 22 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,28 @@
22
<xliff version="1.2" xmlns="urn:oasis:names:tc:xliff:document:1.2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="urn:oasis:names:tc:xliff:document:1.2 xliff-core-1.2-transitional.xsd">
33
<file datatype="xml" source-language="en-US" target-language="en-US" original="Dependency-Graph.Test">
44
<body>
5-
<group id="body" />
5+
<group id="body">
6+
<trans-unit id="Codeunit 1844708212 - NamedType 1644787387" size-unit="char" translate="yes" xml:space="preserve">
7+
<source>E1</source>
8+
<note from="Developer" annotates="general" priority="2"></note>
9+
<note from="Xliff Generator" annotates="general" priority="3">Codeunit NumberSequenceTest_ANJ - NamedType FirstRequestLbl</note>
10+
</trans-unit>
11+
<trans-unit id="Codeunit 1844708212 - NamedType 2011855819" size-unit="char" translate="yes" xml:space="preserve">
12+
<source>The number secuence does not correspond to the expected one</source>
13+
<note from="Developer" annotates="general" priority="2"></note>
14+
<note from="Xliff Generator" annotates="general" priority="3">Codeunit NumberSequenceTest_ANJ - NamedType NumberSequenceErr</note>
15+
</trans-unit>
16+
<trans-unit id="Codeunit 1844708212 - NamedType 1024096429" size-unit="char" translate="yes" xml:space="preserve">
17+
<source>E2</source>
18+
<note from="Developer" annotates="general" priority="2"></note>
19+
<note from="Xliff Generator" annotates="general" priority="3">Codeunit NumberSequenceTest_ANJ - NamedType SecondRequestLbl</note>
20+
</trans-unit>
21+
<trans-unit id="Codeunit 1844708212 - NamedType 2561704828" size-unit="char" translate="yes" xml:space="preserve">
22+
<source>E3</source>
23+
<note from="Developer" annotates="general" priority="2"></note>
24+
<note from="Xliff Generator" annotates="general" priority="3">Codeunit NumberSequenceTest_ANJ - NamedType ThirdRequestLbl</note>
25+
</trans-unit>
26+
</group>
627
</body>
728
</file>
829
</xliff>

‎Dependency-Graph.Test/src/Test/GenerateFiguresTestANJ.Codeunit.al

Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,8 @@
1+
/// <summary>
2+
/// Codeunit "GenerateFiguresTest_ANJ" (ID 99991).
3+
/// </summary>
4+
codeunit 99991 GenerateFiguresTest_ANJ
5+
{
6+
Access = Public;
7+
Subtype = Test;
8+
}

‎Dependency-Graph.Test/src/Test/GraphAndMarkdownTestANJ.Codeunit.al

Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,8 @@
1+
/// <summary>
2+
/// Codeunit "GraphAndMarkdownTest_ANJ" (ID 99993).
3+
/// </summary>
4+
codeunit 99993 GraphAndMarkdownTest_ANJ
5+
{
6+
Access = Public;
7+
Subtype = Test;
8+
}

‎Dependency-Graph.Test/src/Test/NumberSequenceTestANJ.Codeunit.al

Lines changed: 52 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,52 @@
1+
/// <summary>
2+
/// Codeunit NumberSequenceTest_ANJ (ID 99990).
3+
/// </summary>
4+
codeunit 99990 NumberSequenceTest_ANJ
5+
{
6+
Access = Public;
7+
Subtype = Test;
8+
9+
[Test]
10+
procedure TestNumberSequence();
11+
var
12+
FirstRequest: Text;
13+
SecondRequest: Text;
14+
ThirdRequest: Text;
15+
begin
16+
// [Scenario]
17+
// Verify that it is initialized and a number series is created correctly.
18+
19+
// [Given] Setup:
20+
21+
// [When] Exercise:
22+
CheckInitializeAndCreateSomeNumberSeries(FirstRequest, SecondRequest, ThirdRequest);
23+
24+
// [Then] Verify:
25+
LibraryAssert.AreEqual(FirstRequest, FirstRequestLbl, NumberSequenceErr);
26+
LibraryAssert.AreEqual(SecondRequest, SecondRequestLbl, NumberSequenceErr);
27+
LibraryAssert.AreEqual(ThirdRequest, ThirdRequestLbl, NumberSequenceErr);
28+
end;
29+
30+
/// <summary>
31+
/// CheckInitializeAndCreateSomeNumberSeries.
32+
/// </summary>
33+
/// <param name="FirstRequest">VAR Text.</param>
34+
/// <param name="SecondRequest">VAR Text.</param>
35+
/// <param name="ThirdRequest">VAR Text.</param>
36+
local procedure CheckInitializeAndCreateSomeNumberSeries(var FirstRequest: Text; var SecondRequest: Text; var ThirdRequest: Text)
37+
var
38+
DependencyGraphFacadeANJ: Codeunit DependencyGraphFacade_ANJ;
39+
begin
40+
DependencyGraphFacadeANJ.InitializeNumberSequence();
41+
FirstRequest := DependencyGraphFacadeANJ.GetNextNumberSequence();
42+
SecondRequest := DependencyGraphFacadeANJ.GetNextNumberSequence();
43+
ThirdRequest := DependencyGraphFacadeANJ.GetNextNumberSequence();
44+
end;
45+
46+
var
47+
LibraryAssert: Codeunit "Library Assert";
48+
FirstRequestLbl: Label 'E1';
49+
NumberSequenceErr: Label 'The number secuence does not correspond to the expected one';
50+
SecondRequestLbl: Label 'E2';
51+
ThirdRequestLbl: Label 'E3';
52+
}

‎Dependency-Graph.Test/src/Test/TemporaryTablesTestANJ.Codeunit.al

Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,8 @@
1+
/// <summary>
2+
/// Codeunit "TemporaryTablesTest_ANJ" (ID 99992).
3+
/// </summary>
4+
codeunit 99992 TemporaryTablesTest_ANJ
5+
{
6+
Access = Public;
7+
Subtype = Test;
8+
}

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

Lines changed: 31 additions & 30 deletions
Original file line numberDiff line numberDiff line change
@@ -5,27 +5,6 @@ codeunit 80810 DependencyGraphFacade_ANJ
55
{
66
Access = Public;
77

8-
#region codeunit 80807 GenerateTables_ANJ
9-
/// <summary>
10-
/// GenerateAllTables.
11-
/// </summary>
12-
/// <param name="HideDialog">Boolean.</param>
13-
procedure GenerateAllTables(HideDialog: Boolean);
14-
begin
15-
GenerateTables.Generate(HideDialog);
16-
end;
17-
#endregion
18-
19-
#region codeunit 80805 GenerateExtensionTable_ANJ
20-
/// <summary>
21-
/// GenerateExtensionsTable.
22-
/// </summary>
23-
procedure GenerateExtensionsTable();
24-
begin
25-
GenerateExtensionTable.Generate();
26-
end;
27-
#endregion
28-
298
#region codeunit 80806 NumberSequenceMgmt_ANJ
309
/// <summary>
3110
/// InitializeNumberSequence
@@ -59,23 +38,24 @@ codeunit 80810 DependencyGraphFacade_ANJ
5938
end;
6039
#endregion
6140

62-
#region codeunit 80809 MarkdownMgmt_ANJ
41+
#region codeunit 80807 GenerateTables_ANJ
6342
/// <summary>
64-
/// GenerateGraph.
43+
/// GenerateAllTables.
6544
/// </summary>
66-
procedure GenerateGraph();
45+
/// <param name="HideDialog">Boolean.</param>
46+
procedure GenerateAllTables(HideDialog: Boolean);
6747
begin
68-
MarkdownMgmt.GenerateGraph();
48+
GenerateTables.Generate(HideDialog);
6949
end;
50+
#endregion
7051

52+
#region codeunit 80805 GenerateExtensionTable_ANJ
7153
/// <summary>
72-
/// GetMarkdownText.
54+
/// GenerateExtensionsTable.
7355
/// </summary>
74-
/// <param name="FieldNo">Integer.</param>
75-
/// <returns>Return value of type Text.</returns>
76-
procedure GetMarkdownText(FieldNo: Integer): Text;
56+
procedure GenerateExtensionsTable();
7757
begin
78-
exit(MarkdownMgmt.GetMarkdown(FieldNo));
58+
GenerateExtensionTable.Generate();
7959
end;
8060
#endregion
8161

@@ -106,6 +86,27 @@ codeunit 80810 DependencyGraphFacade_ANJ
10686
CleanTemporaryTables.Clean(false, true);
10787
end;
10888
#endregion
89+
90+
#region codeunit 80809 MarkdownMgmt_ANJ
91+
/// <summary>
92+
/// GenerateGraph.
93+
/// </summary>
94+
procedure GenerateGraph();
95+
begin
96+
MarkdownMgmt.GenerateGraph();
97+
end;
98+
99+
/// <summary>
100+
/// GetMarkdownText.
101+
/// </summary>
102+
/// <param name="FieldNo">Integer.</param>
103+
/// <returns>Return value of type Text.</returns>
104+
procedure GetMarkdownText(FieldNo: Integer): Text;
105+
begin
106+
exit(MarkdownMgmt.GetMarkdown(FieldNo));
107+
end;
108+
#endregion
109+
109110
var
110111
CleanTemporaryTables: Codeunit CleanTemporaryTables_ANJ;
111112
GenerateExtensionTable: Codeunit GenerateExtensionTable_ANJ;

0 commit comments

Comments
 (0)