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

Merged PR 20879: Initial commit.

Browse Source 
Initial commit.
This commit is contained in:
Ouellette Jonathan (CSC FI SPS MESLEO)
2025-07-14 20:55:07 +02:00
parent 804b590773
commit b53e805929
9 changed files with 339 additions and 223 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
LSL2/STPROC/WM_IN_ACTIONS.txt
View File

@ -54,6 +54,7 @@ $insert ACTION_SETUP
$insert WM_IN_EQUATES
$insert RLIST_EQUATES
$insert SCHED_DET_NG_EQUATES
$insert IFX_EQUATES
Equ Comma$ to ','
@ -164,7 +165,7 @@ WRITE_RECORD:
CassNo = Field(Name, '*', 3)
ProcessedDTM = Datetime()
// This service will determine if the cassette needs to be marked as complete.
Service_Services('PostProcedure', 'SCHEDULE_SERVICES', 'MarkCassProcessed':@VM:WONo:@VM:CassNo:@VM:ProcessedDtm)
Service_Services('PostProcedure', 'SCHEDULE_SERVICES', 'MarkCassProcessed':SD$:WONo:SD$:CassNo:SD$:ProcessedDtm)
WfrCount = DCount(Record<WM_IN_SLOT_NO$>, @VM)
If WfrCount LT 25 then
@ -247,3 +248,4 @@ Restore_System_Variables:
return