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

21
LSL2/STPROC/PSTEST.txt Normal file
View File

@ -0,0 +1,21 @@
compile Subroutine PSTEST(void)
Val1 = Oconv(Oconv(1.0E+20, "MS21"), "MS21")
Val2 = Oconv(1.5E20, "MS21")
Val3 = Iconv("2.0E+20", "MS")
debug
return
* call Set_MFS("WO_MAST_SCHED", "SQL_MFS*LSL2", 1)
* If Get_Status(ErrorCodes) then
* Debug
* end
Dim Rec(53)
A = Rec(1)
B = Rec(UnassignedVar$)
return