added: explicit validation of customer related fields

microsoft · Oct 24, 2024 · b621466 · b621466
1 parent 7294528
commit b621466
Showing 1 changed file with 11 additions and 0 deletions.
diff --git a/Apps/W1/FieldServiceIntegration/app/src/Codeunits/FSIntTableSubscriber.Codeunit.al b/Apps/W1/FieldServiceIntegration/app/src/Codeunits/FSIntTableSubscriber.Codeunit.al
@@ -883,6 +883,7 @@ codeunit 6610 "FS Int. Table Subscriber"
                 end;
             'FS Work Order-Service Header':
                 begin
+                    ValidateServiceHeaderAfterInsert(DestinationRecordRef);
                     ResetServiceOrderItemLineFromFSWorkOrderIncident(SourceRecordRef, DestinationRecordRef, ArchivedServiceOrders);
                     ResetServiceOrderLineFromFSWorkOrderProduct(SourceRecordRef, DestinationRecordRef, ArchivedServiceOrders);
                     ResetServiceOrderLineFromFSWorkOrderService(SourceRecordRef, DestinationRecordRef, ArchivedServiceOrders);
@@ -992,6 +993,16 @@ codeunit 6610 "FS Int. Table Subscriber"
         end;
     end;
 
+    local procedure ValidateServiceHeaderAfterInsert(DestinationRecordRef: RecordRef)
+    var
+        ServiceHeader: Record "Service Header";
+    begin
+        DestinationRecordRef.SetTable(ServiceHeader);
+        ServiceHeader.Validate("Customer No."); // explicit recalculation, as InitRecord() was called after setting the customer
+        ServiceHeader.Modify(true);
+        DestinationRecordRef.GetTable(ServiceHeader);
+    end;
+
     local procedure ResetServiceOrderItemLineFromFSWorkOrderIncident(SourceRecordRef: RecordRef; DestinationRecordRef: RecordRef; var ArchivedServiceOrders: List of [Code[20]])
     var
         ServiceHeader: Record "Service Header";