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
