added LSL2 stored procedures

LSL2/STPROC/TEST_MAT_SCAN.txt

@@ -0,0 +1,21 @@
+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
+		
+