Skip to content

Commit a960301

Browse files
committed
Code review comments
1 parent 9a24cc5 commit a960301

File tree

8 files changed

+6
-87
lines changed

8 files changed

+6
-87
lines changed

src/Tools/AI Test Toolkit/src/AITCommandLineCard.Page.al

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -46,10 +46,10 @@ page 149042 "AIT CommandLine Card"
4646
UpdateAITestMethodLines();
4747
end;
4848
}
49-
field("Language Tag"; LanguageTag)
49+
field("Language Tag"; LanguageTagFilter)
5050
{
51-
Caption = 'Language Tag';
52-
ToolTip = 'Specifies the language tag for the test method lines.';
51+
Caption = 'Language';
52+
ToolTip = 'Specifies the language to run.';
5353

5454
trigger OnValidate()
5555
var
@@ -61,7 +61,7 @@ page 149042 "AIT CommandLine Card"
6161

6262
Clear(LineNoFilter);
6363

64-
AITTestSuite.Validate("Language ID", AITTestSuiteLanguage.GetLanguageIDByTag(LanguageTag));
64+
AITTestSuite.Validate("Language ID", AITTestSuiteLanguage.GetLanguageIDByTag(LanguageTagFilter));
6565
AITTestSuite.Modify(true);
6666

6767
UpdateAITestMethodLines();
@@ -295,7 +295,7 @@ page 149042 "AIT CommandLine Card"
295295
CannotFindAITSuiteErr: Label 'The specified Test Suite with code %1 cannot be found.', Comment = '%1 = Test Suite id.';
296296
AITCode: Code[100];
297297
LineNoFilter: Integer;
298-
LanguageTag: Text[80];
298+
LanguageTagFilter: Text[80];
299299
NoOfPendingTests: Integer;
300300
InputDataset: Text;
301301
SuiteDefinition: Text;

src/Tools/AI Test Toolkit/src/TestSuite/AITALTestSuiteMgt.Codeunit.al

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -255,7 +255,6 @@ codeunit 149037 "AIT AL Test Suite Mgt"
255255
ImportTestInputs(DatasetFileName, DatasetInStream, CallerModuleInfo, LanguageID, DatasetFileName);
256256
end;
257257

258-
259258
/// <summary>
260259
/// Import the Test Input Dataset from an InStream of a dataset in a supported format with a specific language.
261260
/// Overwrite the dataset if the dataset with same filename is already imported by the same app

src/Tools/AI Test Toolkit/src/TestSuite/AITRunFrequency.Enum.al

Lines changed: 0 additions & 54 deletions
This file was deleted.

src/Tools/AI Test Toolkit/src/TestSuite/AITTestSuite.Page.al

Lines changed: 0 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -61,11 +61,6 @@ page 149031 "AIT Test Suite"
6161
{
6262
ApplicationArea = All;
6363
}
64-
field("Run Frequency"; Rec."Run Frequency")
65-
{
66-
ApplicationArea = All;
67-
ToolTip = 'Specifies how frequently the test suite should be run.';
68-
}
6964
field("Language Tag"; Language)
7065
{
7166
ApplicationArea = All;

src/Tools/AI Test Toolkit/src/TestSuite/AITTestSuite.Table.al

Lines changed: 0 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -119,11 +119,6 @@ table 149030 "AIT Test Suite"
119119
Caption = 'Copilot Capability';
120120
ToolTip = 'Specifies the Copilot Capability that the test suite tests.';
121121
}
122-
field(15; "Run Frequency"; Enum "AIT Run Frequency")
123-
{
124-
Caption = 'Run Frequency';
125-
ToolTip = 'Specifies how frequently the test suite should be run.';
126-
}
127122
field(16; "Base Version"; Integer)
128123
{
129124
Caption = 'Base Version';

src/Tools/AI Test Toolkit/src/TestSuite/AITTestSuiteImportExport.XmlPort.al

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -66,10 +66,6 @@ xmlport 149031 "AIT Test Suite Import/Export"
6666
{
6767
Occurrence = Optional;
6868
}
69-
fieldattribute(Frequency; "AITSuite"."Run Frequency")
70-
{
71-
Occurrence = Optional;
72-
}
7369
textattribute(DefaultLanguage)
7470
{
7571
Occurrence = Optional;

src/Tools/AI Test Toolkit/src/TestSuite/AITTestSuiteLanguage.Codeunit.al

Lines changed: 0 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -24,13 +24,11 @@ codeunit 149046 "AIT Test Suite Language"
2424
begin
2525
AddLanguagesFromTestSuite(AITTestSuite);
2626

27-
// Verify language is available for the test suite
2827
if not AITTestSuiteLanguage.Get(AITTestSuite.Code, AITTestSuite."Language ID") then
2928
Error(LanguageNotAvailableErr, AITTestSuite."Language ID", AITTestSuite.Code);
3029

3130
AITTestMethodLine.SetRange("Test Suite Code", AITTestSuite.Code);
3231

33-
// Update test method lines to use the selected language version
3432
if AITTestMethodLine.FindSet() then
3533
repeat
3634
UpdateLanguageForTestMethodLine(AITTestMethodLine, AITTestSuiteLanguage);
@@ -49,15 +47,12 @@ codeunit 149046 "AIT Test Suite Language"
4947
InputDatasetNotFoundErr: Label 'Input Dataset %1 not found in Test Input Groups.', Comment = '%1 - input dataset.';
5048
NoLocalizedVersionErr: Label 'No localized version found for Input Dataset %1 in Language ID %2.', Comment = '%1 - input dataset, %2 - language ID.';
5149
begin
52-
// Only update test method lines with input datasets
5350
if AITTestMethodLine."Input Dataset" = '' then
5451
exit;
5552

56-
// Verify that the input dataset exists
5753
if not TestInputGroup.Get(AITTestMethodLine."Input Dataset") then
5854
Error(InputDatasetNotFoundErr, AITTestMethodLine."Input Dataset");
5955

60-
// Update input dataset to language version
6156
TestInputGroupLanguageVersion.SetRange("Group Name", TestInputGroup."Group Name");
6257
TestInputGroupLanguageVersion.SetRange("Language ID", AITTestSuiteLanguage."Language ID");
6358
if not TestInputGroupLanguageVersion.FindFirst() then
@@ -80,7 +75,6 @@ codeunit 149046 "AIT Test Suite Language"
8075
begin
8176
AITTestMethodLine.SetRange("Test Suite Code", AITTestSuite.Code);
8277

83-
// Update available languages based on test method lines in the test suite
8478
if AITTestMethodLine.FindSet() then
8579
repeat
8680
if AddLanguagesFromTestMethodLine(AITTestMethodLine) then
@@ -179,7 +173,6 @@ codeunit 149046 "AIT Test Suite Language"
179173
var
180174
AITTestSuiteLanguage: Record "AIT Test Suite Language";
181175
begin
182-
AITTestSuiteLanguage.Init();
183176
AITTestSuiteLanguage."Test Suite Code" := TestSuiteCode;
184177
AITTestSuiteLanguage."Language ID" := LanguageID;
185178
AITTestSuiteLanguage.Insert(true);

src/Tools/Test Framework/Test Runner/src/DataDrivenTest/DataInputs/TestInputGroup.Table.al

Lines changed: 1 addition & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -168,20 +168,17 @@ table 130454 "Test Input Group"
168168
DefaultGroup: Record "Test Input Group";
169169
AllGroupsWithSameName: Record "Test Input Group";
170170
begin
171-
// Only update parent groups if this record doesn't already have a parent
172171
if Rec."Parent Group Code" <> '' then
173172
exit;
174173

175-
// Find if there's already a group with the same Group Name
176174
ExistingGroup.SetRange("Group Name", Rec."Group Name");
177175
ExistingGroup.SetFilter(Code, '<>%1', Rec.Code);
178176

179177
if not ExistingGroup.FindFirst() then
180-
exit; // No existing group with same name, nothing to do
178+
exit;
181179

182180
// Check if current record is default language - it should become parent of all
183181
if Rec."Language ID" = GetDefaultLanguageID() then begin
184-
// This is default language, make it the parent of all others with same Group Name
185182
AllGroupsWithSameName.SetRange("Group Name", Rec."Group Name");
186183
AllGroupsWithSameName.SetFilter(Code, '<>%1', Rec.Code);
187184
if AllGroupsWithSameName.FindSet(true) then
@@ -190,13 +187,11 @@ table 130454 "Test Input Group"
190187
AllGroupsWithSameName.Modify(true);
191188
until AllGroupsWithSameName.Next() = 0;
192189
end else begin
193-
// This is not default language, find the default language group and make it the parent
194190
DefaultGroup.SetRange("Group Name", Rec."Group Name");
195191
DefaultGroup.SetRange("Language ID", GetDefaultLanguageID());
196192
if DefaultGroup.FindFirst() then
197193
Validate(Rec."Parent Group Code", DefaultGroup.Code)
198194
else begin
199-
// No default language version exists yet, use the first existing group that has no parent as parent
200195
ExistingGroup.SetRange("Group Name", Rec."Group Name");
201196
ExistingGroup.SetFilter(Code, '<>%1', Rec.Code);
202197
ExistingGroup.SetRange("Parent Group Code", '');

0 commit comments

Comments
 (0)