22 lines
524 B
Plaintext
22 lines
524 B
Plaintext
COMPILE ROUTINE TEST_MAT_SCAN(Dummy)
|
|
ROWDEF(CHARSTR)
|
|
|
|
DECLARE SUBROUTINE obj_Schedule, RList,Send_Dyn, Print_Carton_Labels, Btree.Extract, msg, Set_List_Box_Data
|
|
DECLARE SUBROUTINE ErrMsg, Print_Small_Loc_Label, Print_Loc_Label, obj_RDS2
|
|
DECLARE FUNCTION Get_Status,Security_Check, Ping, FTPList, Utility, INet_OI_XML, obj_WM_Out,Dialog_Box
|
|
|
|
debug
|
|
|
|
WONo = 139617
|
|
|
|
NewRows = Dialog_Box("DIALOG_MAT_SCAN", @WINDOW, 'Ship':@VM:'Scan Cassettes for WO ':WONo)
|
|
|
|
|
|
* * * * * * *
|
|
Bail:
|
|
* * * * * * *
|
|
|
|
RETURN
|
|
|
|
|