added LSL2 stored procedures
This commit is contained in:
20
LSL2/STPROC/TEST_OBJ_WO_MAT_LOG.txt
Normal file
20
LSL2/STPROC/TEST_OBJ_WO_MAT_LOG.txt
Normal file
@ -0,0 +1,20 @@
|
||||
COMPILE ROUTINE TEST_OBJ_WO_MAT_LOG(Dummy)
|
||||
ROWDEF(CHARSTR)
|
||||
|
||||
DECLARE SUBROUTINE obj_Notes, Set_Status, Send_Info, Send_Dyn, Btree.Extract, ErrMsg, obj_WO_Mat_Log
|
||||
DECLARE FUNCTION Get_Status,obj_WO_Log, Send_Dyn
|
||||
|
||||
|
||||
debug
|
||||
obj_WO_Mat_Log('Post','')
|
||||
|
||||
IF Get_Status(errCode) THEN debug
|
||||
|
||||
debug
|
||||
GOTO Bail
|
||||
|
||||
* * * * * * *
|
||||
Bail:
|
||||
* * * * * * *
|
||||
|
||||
END
|
Reference in New Issue
Block a user