added LSL2 stored procedures

This commit is contained in:
Infineon\StieberD
2024-03-25 14:46:21 -07:00
parent 09f1a66046
commit c667dd56eb
1655 changed files with 527967 additions and 0 deletions

View File

@ -0,0 +1,38 @@
COMPILE ROUTINE FIX_CONFIG(Dummy)
ROWDEF (CHARSTR)
DECLARE SUBROUTINE SEND_INFO, SEND_DYN, RList,Btree.Extract, Set_Status, Get_Status
OPEN 'CONFIG' TO ConfigTable ELSE
debug
GOTO Bail
END
READ MastSched FROM ConfigTable,'WO_MAST_SCHED' THEN
*WRITE MastSched ON ConfigTable,'WO_MAST_SCHED_ORG' THEN
DEBUG
* WRITE MastSched ON ConfigTable,'WO_MAST_SCHED' THEN
NULL
*END
*END
END
* * * * * * *
Bail:
* * * * * * *
END