added LSL2 stored procedures
This commit is contained in:
15
LSL2/STPROC/TESTER_OBJ_SHIP.txt
Normal file
15
LSL2/STPROC/TESTER_OBJ_SHIP.txt
Normal file
@ -0,0 +1,15 @@
|
||||
Function tester_obj_ship()
|
||||
declare function obj_Shipment
|
||||
declare function Lsl_Users_Services
|
||||
|
||||
*test = Lsl_Users_Services('ExportUsers')
|
||||
Date = OCONV(Date(), 'D4-')
|
||||
|
||||
debug
|
||||
/*
|
||||
shipno = '153682'
|
||||
True$ = 1
|
||||
|
||||
|
||||
test = obj_Shipment('SendTechnical', ShipNo : @RM : True$)
|
||||
*/
|
Reference in New Issue
Block a user