added LSL2 stored procedures

LSL2/STPROC/SET_SQL_MFS.txt

@@ -0,0 +1,15 @@
+Compile subroutine Set_Sql_MFS(VOID)
+
+Tables = ""
+Tables := "ASSIGN_CAUSE,CDM_LOG,COMPANY,CUSTOMER,DESIG_ERR_GRP,LOSS_CODES,NCR,ORDER,ORDER_CHANGE,PROD_SPEC,QUOTE,RDS,RDS_LAYER,RDS_TEST,REACT_MODE,"
+Tables := "REACT_RUN,REACT_STATUS,RECIPE,SURFACE_SCAN,SURF_SCAN_TOOL,TOOL,TUBE,TW_CODES,TW_PRIME_USAGE,TW_USAGE,WAREHOUSE,WO_LOG,WO_MAT,WO_STEP,"
+Tables := "ANNUAL_CONTRACTS,ORDER_RECON,QUARTZ_TC_LOG,QUARTZ_WAND_LOG,REACTOR_LOG,REACT_EVENT,REACT_ITEMS,ASM_PART,CALIBRATION,CALIB_LIST,WO_MAST_SCHED"
+
+NumTables = Count(Tables, ",") + 1
+
+For iTable = 1 to NumTables
+    Table = Field(Tables, ",", iTable)
+    Call Set_MFS(Table, "SQL_MFS*LSL2", 3)
+Next iTable
+
+Return