phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

pre cutover push

Browse Source
This commit is contained in:
Infineon\StieberD
2024-09-04 20:33:41 -07:00
parent 6ea6969f4b
commit 7762b129af
2072 changed files with 130000 additions and 95295 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
LSL2/STPROC/NDW_SCHEDULER_STOP_WO_EVENTS.txt
View File

@ -186,6 +186,7 @@ end event
Event CMB_STOP_AFTER.CHANGED(NewData)
GoSub UpdateWorkOrderDetails
Set_Property(CtrlEntID, 'TEXT', NewData)
GoSub EnableSaveButton
end event
@ -318,10 +319,10 @@ UpdateWorkOrderDetails:
end
end
Convert @VM to @FM in StopAfterList
StopRun = Get_Property(@Window:'.CMB_STOP_AFTER', 'TEXT')
Set_Property(@Window:'.CMB_STOP_AFTER', 'LIST', StopAfterList)
CassList = StopAfterList
NumStopRuns = DCount(CassList, @FM)
StopRun = Get_Property(@Window:'.CMB_STOP_AFTER', 'TEXT')
ModifyRunQty = 0
For Run = 1 to StopRun
RDSNo = RDSNos<0, Run>
@ -338,6 +339,7 @@ UpdateWorkOrderDetails:
end
TotalRunTime = EndDTM - StartDTM
end else
StopCass = Get_Property(@Window:'.CMB_STOP_AFTER', 'TEXT')
If CassList EQ '' then
StopAfterList = SRP_Array('Join', EventCurrCass, EventUnprocCass, 'OR', @VM)
StopAfterList = SRP_Array('SortSimpleList', StopAfterList, 'AscendingNumbers', @VM)
@ -350,10 +352,10 @@ UpdateWorkOrderDetails:
end
Convert @VM to @FM in StopAfterList
Set_Property(@Window:'.CMB_STOP_AFTER', 'LIST', StopAfterList)
Set_Property(@Window:'.CMB_STOP_AFTER', 'TEXT', StopCass)
CassList = StopAfterList
end
NumStopCass = DCount(CassList, @FM)
StopCass = Get_Property(@Window:'.CMB_STOP_AFTER', 'TEXT')
ModifyCassQty = 0
Locate StopCass in CassList using @FM setting fPos then
For CassIndex = (fPos + 1) to NumStopCass
@ -445,6 +447,3 @@ EnableSaveButton:
return