From 177669e56cf73df33db88805d19e02cf20585fc9 Mon Sep 17 00:00:00 2001
From: Stig <65776111+stkillen@users.noreply.github.com>
Date: Thu, 26 Sep 2024 20:06:37 +0200
Subject: [PATCH] [AI Test Tool] Update lines when changing input dataset
 (#1933)

<!-- Thank you for submitting a Pull Request. If you're new to
contributing to BCApps please read our pull request guideline below
* https://github.com/microsoft/BCApps/Contributing.md
-->
#### Summary <!-- Provide a general summary of your changes -->
When updating the input dataset of the suite, we should update the lines
to clearly reflect what dataset will be used for each line.

#### Work Item(s) <!-- Add the issue number here after the #. The issue
needs to be open and approved. Submitting PRs with no linked issues or
unapproved issues is highly discouraged. -->
Fixes
[AB#547352](https://dynamicssmb2.visualstudio.com/Dynamics%20SMB/_workitems/edit/543079/)
---
 .../src/TestSuite/AITTestMethodLine.Table.al        |  8 ++++++++
 .../src/TestSuite/AITTestSuite.Table.al             | 13 +++++++++++++
 2 files changed, 21 insertions(+)

diff --git a/src/Tools/AI Test Toolkit/src/TestSuite/AITTestMethodLine.Table.al b/src/Tools/AI Test Toolkit/src/TestSuite/AITTestMethodLine.Table.al
index da4ea0598d..ee7ff51885 100644
--- a/src/Tools/AI Test Toolkit/src/TestSuite/AITTestMethodLine.Table.al	
+++ b/src/Tools/AI Test Toolkit/src/TestSuite/AITTestMethodLine.Table.al	
@@ -213,6 +213,14 @@ table 149032 "AIT Test Method Line"
         exit(AITTestSuite."Input Dataset");
     end;
 
+    trigger OnInsert()
+    var
+        AITTestSuite: Record "AIT Test Suite";
+    begin
+        if AITTestSuite.Get(Rec."Test Suite Code") then
+            Rec."Input Dataset" := AITTestSuite."Input Dataset";
+    end;
+
     trigger OnDelete()
     var
         ALTestSuite: Record "AL Test Suite";
diff --git a/src/Tools/AI Test Toolkit/src/TestSuite/AITTestSuite.Table.al b/src/Tools/AI Test Toolkit/src/TestSuite/AITTestSuite.Table.al
index da05050dcc..bad852cf5f 100644
--- a/src/Tools/AI Test Toolkit/src/TestSuite/AITTestSuite.Table.al	
+++ b/src/Tools/AI Test Toolkit/src/TestSuite/AITTestSuite.Table.al	
@@ -46,6 +46,18 @@ table 149030 "AIT Test Suite"
             TableRelation = "Test Input Group".Code;
             ValidateTableRelation = true;
             ToolTip = 'Specifies the dataset to be used by the test suite.';
+
+            trigger OnValidate()
+            var
+                AITTestMethodLine: Record "AIT Test Method Line";
+            begin
+                if GuiAllowed() then
+                    if not Dialog.Confirm(InputDatasetChangedQst) then
+                        exit;
+
+                AITTestMethodLine.SetRange("Test Suite Code", Rec.Code);
+                AITTestMethodLine.ModifyAll("Input Dataset", Rec."Input Dataset", true);
+            end;
         }
         field(8; "Ended at"; DateTime)
         {
@@ -240,4 +252,5 @@ table 149030 "AIT Test Suite"
 
     var
         BaseVersionMustBeLessThanVersionErr: Label 'Base Version must be less than or equal to Version';
+        InputDatasetChangedQst: Label 'You have modified the input dataset.\\Do you want to update the lines?';
 }