SELECT T.MACHINE_NAME,T.MACHINE_NO FROM COUPLING_MACHINE_USER T WHERE 1=1 SELECT T.MACHINE_USER1,T.MACHINE_USER2 FROM COUPLING_OPERATION T WHERE 1=1 AND T.PROCESS_NO='700305' SELECT T.PRO_BZ, DECODE(T.PRO_BZ, '1', '甲', '2', '乙', '3', '丙', '4', '丁') PRO_BZ_NAME FROM COUPLING_OPERATION T WHERE 1=1 AND T.PROCESS_NO='700305' SELECT ? || ? || TO_CHAR(SYSDATE, 'yyyyMMDD') || LPAD(NVL(MAX(TO_NUMBER(SUBSTR(RESULT_NO, LENGTH(RESULT_NO) - 5))), 0) + 1, 6, '0') RESULT_NO FROM COUPLING_THREADING_RESULT WHERE RESULT_NO LIKE ? || TO_CHAR(SYSDATE, 'yyyyMMDD') || '______' DECLARE BEGIN FOR MYROW IN (SELECT T.* FROM PLN_ZY_JG T WHERE T.ZY_PLAN_ID = ?) LOOP INSERT INTO COUPLING_COM_INFO (STEELCODE, STEELNAME, MODEL_CODE, MODEL_DESC, OUTDIAMETER, WALLTHICK, SPEC_JG, SPEC_JG_DESC, STYLE_JG, DIAMETER, CHECK_J_VAL, AIMLENGTH, SINGLEWEIGHT, MONITORDEMAND, IF_MONITOR_JG, PRDCR_NO, PRODUCER, PRODUCER_TIME, MACH_NO, MACH_NM, PRO_NUM, PRO_WT, FAIL_NUM, FAIL_WT, OFFLINE_NUM, OFFLINE_WT, STATION_STATUS, RRO_TIME, RRO_TIME_NU, PRO_USER, PRO_SHIFT, PRO_GROUP, RESULT_NO, ZY_PLAN_ID, PRO_PLAN_ID, CODE_JG_BL, JG_GROUP_ID, IF_OUT_RPO, PLINE_CODE, PLINE_NAME, STATION_CODE, STATION_DESC, JUDGE_STOVE_NO, BATCH_NO, BL_WL_ID, BL_WL_DESC, MIN_D, MIN_H, AIMLENGTH_BL, AIM_CUT_LEN, LENGTH_MIN, LENGTH_MAX, TAPER, CODE_JG, GRADECODE, GRADENAME,CREATE_TIME,COL_OPERATOR,COL_OPERATOR2,WO_ID) VALUES (MYROW.STEELCODE, MYROW.STEELNAME, MYROW.MODEL_CODE, MYROW.MODEL_DESC, MYROW.OUTDIAMETER, MYROW.WALLTHICK, MYROW.SPEC_JG, MYROW.SPEC_JG_DESC, MYROW.STYLE_JG, MYROW.DIAMETER, MYROW.CHECK_J_VAL, MYROW.AIMLENGTH, MYROW.SINGLEWEIGHT, MYROW.MONITORDEMAND, MYROW.IF_MONITOR_JG, MYROW.PRDCR_NO, ?, TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'), ?, '', ?, ?, ?, ?, '', '', '1', TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'), '', ?, ?, ?, ?, MYROW.ZY_PLAN_ID, MYROW.PRO_PLAN_ID, MYROW.CODE_JG_BL, MYROW.JG_GROUP_ID, '1', MYROW.PLINE_CODE, MYROW.PLINE_NAME, ?, '车丝', MYROW.JUDGE_STOVE_NO, MYROW.BATCH_NO, MYROW.BL_WL_ID, MYROW.BL_WL_DESC, MYROW.MIN_D, MYROW.MIN_H, MYROW.AIMLENGTH_BL, MYROW.AIM_CUT_LEN, MYROW.LENGTH_MIN, MYROW.LENGTH_MAX, MYROW.TAPER, MYROW.CODE_JG, MYROW.GRADECODE, MYROW.GRADENAME,TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),?,?,?); END LOOP; END; DECLARE BEGIN FOR MYROW IN (SELECT T.* FROM PLN_ZY_JG T WHERE T.HEAT_PLAN_NO = ?) LOOP INSERT INTO COUPLING_COM_INFO (STEELCODE, STEELNAME, MODEL_CODE, MODEL_DESC, OUTDIAMETER, WALLTHICK, SPEC_JG, SPEC_JG_DESC, STYLE_JG, DIAMETER, CHECK_J_VAL, AIMLENGTH, SINGLEWEIGHT, MONITORDEMAND, IF_MONITOR_JG, PRDCR_NO, PRODUCER, PRODUCER_TIME, MACH_NO, MACH_NM, PRO_NUM, PRO_WT, FAIL_NUM, FAIL_WT, OFFLINE_NUM, OFFLINE_WT, STATION_STATUS, RRO_TIME, RRO_TIME_NU, PRO_USER, PRO_SHIFT, PRO_GROUP, RESULT_NO, PRO_PLAN_ID, CODE_JG_BL, JG_GROUP_ID, IF_OUT_RPO, PLINE_CODE, PLINE_NAME, STATION_CODE, STATION_DESC, JUDGE_STOVE_NO, BATCH_NO, BL_WL_ID, BL_WL_DESC, MIN_D, MIN_H, AIMLENGTH_BL, AIM_CUT_LEN, LENGTH_MIN, LENGTH_MAX, TAPER, CODE_JG, GRADECODE, GRADENAME,CREATE_TIME,COL_OPERATOR,WO_ID) VALUES (MYROW.STEELCODE, MYROW.STEELNAME, MYROW.MODEL_CODE, MYROW.MODEL_DESC, MYROW.OUTDIAMETER, MYROW.WALLTHICK, MYROW.SPEC_JG, MYROW.SPEC_JG_DESC, MYROW.STYLE_JG, MYROW.DIAMETER, MYROW.CHECK_J_VAL, MYROW.AIMLENGTH, MYROW.SINGLEWEIGHT, MYROW.MONITORDEMAND, MYROW.IF_MONITOR_JG, MYROW.PRDCR_NO, ?, TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'), ?, '', ?, ?, ?, ?, ?, '', '1', TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'), '', ?, ?, ?, ?, MYROW.PRO_PLAN_ID, MYROW.CODE_JG_BL, MYROW.JG_GROUP_ID, ?, MYROW.PLINE_CODE, MYROW.PLINE_NAME, ?, '车丝', MYROW.JUDGE_STOVE_NO, MYROW.BATCH_NO, MYROW.BL_WL_ID, MYROW.BL_WL_DESC, MYROW.MIN_D, MYROW.MIN_H, MYROW.AIMLENGTH_BL, MYROW.AIM_CUT_LEN, MYROW.LENGTH_MIN, MYROW.LENGTH_MAX, MYROW.TAPER, MYROW.CODE_JG, MYROW.GRADECODE, MYROW.GRADENAME,TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),?,?); END LOOP; END; DELETE COUPLING_COM_INFO WHERE RESULT_NO = ? AND WO_ID=? AND IF_OUT_RPO = '1' SELECT count(1) count FROM coupling_threading_result T WHERE T.WO_ID = ? and t.if_all_out_work='1' DECLARE BEGIN UPDATE COUPLING_COM_INFO T SET T.STATION_STATUS = '2' WHERE T.ZY_PLAN_ID = ? AND T.STATION_CODE = ? AND T.WO_ID = ?; UPDATE PLN_ZY_JG_WORKBILL T SET T.LATHE_STATUS = '2' WHERE T.ZY_PLAN_ID = ? AND T.WO_ID = ?; END; SELECT T.PRO_NUM FROM COUPLING_COM_INFO T WHERE T.ZY_PLAN_ID = ? AND T.STATION_CODE = ? AND T.WO_ID = ? DELETE COUPLING_COM_INFO WHERE RESULT_NO = ? AND STATION_CODE = ? AND WO_ID = ? SELECT COUNT(1) COUNT, SUM(NVL(T.QUALIRIED_PCS, 0)) QUALIRIED_PCS, SUM(NVL(T.REJECTED_PCS, 0)) REJECTED_PCS FROM COUPLING_THREADING_RESULT T WHERE T.ZY_PLAN_ID = ? AND T.WO_ID = ? DELETE COUPLING_THREADING_RESULT WHERE RESULT_NO = ? UPDATE COUPLING_THREADING_RESULT SET PRODUCED_PCS = ?, QUALIRIED_PCS = ?, REJECTED_PCS = ?, REJECTED_REASON = ?, COL_SHIFT = ?, COL_GROUP = ?, MACHINE_NO = ?, PRODUCER = ?, PRODUCER_TIME = TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'), COL_OPERATOR1 = ?, COL_OPERATOR2 =? WHERE RESULT_NO = ? UPDATE COUPLING_COM_INFO SET PRO_NUM = ?, PRO_WT =?, FAIL_NUM = ?, FAIL_WT=?, PRO_SHIFT = ?, PRO_GROUP = ?, COL_OPERATOR = ?, COL_OPERATOR2 =?, PRODUCER = ?, PRODUCER_TIME = TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS') WHERE RESULT_NO = ? AND STATION_CODE = ? AND WO_ID = ? DECLARE BEGIN UPDATE COUPLING_COM_INFO T SET T.STATION_STATUS = '1' WHERE T.ZY_PLAN_ID = ? AND T.STATION_CODE = ? AND T.WO_ID = ?; UPDATE PLN_ZY_JG_WORKBILL T SET T.LATHE_STATUS = '1' WHERE T.ZY_PLAN_ID = ? AND T.WO_ID = ?; END;