DELETE COUPLING_COM_INFO WHERE RESULT_NO = ? AND WO_ID=? AND IF_OUT_RPO = '1' SELECT count(1) count FROM COUPLING_THINSPECT_RESULT T WHERE T.WO_ID = ? and t.if_all_out_work='1' 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; 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.THREAD_CHK_STATUS = '2' WHERE T.ZY_PLAN_ID = ? AND T.WO_ID=?; END; 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.THREAD_CHK_STATUS = '1' WHERE T.ZY_PLAN_ID = ? AND T.WO_ID=?; END;