added LSL2 stored procedures

This commit is contained in:
Infineon\StieberD
2024-03-25 14:46:21 -07:00
parent 09f1a66046
commit c667dd56eb
1655 changed files with 527967 additions and 0 deletions

View File

@ -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