Added page extension for Sales Order page to display customer sales d…

…etails,

created a query to retrieve customer sales by quantity, and developed a codeunit
to filter and display customer sales greater than 10.

.vscode/.alcache/cache_77eab916888f94e5db4be34a863cd3dd4e55242014d4675ed9b96d92429fd914.json

@@ -1 +1 @@
-{"Path":"","Timestamp":1717751496500,"Items":[],"CreatedwithVersion":"0.2.4"}
+{"Path":"","Timestamp":1718884524409,"Items":[],"CreatedwithVersion":"0.2.4"}

.vscode/.alcache/cache_77eab916888f94e5db4be34a863cd3dd4e55242014d4675ed9b96d92429fd914events.json

@@ -1 +1 @@
-{"Path":"","Timestamp":1717751496500,"Items":[],"CreatedwithVersion":"0.2.4"}
+{"Path":"","Timestamp":1718884524409,"Items":[],"CreatedwithVersion":"0.2.4"}

.vscode/launch.json

@@ -9,8 +9,8 @@
             "server": "http://localhost:8080/BC210/",
             "serverInstance": "BC210",
             "authentication": "Windows",
-            "startupObjectId": 50108,
-            "startupObjectType": "Query",
+            "startupObjectId": 42,
+            "startupObjectType": "Page",
             "breakOnError": "All",
             "launchBrowser": true,
             "enableLongRunningSqlStatements": true,

Codeunit Query.al

@@ -0,0 +1,26 @@
+// This is a codeunit to filter and display customer sales greater than 10.
+codeunit 50107 MyCodeunit
+{
+    // This is the main trigger that gets executed when the codeunit is run.
+    trigger OnRun()
+    begin
+        // We're setting a filter on the CustomerQuery to only include records where the Quantity is greater than 10.
+        CustomerQuery.SetFilter(Quantity, '>10');
+        // We're opening the query to prepare it for reading.
+        CustomerQuery.Open();
+        // We're reading each record in the query and executing the code inside the loop.
+        while CustomerQuery.Read do begin
+            // We're displaying a message for each record, showing the customer name and quantity.
+            Message(Textbox, CustomerQuery.CustName, CustomerQuery.Quantity);
+        end;
+        // We're closing the query after it has been processed.
+        CustomerQuery.Close();
+    end;
+
+    // This is a variable declaration for the query.
+    var
+        CustomerQuery: Query "Customer Sales by quantity";
+
+        // This is a variable declaration for the message format.
+        Textbox: TextConst ENU = 'Customer name = %1, Quantity =%2,';
+}

Pageextension Query codeunit.al

@@ -0,0 +1,34 @@
+pageextension 50107 SalesCustomer extends "Sales Order"
+{
+    layout
+    {
+        // Add changes to page layout here
+    }
+
+    actions
+    {
+        addafter(AssemblyOrders)
+        {
+            action("Customer Sales Quantity")
+            {
+                ApplicationArea = All;
+                Caption = 'Customer Details';
+                Image = Customer;
+                Promoted = true;
+                PromotedCategory = New;
+
+                trigger OnAction()
+                var
+                    MyCodeunit: Codeunit 50107;
+                begin
+                    Clear(MyCodeunit);
+                    MyCodeunit.Run();
+                end;
+            }
+        }
+        // Add changes to page actions here
+    }
+
+    var
+        myInt: Integer;
+}

Query Sales Volume.al

@@ -1,3 +1,4 @@
+// This is a query to retrieve customer sales by quantity.
 query 50108 "Customer Sales by quantity"
 {
     // This specifies the type of query. In this case, it's a normal query.
@@ -6,6 +7,7 @@ query 50108 "Customer Sales by quantity"
     // This sorts the query results in descending order by the Quantity column.
     OrderBy = descending(Quantity);
 
+    // This defines the elements of the query.
     elements
     {
         // This data item is for the Customer table.