1+ // / <summary>
2+ // / Codeunit "GenerateFiguresTest_ANJ" (ID 99991).
3+ // / </summary>
4+ codeunit  99991  GenerateFiguresTest_ANJ
5+ {
6+     Access = Public;
7+     Subtype = Test;
8+     TestPermissions  = Disabled;
9+ 
10+     [Test]
11+     procedure  GenerateFigures() ;
12+     var 
13+         ScopeDevFigure: Text ;
14+         ScopeGlobalFigure: Text ;
15+         ScopePTEFigure: Text ;
16+     begin 
17+         //  [Scenario] 
18+         //  Verify that the figures are being generated according to each of the extension scopes.
19+ 
20+         //  [Given] Setup: 
21+         InitializeDependencyGraphSetup() ;
22+ 
23+         //  [When] Exercise: 
24+         GetFigureText( ScopeDevFigure, ScopeGlobalFigure, ScopePTEFigure) ;
25+ 
26+         //  [Then] Verify: 
27+         LibraryAssert. AreEqual( ScopePTEFigure, StrSubstNo( SquareRectangleFigureLbl, IdentityLbl, AppNameLbl) , StrSubstNo( GenerateFigureErr)) ;
28+         LibraryAssert. AreEqual( ScopeGlobalFigure, StrSubstNo( CircleFigureLbl, IdentityLbl, AppNameLbl) , StrSubstNo( GenerateFigureErr)) ;
29+         LibraryAssert. AreEqual( ScopeDevFigure, StrSubstNo( RhombusFigureLbl, IdentityLbl, AppNameLbl) , StrSubstNo( GenerateFigureErr)) ;
30+     end ;
31+ 
32+     // / <summary>
33+     // / InitializeDependencyGraphSetup
34+     // / </summary>
35+     local  procedure  InitializeDependencyGraphSetup() 
36+     var 
37+         DependencyGraphSetup: Record  DependencyGraphSetup_ANJ;
38+     begin 
39+         DependencyGraphSetup. GetInstance() ;
40+         DependencyGraphSetup. Validate( ScopePTEFigure, Enum ::GeometricFigure_ANJ::SquareRectangle) ;
41+         DependencyGraphSetup. Validate( ScopeGlobalFigure, Enum ::GeometricFigure_ANJ::Circle) ;
42+         DependencyGraphSetup. Validate( ScopeDevFigure, Enum ::GeometricFigure_ANJ::Rhombus) ;
43+         DependencyGraphSetup. Modify ( true) ;
44+     end ;
45+ 
46+     // / <summary>
47+     // / GetFigureText.
48+     // / </summary>
49+     // / <param name="ScopeDevFigure">VAR Text.</param>
50+     // / <param name="ScopeGlobalFigure">VAR Text.</param>
51+     // / <param name="ScopePTEFigure">VAR Text.</param>
52+     local  procedure  GetFigureText( var  ScopeDevFigure: Text ; var  ScopeGlobalFigure: Text ; var  ScopePTEFigure: Text ) 
53+     begin 
54+         ScopePTEFigure :=  DependencyGraphFacadeANJ. GenerateFigures( Enum ::ExtensionScope_ANJ::PTE, IdentityLbl, AppNameLbl) ;
55+         ScopeGlobalFigure :=  DependencyGraphFacadeANJ. GenerateFigures( Enum ::ExtensionScope_ANJ::Global, IdentityLbl, AppNameLbl) ;
56+         ScopeDevFigure :=  DependencyGraphFacadeANJ. GenerateFigures( Enum ::ExtensionScope_ANJ::Dev, IdentityLbl, AppNameLbl) ;
57+     end ;
58+ 
59+     var 
60+         DependencyGraphFacadeANJ: Codeunit  DependencyGraphFacade_ANJ;
61+         LibraryAssert: Codeunit  "Library Assert";
62+         AppNameLbl: Label  ' App'  ;
63+         CircleFigureLbl: Label  ' %1((%2))'  ;
64+         GenerateFigureErr: Label  ' Error generating figures.'  ;
65+         IdentityLbl: Label  ' E1'  ;
66+         RhombusFigureLbl: Label  ' %1{%2}'  ;
67+         SquareRectangleFigureLbl: Label  ' %1[%2]'  ;
68+ }
0 commit comments