Dynamics SL Migration Update March 2026

Apps/W1/HybridSL/app/src/Migration/Accounts/SLAccountStaging.Table.al

@@ -19,6 +19,7 @@ table 47000 "SL Account Staging"
         }
         field(2; Name; Text[30])
         {
+            Caption = 'Name';
         }
         field(3; SearchName; Text[30])
         {

Apps/W1/HybridSL/app/src/Migration/History/SLPopulateHistTables.Codeunit.al

@@ -373,15 +373,14 @@ codeunit 47025 "SL Populate Hist. Tables"
 
     internal procedure PopulateHistoricalSOHeader()
     var
-        SLSOHeader: Record "SL SOHeader";
+        SLSOHeader: Record "SL SOHeader Buffer";
         SLHistSOHeader: Record "SL Hist. SOHeader";
         SourceTableId: Integer;
         LastSourceRecordId: Integer;
     begin
-        SourceTableId := Database::"SL SOHeader";
+        SourceTableId := Database::"SL SOHeader Buffer";
         if InitialHistYear > 0 then
-            SLSOHeader.SetFilter(Crtd_DateTime, '>= %1', InitialDateTime);
-
+            SLSOHeader.SetFilter(OrdDate, '>= %1', InitialYearDate);
         SLSOHeader.SetFilter(CpnyID, '= %1', GetCpnyID());
 
         if not SLSOHeader.FindSet() then
@@ -404,32 +403,53 @@ codeunit 47025 "SL Populate Hist. Tables"
 
     internal procedure PopulateHistoricalSOLine()
     var
-        SLSOLine: Record "SL SOLine";
         SLHistSOLine: Record "SL Hist. SOLine";
+        SLSOHeader: Record "SL SOHeader Buffer";
+        SLSOLine: Record "SL SOLine Buffer";
         SourceTableId: Integer;
         LastSourceRecordId: Integer;
     begin
-        SourceTableId := Database::"SL SOLine";
-        if InitialHistYear > 0 then
-            SLSOLine.SetFilter(Crtd_DateTime, '>= %1', InitialDateTime);
-
-        SLSOLine.SetFilter(CpnyID, '= %1', GetCpnyID());
-
-        if not SLSOLine.FindSet() then
-            exit;
-
-        repeat
-            LastSourceRecordId := SLSOLine.SystemRowVersion;
-            Clear(SLHistSOLine);
-            SLHistSOLine.TransferFields(SLSOLine);
-
-            if SLHistSOLine.Insert() then
-                ReportLastSuccess(SourceTableId, LastSourceRecordId)
-            else
-                ReportLastError(SourceTableId, LastSourceRecordId, "SL Hist. Migration Step Type"::"SL Receivables Trx.", SLSOLine.CpnyID + '-' + SLSOLine.OrdNbr + '-' + SLSOLine.LineRef);
+        SourceTableId := Database::"SL SOLine Buffer";
+        if InitialHistYear > 0 then begin
+            SLSOHeader.SetFilter(CpnyID, '= %1', GetCpnyID());
+            SLSOHeader.SetFilter(OrdDate, '>= %1', InitialYearDate);
+            if not SLSOHeader.FindSet() then
+                exit;
+            repeat
+                SLSOLine.SetFilter(CpnyID, '= %1', GetCpnyID());
+                SLSOLine.SetFilter(OrdNbr, '= %1', SLSOHeader.OrdNbr);
+                if not SLSOLine.FindSet() then
+                    continue;
+                repeat
+                    LastSourceRecordId := SLSOLine.SystemRowVersion;
+                    Clear(SLHistSOLine);
+                    SLHistSOLine.TransferFields(SLSOLine);
+                    if SLHistSOLine.Insert() then
+                        ReportLastSuccess(SourceTableId, LastSourceRecordId)
+                    else
+                        ReportLastError(SourceTableId, LastSourceRecordId, "SL Hist. Migration Step Type"::"SL Receivables Trx.", SLSOLine.CpnyID + '-' + SLSOLine.OrdNbr + '-' + SLSOLine.LineRef);
+
+                    AfterProcessedNextRecord(SourceTableId, LastSourceRecordId);
+                until SLSOLine.Next() = 0;
+            until SLSOHeader.Next() = 0;
+        end else begin
+            SLSOLine.SetFilter(CpnyID, '= %1', GetCpnyID());
+            if not SLSOLine.FindSet() then
+                exit;
+            repeat
+                LastSourceRecordId := SLSOLine.SystemRowVersion;
+                Clear(SLHistSOLine);
+                SLHistSOLine.TransferFields(SLSOLine);
+
+                if SLHistSOLine.Insert() then
+                    ReportLastSuccess(SourceTableId, LastSourceRecordId)
+                else
+                    ReportLastError(SourceTableId, LastSourceRecordId, "SL Hist. Migration Step Type"::"SL Receivables Trx.", SLSOLine.CpnyID + '-' + SLSOLine.OrdNbr + '-' + SLSOLine.LineRef);
+
+                AfterProcessedNextRecord(SourceTableId, LastSourceRecordId);
+            until SLSOLine.Next() = 0;
+        end;
 
-            AfterProcessedNextRecord(SourceTableId, LastSourceRecordId);
-        until SLSOLine.Next() = 0;
         AfterProcessedSection(SourceTableId, LastSourceRecordId);
     end;
 
@@ -475,7 +495,7 @@ codeunit 47025 "SL Populate Hist. Tables"
         if InitialHistYear > 0 then
             SLSOShipLine.SetFilter(Crtd_DateTime, '>= %1', InitialDateTime);
 
-        SLSOShipLine.SetFilter(CpnyID, '= %1', CompanyName);
+        SLSOShipLine.SetFilter(CpnyID, '= %1', GetCpnyID());
 
         if not SLSOShipLine.FindSet() then
             exit;
@@ -497,20 +517,16 @@ codeunit 47025 "SL Populate Hist. Tables"
 
     internal procedure PopulateHistoricalSOType()
     var
-        SLSOType: Record "SL SOType";
+        SLSOType: Record "SL SOType Buffer";
         SLHistSOType: Record "SL Hist. SOType";
         SourceTableId: Integer;
         LastSourceRecordId: Integer;
         Inactive: Integer;
     begin
-        SourceTableId := Database::"SL SOType";
+        SourceTableId := Database::"SL SOType Buffer";
         Inactive := 0;
-        if InitialHistYear > 0 then
-            SLSOType.SetFilter(Crtd_DateTime, '>= %1', InitialDateTime);
-
         SLSOType.SetFilter(CpnyID, '= %1', GetCpnyID());
         SLSOType.SetFilter(Active, '<> %1', Inactive);
-
         if not SLSOType.FindSet() then
             exit;
 
@@ -679,17 +695,15 @@ codeunit 47025 "SL Populate Hist. Tables"
 
     internal procedure PopulateHistoricalPurOrdDet()
     var
-        SLPurOrdDet: Record "SL PurOrdDet";
+        SLPurOrdDet: Record "SL PurOrdDet Buffer";
         SLHistPurOrdDet: Record "SL Hist. PurOrdDet";
         SourceTableId: Integer;
         LastSourceRecordId: Integer;
     begin
-        SourceTableId := Database::"SL PurOrdDet";
+        SourceTableId := Database::"SL PurOrdDet Buffer";
         if InitialHistYear > 0 then
             SLPurOrdDet.SetFilter(Crtd_DateTime, '>= %1', InitialDateTime);
-
         SLPurOrdDet.SetFilter(CpnyID, '= %1', GetCpnyID());
-
         if not SLPurOrdDet.FindSet() then
             exit;
 
@@ -710,14 +724,14 @@ codeunit 47025 "SL Populate Hist. Tables"
 
     internal procedure PopulateHistoricalPurchOrd()
     var
-        SLPurchOrd: Record "SL PurchOrd";
+        SLPurchOrd: Record "SL PurchOrd Buffer";
         SLHistPurchOrd: Record "SL Hist. PurchOrd";
         SourceTableId: Integer;
         LastSourceRecordId: Integer;
     begin
-        SourceTableId := Database::"SL PurchOrd";
+        SourceTableId := Database::"SL PurchOrd Buffer";
         if InitialHistYear > 0 then
-            SLPurchOrd.SetFilter(PODate, '>= %1', InitialDateTime);
+            SLPurchOrd.SetFilter(PODate, '>= %1', InitialYearDate);
 
         SLPurchOrd.SetFilter(CpnyID, '= %1', GetCpnyID());
 

Apps/W1/HybridSL/app/src/Migration/History/SLSOHeader.Table.al

@@ -1,3 +1,4 @@
+#if not CLEANSCHEMA31
 // ------------------------------------------------------------------------------------------------
 // Copyright (c) Microsoft Corporation. All rights reserved.
 // Licensed under the MIT License. See License.txt in the project root for license information.
@@ -10,6 +11,14 @@ table 47034 "SL SOHeader"
     Access = Internal;
     DataClassification = CustomerContent;
     ReplicateData = false;
+    ObsoleteReason = 'Replaced by table SL SOHeader Buffer.';
+#if not CLEAN28
+    ObsoleteState = Pending;
+    ObsoleteTag = '28.0';
+#else
+    ObsoleteState = Removed;
+    ObsoleteTag = '31.0';
+#endif
 
     fields
     {
@@ -836,4 +845,5 @@ table 47034 "SL SOHeader"
             Clustered = true;
         }
     }
-}
+}
+#endif

Apps/W1/HybridSL/app/src/Migration/History/SLSOLine.Table.al

@@ -1,3 +1,4 @@
+#if not CLEANSCHEMA31
 // ------------------------------------------------------------------------------------------------
 // Copyright (c) Microsoft Corporation. All rights reserved.
 // Licensed under the MIT License. See License.txt in the project root for license information.
@@ -10,6 +11,14 @@ table 47035 "SL SOLine"
     Access = Internal;
     DataClassification = CustomerContent;
     ReplicateData = false;
+    ObsoleteReason = 'Replaced by table SL SOLine Buffer.';
+#if not CLEAN28
+    ObsoleteState = Pending;
+    ObsoleteTag = '28.0';
+#else
+    ObsoleteState = Removed;
+    ObsoleteTag = '31.0';
+#endif
 
     fields
     {
@@ -595,4 +604,5 @@ table 47035 "SL SOLine"
             Clustered = true;
         }
     }
-}
+}
+#endif

Apps/W1/HybridSL/app/src/Migration/History/SLSOType.Table.al

@@ -1,3 +1,4 @@
+#if not CLEANSCHEMA31
 // ------------------------------------------------------------------------------------------------
 // Copyright (c) Microsoft Corporation. All rights reserved.
 // Licensed under the MIT License. See License.txt in the project root for license information.
@@ -10,6 +11,14 @@ table 47051 "SL SOType"
     Access = Internal;
     DataClassification = CustomerContent;
     ReplicateData = false;
+    ObsoleteReason = 'Replaced by table SL SOType Buffer.';
+#if not CLEAN28
+    ObsoleteState = Pending;
+    ObsoleteTag = '28.0';
+#else
+    ObsoleteState = Removed;
+    ObsoleteTag = '31.0';
+#endif
 
     fields
     {
@@ -328,4 +337,5 @@ table 47051 "SL SOType"
             Clustered = true;
         }
     }
-}
+}
+#endif