updated material track row generation to store the start dtm of a work order so that the json response can be sorted corrected

LSL2/STPROC/REPORT_SERVICES.txt

@@ -604,7 +604,7 @@ Service GetMaterialTrackJSON()
 	
 	ErrCode = ''
 	KeyList = ''
-	Query   = 'SELECT MATERIAL_REPORT BY REACT_NO BY WO_NO'
+	Query   = 'SELECT MATERIAL_REPORT BY REACT_NO BY START_DTM'
 	RList(Query, TARGET_ACTIVELIST$, '', '', '')
 	If Not(Get_Status(ErrCode)) then
 		EOF = False$
@@ -1529,6 +1529,7 @@ Service GenerateMaterialTrackRows()
 								
 								* Calculate Value(s) For Column(s)
 								
+								S.StartDtm     = {START_DTM}
 								S.ATID         = {@ID}
 								I.ATID         = S.ATID
 								S.ReactNo      = {REACT_NO}
@@ -1737,6 +1738,7 @@ Service GenerateMaterialTrackRows()
 								AllReportData<RowIndex, 13> = KitCassList  ; // Skip field 14, it is populated by users
 								AllReportData<RowIndex, 15> = PTICassList
 								AllReportData<RowIndex, 16> = LoadedCassList ; // Skip field 17, it is populated by users
+								AllReportData<RowIndex, 18> = S.StartDtm
 						
 							end
 						end else

LSL2/STPROCINS/MATERIAL_REPORT_EQUATES.txt

@@ -24,5 +24,7 @@ compile insert MATERIAL_REPORT_EQUATES
    equ MATERIAL_REPORT.PTI_RO$       to 15
    equ MATERIAL_REPORT.LOAD_RO$      to 16
    equ MATERIAL_REPORT.COMMENTS$     to 17
+   equ MATERIAL_REPORT.START_DTM$    to 18
    
 #endif
+