1) YJZ, (SELECT SUM(S.ACT_COUNT) FROM MIL_INSPECTION S WHERE S.JUDGE_STOVE_NO = M.JUDGE_STOVE_NO AND S.HEAT_PLAN_NO = M.HEAT_PLAN_NO AND S.VALIDFLAG = '1' AND S.RECHECK = '1') XCJZ, (SELECT SUM(S.ACT_COUNT) FROM MIL_INSPECTION S WHERE S.JUDGE_STOVE_NO = M.JUDGE_STOVE_NO AND S.HEAT_PLAN_NO = M.HEAT_PLAN_NO AND S.VALIDFLAG = '1' AND S.RECHECK = '2') YCJZ, (SELECT DECODE(MIN(S.INSPECTION_FLAG), '0', '待抽', '1', '待检', '2', '已检', '3', '免检') FROM MIL_INSPECTION S WHERE S.JUDGE_STOVE_NO = M.JUDGE_STOVE_NO AND S.HEAT_PLAN_NO = M.HEAT_PLAN_NO AND S.VALIDFLAG = '1') INSPECTION_FLAG, MAX(M.MATERIAL_NO) MATERIAL_NO, MAX(M.MATERIAL_NAME) MATERIAL_NAME, MAX(M.PRODUCCODE) PRODUCCODE, MAX(M.PRODUCNAME) PRODUCNAME, MAX(M.STEELCODE) STEELCODE, MAX(M.STEELNAME) STEELNAME, MAX(M.GRADECODE) GRADECODE, MAX(M.GRADENAME) GRADENAME, MAX(M.SPEC_CODE) SPEC_CODE, MAX(M.SPEC_NAME) SPEC_NAME, MAX(M.MODEL_CODE) MODEL_CODE, MAX(M.MODEL_DESC) MODEL_DESC, MAX(M.STD_CODE) STD_CODE, MAX(M.STD_NAME) STD_NAME, MAX(M.STD_STYLE) STD_STYLE, MAX(M.STD_STYLE_DESC) STD_STYLE_DESC, MAX(M.PLINE_CODE) PLINE_CODE, MAX(M.PLINE_NAME) PLINE_NAME, MAX(M.ACT_DIMATER) ACT_DIMATER, MAX(M.ACT_HEIGHT) ACT_HEIGHT, MAX(M.ACT_LEN_MIN) ACT_LEN_MIN, MAX(M.ACT_LEN_MAX) ACT_LEN_MAX, SUM(M.ACT_COUNT) ACT_COUNT, ROUND(SUM(M.ACT_WEIGHT),3) ACT_WEIGHT, MAX(M.BELONG_CODE) BELONG_CODE, MAX(M.BELONG_NAME) BELONG_NAME, SUM(M.PONDER_GROSS_COUNT) PONDER_GROSS_COUNT, ROUND(SUM(M.PONDER_GROSS_WT), 3) PONDER_GROSS_WT, MAX(M.TARGET) TARGET, M.HEAT_PLAN_NO, M.HEAT_PLAN_NO_OLD, MAX(M.HEAT_PLAN_NO_NEXT) HEAT_PLAN_NO_NEXT, MAX(M.JUDGE_RESULT_CODE) JUDGE_RESULT_CODE, MAX(M.JUDGE_FLAG) JUDGE_FLAG, MAX(M.HTT_TYPE) HTT_TYPE, MAX(M.MIN_TEMP) MIN_TEMP, MAX(M.HTT_TECHNOLOGY) HTT_TECHNOLOGY, MAX(M.NOTCH_INFO) NOTCH_INFO, MAX(M.NOTCH_LENGTH) NOTCH_LENGTH, MAX(M.NOTCH_WIDTH) NOTCH_WIDTH, MAX(M.NOTCH_DEPTH) NOTCH_DEPTH, MAX(M.TEST_PRESSURE) TEST_PRESSURE, MAX(M.HOLDTIME_TIME) HOLDTIME_TIME, MAX(M.TEST_PRESSURE_Y) TEST_PRESSURE_Y, MAX(M.MCH_WATERGAGE_RESULT) MCH_WATERGAGE_RESULT, MAX(M.MCH_PATH_RESULT) MCH_PATH_RESULT, MAX(M.MCH_CHAMFERING_RESULT) MCH_CHAMFERING_RESULT, MAX(M.MCH_TWISTINGLY_RESULT) MCH_TWISTINGLY_RESULT, MAX(M.MCH_DIMENSIONS_RESULT) MCH_DIMENSIONS_RESULT, MAX(M.MCH_VISUAL_RESULT) MCH_VISUAL_RESULT, MAX(M.MCH_THREAD_INSPECTION_RESULT) MCH_THREAD_INSPECTION_RESULT, MAX(M.MCH_REMANENCE_RESULT) MCH_REMANENCE_RESULT, MAX(M.MCH_RADIOACTIVITY_RESULT) MCH_RADIOACTIVITY_RESULT, MAX(M.MCH_BEVEL_RESULT) MCH_BEVEL_RESULT, MAX(M.ANGLE_VAL) ANGLE_VAL, MAX(M.EDGE_VAL) EDGE_VAL, MAX(M.DRIFT_MODEL_MIN) DRIFT_MODEL_MIN, MAX(M.DRIFT_MODEL_MIN2) DRIFT_MODEL_MIN2, MAX(M.DRIFT_MODEL_LEN) DRIFT_MODEL_LEN, MAX(M.DRIFT_MODEL_LEN2) DRIFT_MODEL_LEN2, MAX(M.MEASURED_END_PART) MEASURED_END_PART, MAX(M.MEASURED_MIDDLE_PART) MEASURED_MIDDLE_PART, MAX(M.MEASURED_TAIL_PART) MEASURED_TAIL_PART, MAX(M.DETECT_RESULT_CODE) DETECT_RESULT_CODE, MAX(M.TESTING_STANDAR) TESTING_STANDAR, MAX(M.TESTING_GRADE) TESTING_GRADE, MAX(M.TESTING_TYPE) TESTING_TYPE FROM ( SELECT T.LOT_NO, T.JUDGE_STOVE_NO, T.PROCESS_CDOE, T.NEXT_PROCESS_CDOE, T.JUGDE_APPLY_CODE, MAX(T.MATERIAL_NO) MATERIAL_NO, MAX(T.MATERIAL_NAME) MATERIAL_NAME, MAX(T.PRODUCCODE) PRODUCCODE, MAX(T.PRODUCNAME) PRODUCNAME, MAX(T.STEELCODE) STEELCODE, MAX(T.STEELNAME) STEELNAME, MAX(T.GRADECODE) GRADECODE, MAX(T.GRADENAME) GRADENAME, MAX(T.SPEC_CODE) SPEC_CODE, MAX(T.SPEC_NAME) SPEC_NAME, MAX(T.MODEL_CODE) MODEL_CODE, MAX(T.MODEL_DESC) MODEL_DESC, MAX(T.STD_CODE) STD_CODE, MAX(T.STD_NAME) STD_NAME, MAX(T.STD_STYLE) STD_STYLE, MAX(T.STD_STYLE_DESC) STD_STYLE_DESC, MAX(T.PLINE_CODE) PLINE_CODE, MAX(T.PLINE_NAME) PLINE_NAME, MAX(T.ACT_DIMATER) ACT_DIMATER, MAX(T.ACT_HEIGHT) ACT_HEIGHT, MAX(T.ACT_LEN_MIN) ACT_LEN_MIN, MAX(T.ACT_LEN_MAX) ACT_LEN_MAX, SUM(T.ACT_COUNT) ACT_COUNT, ROUND(SUM(T.ACT_WEIGHT),3) ACT_WEIGHT, MAX(T.BELONG_CODE) BELONG_CODE, MAX(T.BELONG_NAME) BELONG_NAME, SUM(CASE WHEN T.PONDER_GROSS_WT > 0 THEN 1 ELSE 0 END) PONDER_GROSS_COUNT, ROUND(SUM(T.PONDER_GROSS_WT), 3) PONDER_GROSS_WT, MAX(T.TARGET) TARGET, T.HEAT_PLAN_NO, T.HEAT_PLAN_NO_OLD, MAX(T.HEAT_PLAN_NO_NEXT) HEAT_PLAN_NO_NEXT, MAX(T2.JUDGE_RESULT_CODE) JUDGE_RESULT_CODE, DECODE(MAX(T1.JUDGE_RESULT_CODE), NULL, '未判', DECODE(MAX(T2.JUDGE_RESULT_CODE), '1', '部分已判', '已判')) JUDGE_FLAG, MAX(T1.HTT_TYPE) HTT_TYPE, MAX(T1.MIN_TEMP) MIN_TEMP, MAX(T1.HTT_TECHNOLOGY) HTT_TECHNOLOGY, MAX(T1.NOTCH_INFO) NOTCH_INFO, MAX(T1.NOTCH_LENGTH) NOTCH_LENGTH, MAX(T1.NOTCH_WIDTH) NOTCH_WIDTH, MAX(T1.NOTCH_DEPTH) NOTCH_DEPTH, MAX(T1.TEST_PRESSURE) TEST_PRESSURE, MAX(T1.HOLDTIME_TIME) HOLDTIME_TIME, MAX(T1.TEST_PRESSURE_Y) TEST_PRESSURE_Y, MAX(T1.MCH_WATERGAGE_RESULT) MCH_WATERGAGE_RESULT, MAX(T1.MCH_PATH_RESULT) MCH_PATH_RESULT, MAX(T1.MCH_CHAMFERING_RESULT) MCH_CHAMFERING_RESULT, MAX(T1.MCH_TWISTINGLY_RESULT) MCH_TWISTINGLY_RESULT, MAX(T1.MCH_DIMENSIONS_RESULT) MCH_DIMENSIONS_RESULT, MAX(T1.MCH_VISUAL_RESULT) MCH_VISUAL_RESULT, MAX(T1.MCH_THREAD_INSPECTION_RESULT) MCH_THREAD_INSPECTION_RESULT, MAX(T1.MCH_REMANENCE_RESULT) MCH_REMANENCE_RESULT, MAX(T1.MCH_RADIOACTIVITY_RESULT) MCH_RADIOACTIVITY_RESULT, MAX(T1.MCH_BEVEL_RESULT) MCH_BEVEL_RESULT, MAX(T1.ANGLE_VAL) ANGLE_VAL, MAX(T1.EDGE_VAL) EDGE_VAL, MAX(T1.DRIFT_MODEL_MIN) DRIFT_MODEL_MIN, MAX(T1.DRIFT_MODEL_MIN2) DRIFT_MODEL_MIN2, MAX(T1.DRIFT_MODEL_LEN) DRIFT_MODEL_LEN, MAX(T1.DRIFT_MODEL_LEN2) DRIFT_MODEL_LEN2, MAX(T1.MEASURED_END_PART) MEASURED_END_PART, MAX(T1.MEASURED_MIDDLE_PART) MEASURED_MIDDLE_PART, MAX(T1.MEASURED_TAIL_PART) MEASURED_TAIL_PART, MAX(T1.DETECT_RESULT_CODE) DETECT_RESULT_CODE, MAX(T1.TESTING_STANDAR) TESTING_STANDAR, MAX(T1.TESTING_GRADE) TESTING_GRADE, MAX(T1.TESTING_TYPE) TESTING_TYPE FROM MAT_BC_M T LEFT JOIN (SELECT MAX(JUDGE_RESULT_CODE) JUDGE_RESULT_CODE, MAX(T1.HTT_TYPE) HTT_TYPE, MAX(T1.MIN_TEMP) MIN_TEMP, MAX(T1.HTT_TECHNOLOGY) HTT_TECHNOLOGY, MAX(T1.NOTCH_INFO) NOTCH_INFO, MAX(T1.NOTCH_LENGTH) NOTCH_LENGTH, MAX(T1.NOTCH_WIDTH) NOTCH_WIDTH, MAX(T1.NOTCH_DEPTH) NOTCH_DEPTH, MAX(T1.TEST_PRESSURE) TEST_PRESSURE, MAX(T1.HOLDTIME_TIME) HOLDTIME_TIME, MAX(T1.TEST_PRESSURE_Y) TEST_PRESSURE_Y, MAX(T1.MCH_WATERGAGE_RESULT) MCH_WATERGAGE_RESULT, MAX(T1.MCH_PATH_RESULT) MCH_PATH_RESULT, MAX(T1.MCH_CHAMFERING_RESULT) MCH_CHAMFERING_RESULT, MAX(T1.MCH_TWISTINGLY_RESULT) MCH_TWISTINGLY_RESULT, MAX(T1.MCH_DIMENSIONS_RESULT) MCH_DIMENSIONS_RESULT, MAX(T1.MCH_VISUAL_RESULT) MCH_VISUAL_RESULT, MAX(T1.MCH_THREAD_INSPECTION_RESULT) MCH_THREAD_INSPECTION_RESULT, MAX(T1.MCH_REMANENCE_RESULT) MCH_REMANENCE_RESULT, MAX(T1.MCH_RADIOACTIVITY_RESULT) MCH_RADIOACTIVITY_RESULT, MAX(T1.MCH_BEVEL_RESULT) MCH_BEVEL_RESULT, MAX(T1.ANGLE_VAL) ANGLE_VAL, MAX(T1.EDGE_VAL) EDGE_VAL, MAX(T1.DRIFT_MODEL_MIN) DRIFT_MODEL_MIN, MAX(T1.DRIFT_MODEL_MIN2) DRIFT_MODEL_MIN2, MAX(T1.DRIFT_MODEL_LEN) DRIFT_MODEL_LEN, MAX(T1.DRIFT_MODEL_LEN2) DRIFT_MODEL_LEN2, MAX(T1.MEASURED_END_PART) MEASURED_END_PART, MAX(T1.MEASURED_MIDDLE_PART) MEASURED_MIDDLE_PART, MAX(T1.MEASURED_TAIL_PART) MEASURED_TAIL_PART, MAX(T1.TESTING_GRADE) TESTING_GRADE, MAX(T1.TESTING_TYPE) TESTING_TYPE, MAX(T1.TESTING_STANDAR) TESTING_STANDAR, MAX(DECODE(T1.DETECT_RESULT_CODE, '40740401', '合格', '40740402', '不合格')) DETECT_RESULT_CODE, JUGDE_APPLY_CODE FROM QCM_ZG_JUGDE_APPLY T1 GROUP BY JUGDE_APPLY_CODE) t1 ON T.JUGDE_APPLY_CODE = T1.JUGDE_APPLY_CODE LEFT JOIN (SELECT MIN(nvl(JUDGE_RESULT_CODE, '1')) JUDGE_RESULT_CODE, JUGDE_APPLY_CODE FROM QCM_ZG_JUGDE_APPLY T1 GROUP BY JUGDE_APPLY_CODE) t2 ON T.JUGDE_APPLY_CODE = T2.JUGDE_APPLY_CODE WHERE 1 = 1 AND T.QCM_STAUS = '00' AND T.PROCESS_CDOE <> 'D' AND (NVL(T.HEAT_PLAN_NO_NEXT, '/') <> T.HEAT_PLAN_NO) #INSTOCK_TIME# #JUDGE_STOVE_NO# #JUGDE_APPLY_CODE# #JUDGE_RESULT_CODE# #PROCESS_CDOE# #BELONG_CODE# #GROUP_BY# UNION ALL SELECT T.LOT_NO, T.JUDGE_STOVE_NO, T.PROCESS_CDOE, T.NEXT_PROCESS_CDOE, T.JUGDE_APPLY_CODE, MAX(T.MATERIAL_NO) MATERIAL_NO, MAX(T.MATERIAL_NAME) MATERIAL_NAME, MAX(T.PRODUCCODE) PRODUCCODE, MAX(T.PRODUCNAME) PRODUCNAME, MAX(T.STEELCODE) STEELCODE, MAX(T.STEELNAME) STEELNAME, MAX(T.GRADECODE) GRADECODE, MAX(T.GRADENAME) GRADENAME, MAX(T.SPEC_CODE) SPEC_CODE, MAX(T.SPEC_NAME) SPEC_NAME, MAX(T.MODEL_CODE) MODEL_CODE, MAX(T.MODEL_DESC) MODEL_DESC, MAX(T.STD_CODE) STD_CODE, MAX(T.STD_NAME) STD_NAME, MAX(T.STD_STYLE) STD_STYLE, MAX(T.STD_STYLE_DESC) STD_STYLE_DESC, MAX(T.PLINE_CODE) PLINE_CODE, MAX(T.PLINE_NAME) PLINE_NAME, MAX(T.ACT_DIMATER) ACT_DIMATER, MAX(T.ACT_HEIGHT) ACT_HEIGHT, MAX(T.ACT_LEN_MIN) ACT_LEN_MIN, MAX(T.ACT_LEN_MAX) ACT_LEN_MAX, SUM(T.ACT_COUNT) ACT_COUNT, ROUND(SUM(T.ACT_WEIGHT), 3) ACT_WEIGHT, MAX(T.BELONG_CODE) BELONG_CODE, MAX(T.BELONG_NAME) BELONG_NAME, SUM(CASE WHEN T.PONDER_GROSS_WT > 0 THEN 1 ELSE 0 END) PONDER_GROSS_COUNT, ROUND(SUM(T.PONDER_GROSS_WT),3) PONDER_GROSS_WT, MAX(T.TARGET) TARGET, T.HEAT_PLAN_NO, T.HEAT_PLAN_NO_OLD, MAX(T.HEAT_PLAN_NO_NEXT) HEAT_PLAN_NO_NEXT, MAX(T2.JUDGE_RESULT_CODE) JUDGE_RESULT_CODE, DECODE(MAX(T1.JUDGE_RESULT_CODE), NULL, '未判', DECODE(MAX(T2.JUDGE_RESULT_CODE), '1', '部分已判', '已判')) JUDGE_FLAG, MAX(T1.HTT_TYPE) HTT_TYPE, MAX(T1.MIN_TEMP) MIN_TEMP, MAX(T1.HTT_TECHNOLOGY) HTT_TECHNOLOGY, MAX(T1.NOTCH_INFO) NOTCH_INFO, MAX(T1.NOTCH_LENGTH) NOTCH_LENGTH, MAX(T1.NOTCH_WIDTH) NOTCH_WIDTH, MAX(T1.NOTCH_DEPTH) NOTCH_DEPTH, MAX(T1.TEST_PRESSURE) TEST_PRESSURE, MAX(T1.HOLDTIME_TIME) HOLDTIME_TIME, MAX(T1.TEST_PRESSURE_Y) TEST_PRESSURE_Y, MAX(T1.MCH_WATERGAGE_RESULT) MCH_WATERGAGE_RESULT, MAX(T1.MCH_PATH_RESULT) MCH_PATH_RESULT, MAX(T1.MCH_CHAMFERING_RESULT) MCH_CHAMFERING_RESULT, MAX(T1.MCH_TWISTINGLY_RESULT) MCH_TWISTINGLY_RESULT, MAX(T1.MCH_DIMENSIONS_RESULT) MCH_DIMENSIONS_RESULT, MAX(T1.MCH_VISUAL_RESULT) MCH_VISUAL_RESULT, MAX(T1.MCH_THREAD_INSPECTION_RESULT) MCH_THREAD_INSPECTION_RESULT, MAX(T1.MCH_REMANENCE_RESULT) MCH_REMANENCE_RESULT, MAX(T1.MCH_RADIOACTIVITY_RESULT) MCH_RADIOACTIVITY_RESULT, MAX(T1.MCH_BEVEL_RESULT) MCH_BEVEL_RESULT, MAX(T1.ANGLE_VAL) ANGLE_VAL, MAX(T1.EDGE_VAL) EDGE_VAL, MAX(T1.DRIFT_MODEL_MIN) DRIFT_MODEL_MIN, MAX(T1.DRIFT_MODEL_MIN2) DRIFT_MODEL_MIN2, MAX(T1.DRIFT_MODEL_LEN) DRIFT_MODEL_LEN, MAX(T1.DRIFT_MODEL_LEN2) DRIFT_MODEL_LEN2, MAX(T1.MEASURED_END_PART) MEASURED_END_PART, MAX(T1.MEASURED_MIDDLE_PART) MEASURED_MIDDLE_PART, MAX(T1.MEASURED_TAIL_PART) MEASURED_TAIL_PART, MAX(T1.DETECT_RESULT_CODE) DETECT_RESULT_CODE, MAX(T1.TESTING_STANDAR) TESTING_STANDAR, MAX(T1.TESTING_GRADE) TESTING_GRADE, MAX(T1.TESTING_TYPE) TESTING_TYPE FROM MAT_BC_BACKUP T LEFT JOIN (SELECT MAX(JUDGE_RESULT_CODE) JUDGE_RESULT_CODE, MAX(T1.HTT_TYPE) HTT_TYPE, MAX(T1.MIN_TEMP) MIN_TEMP, MAX(T1.HTT_TECHNOLOGY) HTT_TECHNOLOGY, MAX(T1.NOTCH_INFO) NOTCH_INFO, MAX(T1.NOTCH_LENGTH) NOTCH_LENGTH, MAX(T1.NOTCH_WIDTH) NOTCH_WIDTH, MAX(T1.NOTCH_DEPTH) NOTCH_DEPTH, MAX(T1.TEST_PRESSURE) TEST_PRESSURE, MAX(T1.HOLDTIME_TIME) HOLDTIME_TIME, MAX(T1.TEST_PRESSURE_Y) TEST_PRESSURE_Y, MAX(T1.MCH_WATERGAGE_RESULT) MCH_WATERGAGE_RESULT, MAX(T1.MCH_PATH_RESULT) MCH_PATH_RESULT, MAX(T1.MCH_CHAMFERING_RESULT) MCH_CHAMFERING_RESULT, MAX(T1.MCH_TWISTINGLY_RESULT) MCH_TWISTINGLY_RESULT, MAX(T1.MCH_DIMENSIONS_RESULT) MCH_DIMENSIONS_RESULT, MAX(T1.MCH_VISUAL_RESULT) MCH_VISUAL_RESULT, MAX(T1.MCH_THREAD_INSPECTION_RESULT) MCH_THREAD_INSPECTION_RESULT, MAX(T1.MCH_REMANENCE_RESULT) MCH_REMANENCE_RESULT, MAX(T1.MCH_RADIOACTIVITY_RESULT) MCH_RADIOACTIVITY_RESULT, MAX(T1.MCH_BEVEL_RESULT) MCH_BEVEL_RESULT, MAX(T1.ANGLE_VAL) ANGLE_VAL, MAX(T1.EDGE_VAL) EDGE_VAL, MAX(T1.DRIFT_MODEL_MIN) DRIFT_MODEL_MIN, MAX(T1.DRIFT_MODEL_MIN2) DRIFT_MODEL_MIN2, MAX(T1.DRIFT_MODEL_LEN) DRIFT_MODEL_LEN, MAX(T1.DRIFT_MODEL_LEN2) DRIFT_MODEL_LEN2, MAX(T1.MEASURED_END_PART) MEASURED_END_PART, MAX(T1.MEASURED_MIDDLE_PART) MEASURED_MIDDLE_PART, MAX(T1.MEASURED_TAIL_PART) MEASURED_TAIL_PART, MAX(T1.TESTING_GRADE) TESTING_GRADE, MAX(T1.TESTING_TYPE) TESTING_TYPE, MAX(T1.TESTING_STANDAR) TESTING_STANDAR, MAX(DECODE(T1.DETECT_RESULT_CODE, '40740401', '合格', '40740402', '不合格')) DETECT_RESULT_CODE, JUGDE_APPLY_CODE FROM QCM_ZG_JUGDE_APPLY T1 GROUP BY JUGDE_APPLY_CODE) t1 ON T.JUGDE_APPLY_CODE = T1.JUGDE_APPLY_CODE LEFT JOIN (SELECT MIN(nvl(JUDGE_RESULT_CODE, '1')) JUDGE_RESULT_CODE, JUGDE_APPLY_CODE FROM QCM_ZG_JUGDE_APPLY T1 GROUP BY JUGDE_APPLY_CODE) t2 ON T.JUGDE_APPLY_CODE = T2.JUGDE_APPLY_CODE WHERE 1 = 1 AND T.JUGDE_APPLY_CODE IS NOT NULL AND T.QCM_STAUS = '00' AND T.PROCESS_CDOE <> 'D' AND (NVL(T.HEAT_PLAN_NO_NEXT, '/') <> T.HEAT_PLAN_NO) #INSTOCK_TIME# #JUDGE_STOVE_NO# #JUGDE_APPLY_CODE# #JUDGE_RESULT_CODE# #PROCESS_CDOE# #BELONG_CODE# #GROUP_BY#) M GROUP BY M.HEAT_PLAN_NO_OLD,M.HEAT_PLAN_NO,M.LOT_NO,M.JUDGE_STOVE_NO,M.PROCESS_CDOE,M.NEXT_PROCESS_CDOE,M.PLINE_CODE,M.JUGDE_APPLY_CODE ]]> 120501 THEN '801703' WHEN MAX(T1.CUSTOMER_NM) IN('天津腾飞钢管有限公司','沈阳腾飞钢铁经销有限公司','天津宝仓物流有限公司','天津市安利金属制造有限公司') THEN '801703' WHEN MAX(T1.STLMT_UNIT_NM) IN('天津腾飞钢管有限公司','沈阳腾飞钢铁经销有限公司','天津宝仓物流有限公司','天津市安利金属制造有限公司') THEN '801703' WHEN (select MAX(t5.PORDERSTATUS) from pln_saleord t5 where t5.ord_ln_dly_pk =T.ord_ln_dly_pk)>=5 THEN '801701' WHEN MAX(NVL(T1.SHORTEST,0))>0 AND (CASE WHEN MAX(T1.ORDER_UNIT) ='英尺' THEN 3.2808 *MAX(T.ACT_LEN_MIN) ELSE 1*MAX(T.ACT_LEN_MIN) END) < MAX(NVL(T1.SHORTEST,0)) THEN '801701' WHEN MAX(NVL(T1.LONGEST,0))>0 AND (CASE WHEN MAX(T1.ORDER_UNIT) ='英尺' THEN 3.2808 *MAX(T.ACT_LEN_MAX) ELSE 1*MAX(T.ACT_LEN_MAX) END) > MAX(NVL(T1.LONGEST,0)) THEN '801701' ELSE CASE WHEN MAX(T1.ORDER_UNIT) = '吨' THEN CASE --缴库量上限 < 累计送判吨(按计划入)+ 单支重量 WHEN MAX(T1.PAYDOWN_WT_MAX) < MAX(T1.ACT_WEIGHT2) + ROUND(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT),3) THEN '801701' WHEN T.LENGTH_TYPE = '1' AND MAX(T1.ORDER_WT_MAX_LONG) < MAX(T1.ACT_WEIGHT_L) + ROUND(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT),3) THEN '801701' WHEN T.LENGTH_TYPE = '2' AND MAX(T1.ORDER_WT_MAX_SHORT) < MAX(T1.ACT_WEIGHT_S) + ROUND(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT),3) THEN '801701' ELSE '801703' END WHEN MAX(T1.ORDER_UNIT) IN( '米' ,'英尺') THEN CASE --缴库量上限 < 累计送判吨(按计划入)+ 单支重量 WHEN MAX(T1.PAYDOWN_WT_MAX) < MAX(T1.ACT_LEN2) + ROUND(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT),3) THEN '801701' WHEN T.LENGTH_TYPE = '1' AND MAX(T1.ORDER_WT_MAX_LONG) < MAX(T1.ACT_LEN_L) + ROUND(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT),3) THEN '801701' WHEN T.LENGTH_TYPE = '2' AND MAX(T1.ORDER_WT_MAX_SHORT) < MAX(T1.ACT_LEN_S) + ROUND(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT),3) THEN '801701' ELSE '801703' END END END IN_MOLD, NVL( CASE WHEN MAX(T1.RECEIV_NM) IN('天津腾飞钢管有限公司','沈阳腾飞钢铁经销有限公司','天津宝仓物流有限公司','天津市安利金属制造有限公司') OR MAX(T1.SUPPLY_UNIT)> 120501 THEN SUM(T.ACT_COUNT) WHEN MAX(T1.CUSTOMER_NM) IN('天津腾飞钢管有限公司','沈阳腾飞钢铁经销有限公司','天津宝仓物流有限公司','天津市安利金属制造有限公司') THEN SUM(T.ACT_COUNT) WHEN MAX(T1.STLMT_UNIT_NM) IN('天津腾飞钢管有限公司','沈阳腾飞钢铁经销有限公司','天津宝仓物流有限公司','天津市安利金属制造有限公司') THEN SUM(T.ACT_COUNT) ELSE CASE WHEN MAX(T1.ORDER_UNIT) = '吨' THEN CASE WHEN T.LENGTH_TYPE = '0' AND MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_WEIGHT2) > 0 THEN FLOOR((MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_WEIGHT2))/(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT))) WHEN T.LENGTH_TYPE = '1' AND MAX(T1.ORDER_WT_MAX_LONG) - MAX(T1.ACT_WEIGHT_L) > 0 THEN FLOOR(LEAST((MAX(T1.ORDER_WT_MAX_LONG) - MAX(T1.ACT_WEIGHT_L)),(MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_WEIGHT2)))/(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT))) WHEN T.LENGTH_TYPE = '2' AND MAX(T1.ORDER_WT_MAX_SHORT) - MAX(T1.ACT_WEIGHT_S) > 0 THEN FLOOR(LEAST((MAX(T1.ORDER_WT_MAX_SHORT) - MAX(T1.ACT_WEIGHT_S)),(MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_WEIGHT2)))/(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT))) END WHEN MAX(T1.ORDER_UNIT) IN( '米' ,'英尺') THEN CASE WHEN T.LENGTH_TYPE = '0' AND MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_LEN2) > 0 THEN FLOOR((MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_LEN2))/(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT))) WHEN T.LENGTH_TYPE = '1' AND MAX(T1.ORDER_WT_MAX_LONG) - MAX(T1.ACT_LEN_L) > 0 THEN FLOOR(LEAST((MAX(T1.ORDER_WT_MAX_LONG) - MAX(T1.ACT_LEN_L)),(MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_LEN2)))/(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT))) WHEN T.LENGTH_TYPE = '2' AND MAX(T1.ORDER_WT_MAX_SHORT) - MAX(T1.ACT_WEIGHT_S) > 0 THEN FLOOR(LEAST((MAX(T1.ORDER_WT_MAX_SHORT) - MAX(T1.ACT_LEN_S)),(MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_LEN2)))/(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT))) END END END,0) KSPZ FROM MAT_BC_M T LEFT JOIN QCM_ZC_APPLY T1 ON T.ORD_LN_DLY_PK = T1.ORD_LN_DLY_PK WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ? AND T.QCM_STAUS = '00' #JUGDE_APPLY_CODE# #JUGDE_APPLY_CODE2# #GROUP_BY# union SELECT T.JUGDE_APPLY_CODE, T.LOT_NO, T.STOVE_NO, T.JUDGE_STOVE_NO, T.BATCH_NO, T.BATCH_GROUD_NO, MAX(T.CODE_JG_BL) CODE_JG_BL, MAX(T.LIKU_PROCESS_CODE) LIKU_PROCESS_CODE, MAX(T.CIC) CIC, MAX(T.ACT_LEN_MIN) || '-' || MAX(T.ACT_LEN_MAX) GROUP_LENGTH, SUM(T.ACT_THEORY_WEIGHT) ACT_THEORY_WEIGHT, MAX(T.JUDGE_RESULT_TIME) JUDGE_RESULT_TIME, MAX(T.MATERIAL_NO)MATERIAL_NO, MAX(T.MATERIAL_NAME)MATERIAL_NAME, MAX(T.PRODUCCODE)PRODUCCODE, MAX(T.PRODUCNAME)PRODUCNAME, MAX(T.STEELCODE)STEELCODE, MAX(T.STEELNAME)STEELNAME, MAX(T.GRADECODE)GRADECODE, MAX(T.GRADENAME)GRADENAME, MAX(T.SPEC_CODE)SPEC_CODE, MAX(T.SPEC_NAME)SPEC_NAME, MAX(T.MODEL_CODE)MODEL_CODE, MAX(T.MODEL_DESC)MODEL_DESC, MAX(T.STD_CODE)STD_CODE, MAX(T.STD_NAME)STD_NAME, MAX(T.STD_STYLE)STD_STYLE, MAX(T.STD_STYLE_DESC)STD_STYLE_DESC, MAX(T.PRO_ORDER_NO)PRO_ORDER_NO, MAX(T.PRO_ORDER_ID)PRO_ORDER_ID, MAX(T.order_seq_no) order_seq_no, MAX(T.ORD_LN_PK)ORD_LN_PK, MAX(T.GX_PLAN_NO)GX_PLAN_NO, MAX(T.CRAF_NO)CRAF_NO, MAX(T.PROCESS_CDOE)PROCESS_CDOE, MAX(T.PROCESS_DESC)PROCESS_DESC, MAX(T.NEXT_PROCESS_CDOE)NEXT_PROCESS_CDOE, MAX(T.NEXT_PROCESS_DESC)NEXT_PROCESS_DESC, MAX(T.LIKU_PROCESS_CODE) LIKU_PROCESS_CODE, MAX(T.PLINE_CODE)PLINE_CODE, MAX(T.PLINE_NAME)PLINE_NAME, MAX(T.ACT_DIMATER)ACT_DIMATER, MAX(T.ACT_HEIGHT)ACT_HEIGHT, SUM(T.ACT_LEN)ACT_LEN, MAX(T.ACT_LEN_MIN)ACT_LEN_MIN, MAX(T.ACT_LEN_MAX)ACT_LEN_MAX, SUM(T.ACT_COUNT)ACT_COUNT, ROUND(SUM(T.ACT_WEIGHT), 3) ACT_WEIGHT, ROUND(SUM(T.PONDER_GROSS_WT),3) PONDER_GROSS_WT, MAX(T.BELONG_CODE)BELONG_CODE, MAX(T.BELONG_NAME)BELONG_NAME, MAX(T.JUGDE_APPLY_CODE)JUGDE_APPLY_CODE, MAX(DECODE(T.LOCK_LIKU,'0','正常','1','利库','2','精整利库'))LOCK_LIKU, MAX(T.PRODUCT_FLAG)PRODUCT_FLAG, MAX(T.ORD_LN_DLY_PK)ORD_LN_DLY_PK, MAX(T.TARGET)TARGET, --T.HEAT_PLAN_NO, T.HEAT_PLAN_NO, T.HEAT_PLAN_NO_OLD, MAX(T.GX_PLAN_NO)GX_PLAN_NO, MAX(T.CRAFT_SEQ)CRAFT_SEQ, T.PRO_PLAN_ID_NEXT, T.GX_PLAN_NO_NEXT, T.JUGDE_APPLY_SEQUENO, T.HEAT_PLAN_NO_NEXT, t.LENGTH_TYPE, MAX(T1.ORDER_UNIT) ORDER_UNIT, MAX(T1.ORDERWEIGHT) ORDERWEIGHT, MAX(T1.PAYDOWN_WT_MAX) PAYDOWN_WT_MAX, MAX(T1.ORDER_WT_MAX_SHORT) ORDER_WT_MAX_SHORT, MAX(T1.ORDER_WT_MAX_LONG) ORDER_WT_MAX_LONG, MAX(T1.ACT_LEN) ACT_LEN1, MAX(T1.ACT_WEIGHT) ACT_WEIGHT1, MAX(T1.ACT_WEIGHT_L) ACT_WEIGHT_L, MAX(T1.ACT_WEIGHT_S) ACT_WEIGHT_S, MAX(T1.ACT_LEN2) ACT_LEN2, MAX(T1.ACT_WEIGHT2) ACT_WEIGHT2, CASE WHEN MAX(T1.RECEIV_NM) IN('天津腾飞钢管有限公司','沈阳腾飞钢铁经销有限公司','天津宝仓物流有限公司','天津市安利金属制造有限公司') OR MAX(T1.SUPPLY_UNIT)> 120501 THEN '801703' WHEN MAX(T1.CUSTOMER_NM) IN('天津腾飞钢管有限公司','沈阳腾飞钢铁经销有限公司','天津宝仓物流有限公司','天津市安利金属制造有限公司') THEN '801703' WHEN MAX(T1.STLMT_UNIT_NM) IN('天津腾飞钢管有限公司','沈阳腾飞钢铁经销有限公司','天津宝仓物流有限公司','天津市安利金属制造有限公司') THEN '801703' WHEN (select MAX(t5.PORDERSTATUS) from pln_saleord t5 where t5.ord_ln_dly_pk =T.ord_ln_dly_pk)>=5 THEN '801701' WHEN MAX(NVL(T1.SHORTEST,0))>0 AND (CASE WHEN MAX(T1.ORDER_UNIT) ='英尺' THEN 3.2808 *MAX(T.ACT_LEN_MIN) ELSE 1*MAX(T.ACT_LEN_MIN) END) < MAX(NVL(T1.SHORTEST,0)) THEN '801701' WHEN MAX(NVL(T1.LONGEST,0))>0 AND (CASE WHEN MAX(T1.ORDER_UNIT) ='英尺' THEN 3.2808 *MAX(T.ACT_LEN_MAX) ELSE 1*MAX(T.ACT_LEN_MAX) END) > MAX(NVL(T1.LONGEST,0)) THEN '801701' ELSE CASE WHEN MAX(T1.ORDER_UNIT) = '吨' THEN CASE --缴库量上限 < 累计送判吨(按计划入)+ 单支重量 WHEN MAX(T1.PAYDOWN_WT_MAX) < MAX(T1.ACT_WEIGHT2) + ROUND(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT),3) THEN '801701' WHEN T.LENGTH_TYPE = '1' AND MAX(T1.ORDER_WT_MAX_LONG) < MAX(T1.ACT_WEIGHT_L) + ROUND(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT),3) THEN '801701' WHEN T.LENGTH_TYPE = '2' AND MAX(T1.ORDER_WT_MAX_SHORT) < MAX(T1.ACT_WEIGHT_S) + ROUND(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT),3) THEN '801701' ELSE '801703' END WHEN MAX(T1.ORDER_UNIT) IN( '米' ,'英尺') THEN CASE --缴库量上限 < 累计送判吨(按计划入)+ 单支重量 WHEN MAX(T1.PAYDOWN_WT_MAX) < MAX(T1.ACT_LEN2) + ROUND(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT),3) THEN '801701' WHEN T.LENGTH_TYPE = '1' AND MAX(T1.ORDER_WT_MAX_LONG) < MAX(T1.ACT_LEN_L) + ROUND(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT),3) THEN '801701' WHEN T.LENGTH_TYPE = '2' AND MAX(T1.ORDER_WT_MAX_SHORT) < MAX(T1.ACT_LEN_S) + ROUND(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT),3) THEN '801701' ELSE '801703' END END END IN_MOLD, NVL( CASE WHEN MAX(T1.RECEIV_NM) IN('天津腾飞钢管有限公司','沈阳腾飞钢铁经销有限公司','天津宝仓物流有限公司','天津市安利金属制造有限公司') OR MAX(T1.SUPPLY_UNIT)> 120501 THEN SUM(T.ACT_COUNT) WHEN MAX(T1.CUSTOMER_NM) IN('天津腾飞钢管有限公司','沈阳腾飞钢铁经销有限公司','天津宝仓物流有限公司','天津市安利金属制造有限公司') THEN SUM(T.ACT_COUNT) WHEN MAX(T1.STLMT_UNIT_NM) IN('天津腾飞钢管有限公司','沈阳腾飞钢铁经销有限公司','天津宝仓物流有限公司','天津市安利金属制造有限公司') THEN SUM(T.ACT_COUNT) ELSE CASE WHEN MAX(T1.ORDER_UNIT) = '吨' THEN CASE WHEN T.LENGTH_TYPE = '0' AND MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_WEIGHT2) > 0 THEN FLOOR((MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_WEIGHT2))/(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT))) WHEN T.LENGTH_TYPE = '1' AND MAX(T1.ORDER_WT_MAX_LONG) - MAX(T1.ACT_WEIGHT_L) > 0 THEN FLOOR(LEAST((MAX(T1.ORDER_WT_MAX_LONG) - MAX(T1.ACT_WEIGHT_L)),(MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_WEIGHT2)))/(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT))) WHEN T.LENGTH_TYPE = '2' AND MAX(T1.ORDER_WT_MAX_SHORT) - MAX(T1.ACT_WEIGHT_S) > 0 THEN FLOOR(LEAST((MAX(T1.ORDER_WT_MAX_SHORT) - MAX(T1.ACT_WEIGHT_S)),(MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_WEIGHT2)))/(ROUND(SUM(T.ACT_WEIGHT), 3)/SUM(T.ACT_COUNT))) END WHEN MAX(T1.ORDER_UNIT) IN( '米' ,'英尺') THEN CASE WHEN T.LENGTH_TYPE = '0' AND MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_LEN2) > 0 THEN FLOOR((MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_LEN2))/(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT))) WHEN T.LENGTH_TYPE = '1' AND MAX(T1.ORDER_WT_MAX_LONG) - MAX(T1.ACT_LEN_L) > 0 THEN FLOOR(LEAST((MAX(T1.ORDER_WT_MAX_LONG) - MAX(T1.ACT_LEN_L)),(MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_LEN2)))/(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT))) WHEN T.LENGTH_TYPE = '2' AND MAX(T1.ORDER_WT_MAX_SHORT) - MAX(T1.ACT_WEIGHT_S) > 0 THEN FLOOR(LEAST((MAX(T1.ORDER_WT_MAX_SHORT) - MAX(T1.ACT_LEN_S)),(MAX(T1.PAYDOWN_WT_MAX) - MAX(T1.ACT_LEN2)))/(ROUND(SUM(T.ACT_LEN), 3)/SUM(T.ACT_COUNT))) END END END,0) KSPZ FROM MAT_BC_BACKUP T LEFT JOIN QCM_ZC_APPLY T1 ON T.ORD_LN_DLY_PK = T1.ORD_LN_DLY_PK WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ? AND T.JUGDE_APPLY_CODE IS NOT NULL AND T.QCM_STAUS = '00' #JUGDE_APPLY_CODE# #JUGDE_APPLY_CODE2# #GROUP_BY# ]]> SELECT COUNT(*) COUNT FROM MAT_BC_M T WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ? AND T.QCM_STAUS = '00' SELECT MAX(T.NOTCH_LENGTH) NOTCH_LENGTH, MAX(T.NOTCH_WIDTH) NOTCH_WIDTH, MAX(T.NOTCH_DEPTH) NOTCH_DEPTH FROM HTT_CRACK_DETECTION_ET T WHERE 1 = 1 UPDATE MAT_BC_M T SET T.PONDER_GROSS_WT = ?, T.ACT_WEIGHT = ?, T.PONDER_NAME = ?, T.PONDER_TIME = SYSDATE WHERE T.MAT_NO = ? AND T.JUDGE_STOVE_NO = ? AND T.BELONG_CODE = ? AND T.BATCH_NO = ? AND NVL(T.heat_plan_no_next, '/') = NVL(?, '/') AND NVL(T.BATCH_GROUD_NO, '/') = NVL(?, '/') AND NVL(T.LOT_NO, '/') = NVL(?, '/') AND T.QCM_STAUS = '00' SELECT NVL(SUM(T.ACT_COUNT), 0) ACOUNT FROM MAT_BC_M T WHERE T.JUDGE_STOVE_NO = ? AND T.BELONG_CODE = ? AND T.BATCH_NO = ? AND NVL(T.heat_plan_no_next, '/') = NVL(?, '/') AND NVL(T.BATCH_GROUD_NO, '/') = NVL(?, '/') AND NVL(T.PRO_ORDER_NO, '/') = NVL(?, '/') AND NVL(T.LOT_NO, '/') = NVL(?, '/') AND T.QCM_STAUS = '00' AND T.JUGDE_APPLY_CODE IS NULL group by t.heat_plan_no_next SELECT COUNT(*) COUNT FROM PLN_ZY_JG_MIDDLE T WHERE T.ORD_LN_DLY_PK = '#ORD_LN_DLY_PK#' select COUNT(*) COUNT from pln_zy_jgx_m t,pln_order_jg t1 where t.ord_ln_dly_pk=t1.ord_ln_dly_pk and t.ORD_LN_DLY_PK = '#ORD_LN_DLY_PK#' SELECT COUNT(*) COUNT FROM COUPLING_MAT_DEAL T WHERE T.DEAL_TYPE_CODE = '800801' AND T.ORD_LN_DLY_PK = '#ORD_LN_DLY_PK#' SELECT COUNT(*) COUNT FROM PLN_ORDER_JG T, PLN_ZY_JG_M T1, PLN_ZY_JG_WORKBILL T2 WHERE T.PRO_PLAN_ID_S = T1.PRO_PLAN_ID AND T1.HEAT_PLAN_NO = T2.HEAT_PLAN_NO AND T2.ZY_BILL_STATUS NOT IN ('0', '1') AND T.ORD_LN_DLY_PK = '#ORD_LN_DLY_PK#' SELECT COUNT(*) COUNT FROM PLN_ORDER_JG T WHERE T.ORD_LN_DLY_PK = '#ORD_LN_DLY_PK#' SELECT NVL(SUM(T.PONDER_GROSS_WT),0) PONDER_GROSS_WT FROM MAT_BC_M T WHERE 1 = 1 AND T.QCM_STAUS = '00' AND T.JUGDE_APPLY_CODE IS NULL AND T.PLINE_CODE IN('C018','C075') SELECT T.HTT_TYPE, T.MIN_TEMP, T.HTT_TECHNOLOGY,T.NOTCH_INFO,T.NOTCH_LENGTH,T.NOTCH_WIDTH,T.NOTCH_DEPTH FROM QCM_ZG_JUGDE_APPLY T WHERE 1 = 1 SELECT T.PROCESS_CODE_C FROM PLN_ZY_DBK_M T WHERE 1=1 SELECT T.PROCESS_CODE_C FROM PLN_ZY_RCL_M T WHERE 1=1 SELECT T.PROCESS_CODE_C FROM PLN_ZY_JGX_M T WHERE 1=1 SELECT T.PROCESS_CODE_C FROM PLN_ZY_DBK_M T WHERE 1=1 SELECT T.PROCESS_CODE_C FROM PLN_ZY_RCL_M T WHERE 1=1 SELECT NVL(COUNT(*), 0) COUNT FROM MCH_TWISTINGLY_RESULT_D T WHERE 1 = 1 AND T.JUDGE_STOVE_NO = ? AND T.BATCH_NO = ? AND NVL(COUPLING_NUM, 0) - NVL(JUDGE_NUM, 0) > 0 SELECT NVL(COUNT(*), 0) COUNT FROM MCH_TWISTINGLY_RESULT_D T WHERE 1 = 1 AND T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ? AND T.BATCH_NO = ? AND NVL(COUPLING_NUM, 0) - NVL(JUDGE_NUM, 0) > 0 SELECT NVL(count(*),'0') count FROM MCH_TWISTINGLY_RESULT_D T WHERE 1=1 AND T.JUDGE_STOVE_NO = ? SELECT T.DEAL_ORDE FROM MCH_TWISTINGLY_RESULT_D T WHERE 1=1 AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.batch_no = TRIM('#BATCH_NO#') select T.PRODUC_TYPE from COM_BASE_PRODUCT t WHERE T.PRODUCNAME = '#PRODUCNAME#' SELECT T.MAT_NO FROM MAT_BC_M T WHERE T.JUDGE_STOVE_NO = ? AND T.BELONG_CODE = ? AND T.BATCH_NO = ? AND T.QCM_STAUS = '00' AND T.JUGDE_APPLY_CODE IS NULL AND NVL(T.heat_plan_no_next, '/') = NVL(?, '/') AND NVL(T.BATCH_GROUD_NO, '/') = NVL(?, '/') AND NVL(T.PRO_ORDER_NO, '/') = NVL(?, '/') AND NVL(T.LOT_NO, '/') = NVL(?, '/') SELECT T1.STORAGE_NO,T1.STORAGE_NAME FROM YDM_BC_BUTTRESS T, YDM_BS_STORAGE T1 WHERE T.STORAGE_NO = T1.STORAGE_NO SELECT T.STORAGE_NAME FROM YDM_BS_STORAGE T WHERE 1 = 1 SELECT T.BASENAME,T.BASECODE FROM COM_BASE_INFO T WHERE T.SORTCODE = ? SELECT '#PLINE_CODE#'||'#PRODUCT_FLAG#' || TO_CHAR(SYSDATE, 'yyyyMMDD') || LPAD(NVL(MAX(TO_NUMBER(SUBSTR(JUGDE_APPLY_CODE, LENGTH(JUGDE_APPLY_CODE) - 5))), 0) + 1, 6, '0') JUGDE_APPLY_CODE FROM QCM_ZG_JUGDE_APPLY WHERE JUGDE_APPLY_CODE LIKE '#PLINE_CODE#'||'#PRODUCT_FLAG#' || TO_CHAR(SYSDATE, 'yyyyMMDD') || '______' SELECT NVL(COUNT(*),0) COUNT FROM PLN_ZY_RCL_M WHERE PLANSTATUS NOT IN ('00','10') SELECT NVL(COUNT(*),0) COUNT FROM PLN_ZY_JGX_M WHERE PLANSTATUS NOT IN ('00','10') SELECT NVL(COUNT(*),0) COUNT FROM PLN_ZY_JG_M WHERE PLANSTATUS NOT IN ('00','10') SELECT T.JUGDE_APPLY_CODE FROM QCM_ZG_JUGDE_APPLY T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.PROCESS_CODE = '#PROCESS_CDOE#' AND T.IS_FLAG = '0' AND T.IS_ALL_SCRAP = '0' GROUP BY T.JUGDE_APPLY_CODE SELECT NVL(MAX(T.JUGDE_APPLY_SEQUENO),0)+1 JUGDE_APPLY_SEQUENO FROM QCM_ZG_JUGDE_APPLY T WHERE T.JUGDE_APPLY_CODE = ? SELECT S.FACE_RESULT_PATH,S.HEAT_PLAN_NO FROM VRP_COM_INFO S WHERE S.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND S.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND S.PLINE_CODE = '#PLINE_CODE#' AND S.STATION_CODE IN('650106','650404','650504','650604','650704') SELECT MIN(T.REPORT_PATH) REPORT_PATH FROM HTT_CRACK_DETECTION_PARA T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.batch_no = TRIM('#BATCH_NO#') AND T.REPORT_PATH IS NOT NULL SELECT SUM(COUNT) COUNT FROM (SELECT COUNT(*) COUNT FROM MAT_BC_M T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.QCM_STAUS = '00' AND T.JUGDE_APPLY_CODE IS NULL UNION SELECT COUNT(*) COUNT FROM MAT_BC_BACKUP T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.QCM_STAUS = '00' AND T.JUGDE_APPLY_CODE IS NULL ) SELECT T.* FROM PLN_ZY_DBK_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' SELECT T.* FROM PLN_ZY_DBK_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' SELECT T.CHECK_NO FROM PORT_htt_BATCH_SAMPLE_RESULT T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.PHY_BATCH_NO = '#BATCH_NO#' AND T.IS_SAMPLE_PIPE = '1' GROUP BY T.CHECK_NO SELECT T.* FROM PLN_ZY_RCL_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' SELECT T.* FROM PLN_ZY_RCL_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' SELECT T.* FROM PLN_ZY_JGX_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' SELECT T.* FROM PLN_ZY_JGX_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' SELECT T.* FROM pln_zy_zg_m T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.IF_MATCH_ODD = '6' INSERT INTO QCM_ZG_JUGDE_APPLY (JUGDE_APPLY_CODE, JUDGE_STOVE_NO, BATCH_NO, BATCH_GROUD_NO, PROCESS_CODE, PLINE_CODE, ACT_COUNT, ACT_WEIGHT, ACT_THEORY_WEIGHT, PRO_ORDER_ID, FACE_RESULT_PATH, SPEC_RESULT_PATH, CHEM_RESULT_PATH, PHY_RESULT_PATH, DETECT_RESULT_PATH, WPRESSURE_RESULT_PATH, PROCESS_RESULT_PATH, VALIDFLAG, APPLY_NAME, APPLY_TIME, MEMO, QUALITY_GROUP, MATERIAL_NO, MATERIAL_NAME, PRODUCCODE, PRODUCNAME, STEELCODE, STEELNAME, GRADECODE, GRADENAME, SPEC_CODE, SPEC_NAME, MODEL_CODE, MODEL_DESC, STD_CODE, STD_NAME, STD_STYLE, STD_STYLE_DESC, CRAF_NO, LOT_NO, PLINE_NAME, PRO_ORDER_NO, MAT_GOWHERE_CODE, MAT_GOWHERE_NAME, ACT_DIMATER, ACT_HEIGHT, ACT_LEN_MIN, ACT_LEN_MAX, ORD_LN_DLY_PK, APPLY_FLAG, INSTOCK_FLAG, BELONG_CODE, BELONG_NAME, ISENDGX, ACT_LEN, BELONG_CODE_JUGDE, BELONG_NAME_JUGDE, GX_PLAN_NO, BAL_YEAR_MONTH, STOVE_NO, STEEL_STANDRAD, PRO_PLAN_ID_NEXT, GX_PLAN_NO_NEXT, LK_FLAG, JUGDE_APPLY_SEQUENO, TARGET, CRAFT_SEQ, INDEX_SEQ, CIC, PIC, SIC, DIC, WIC, GIC, FACE_RESULT_CODE, SPEC_RESULT_CODE, CHEM_RESULT_CODE, PHY_RESULT_CODE, DETECT_RESULT_CODE, WPRESSURE_RESULT_CODE, PROCESS_RESULT_CODE, CHECK_NO, HEAT_PLAN_NO_NEXT, HEAT_PLAN_NO, NEXT_PROCESS_CDOE, DELIVERY_STATE_CODE, DELIVERY_STATE_NAME, LOAD_JUDGE_STOVE_NO, ZP_M_LH, ZP_COLL, HTT_TYPE, MIN_TEMP, HTT_TECHNOLOGY, NOTCH_INFO, NOTCH_LENGTH, NOTCH_WIDTH, NOTCH_DEPTH, LOT_NO_GROUP, TESTING_GRADE, TESTING_TYPE, TEST_PRESSURE, HOLDTIME_TIME, TEST_PRESSURE_Y, MCH_WATERGAGE_RESULT, MCH_PATH_RESULT, MCH_CHAMFERING_RESULT, MCH_TWISTINGLY_RESULT, MCH_DIMENSIONS_RESULT, MCH_VISUAL_RESULT, MCH_THREAD_INSPECTION_RESULT, MCH_REMANENCE_RESULT, MCH_RADIOACTIVITY_RESULT, MCH_BEVEL_RESULT, ANGLE_VAL, EDGE_VAL, INPUT_WEIGHT, INPUT_COUNT, OUTPUT_WEIGHT, OUTPUT_COUNT, TESTING_STANDAR, DRIFT_MODEL_MIN, DRIFT_MODEL_MIN2, DRIFT_MODEL_LEN, DRIFT_MODEL_LEN2, MEASURED_END_PART, MEASURED_MIDDLE_PART, MEASURED_TAIL_PART, LIKU_PROCESS_CODE, SUPPLY_UNIT, SUPPLY_UNIT_DESC, length_type, IN_MOLD) VALUES ('#JUGDE_APPLY_CODE#', '#JUDGE_STOVE_NO#', '#BATCH_NO#', '#BATCH_GROUD_NO#', '#PROCESS_CODE#', '#PLINE_CODE#', '#ACT_COUNT#', '#ACT_WEIGHT#', '#ACT_THEORY_WEIGHT#', '#PRO_ORDER_ID#', '#FACE_RESULT_PATH#', '#SPEC_RESULT_PATH#', '#CHEM_RESULT_PATH#', '#PHY_RESULT_PATH#', '#DETECT_RESULT_PATH#', '#WPRESSURE_RESULT_PATH#', '#PROCESS_RESULT_PATH#', '#VALIDFLAG#', '#APPLY_NAME#', TO_DATE('#APPLY_TIME#', 'YYYY-MM-DD HH24:MI:SS'), '#MEMO#', '#QUALITY_GROUP#', '#MATERIAL_NO#', '#MATERIAL_NAME#', '#PRODUCCODE#', '#PRODUCNAME#', '#STEELCODE#', '#STEELNAME#', '#GRADECODE#', '#GRADENAME#', '#SPEC_CODE#', '#SPEC_NAME#', '#MODEL_CODE#', '#MODEL_DESC#', '#STD_CODE#', '#STD_NAME#', '#STD_STYLE#', '#STD_STYLE_DESC#', '#CRAF_NO#', '#LOT_NO#', '#PLINE_NAME#', '#PRO_ORDER_NO#', NVL('#MAT_GOWHERE_CODE#', '\'), NVL('#MAT_GOWHERE_NAME#', '\'), '#ACT_DIMATER#', '#ACT_HEIGHT#', '#ACT_LEN_MIN#', '#ACT_LEN_MAX#', '#ORD_LN_DLY_PK#', '#APPLY_FLAG#', '#INSTOCK_FLAG#', '#BELONG_CODE#', '#BELONG_NAME#', '#ISENDGX#', '#ACT_LEN#', '#BELONG_CODE_JUGDE#', '#BELONG_NAME_JUGDE#', '#GX_PLAN_NO#', '', '#STOVE_NO#', '#STEEL_STANDRAD#', '#PRO_PLAN_ID_NEXT#', '#GX_PLAN_NO_NEXT#', '#LK_FLAG#', '#JUGDE_APPLY_SEQUENO#', '#TARGET#', '#CRAFT_SEQ#', '#INDEX_SEQ#', '#CIC#', '#PIC#', '#SIC#', '#DIC#', '#WIC#', '#GIC#', '#FACE_RESULT_CODE#', '#SPEC_RESULT_CODE#', '#CHEM_RESULT_CODE#', '#PHY_RESULT_CODE#', '#DETECT_RESULT_CODE#', '#WPRESSURE_RESULT_CODE#', '#PROCESS_RESULT_CODE#', '#CHECK_NO#', '#HEAT_PLAN_NO_NEXT#', '#HEAT_PLAN_NO#', '#NEXT_PROCESS_CDOE#', '#DELIVERY_STATE_CODE#', '#DELIVERY_STATE_NAME#', '#LOAD_JUDGE_STOVE_NO#', '#ZP_M_LH#', '#ZP_COLL#', '#HTT_TYPE#', '#MIN_TEMP#', '#HTT_TECHNOLOGY#', '#NOTCH_INFO#', '#NOTCH_LENGTH#', '#NOTCH_WIDTH#', '#NOTCH_DEPTH#', '#LOT_NO_GROUP#', '#TESTING_GRADE#', '#TESTING_TYPE#', '#TEST_PRESSURE#', '#HOLDTIME_TIME#', '#TEST_PRESSURE_Y#', '#MCH_WATERGAGE_RESULT#', '#MCH_PATH_RESULT#', '#MCH_CHAMFERING_RESULT#', '#MCH_TWISTINGLY_RESULT#', '#MCH_DIMENSIONS_RESULT#', '#MCH_VISUAL_RESULT#', '#MCH_THREAD_INSPECTION_RESULT#', '#MCH_REMANENCE_RESULT#', '#MCH_RADIOACTIVITY_RESULT#', '#MCH_BEVEL_RESULT#', '#ANGLE_VAL#', '#EDGE_VAL#', '#INPUT_WEIGHT#', '#INPUT_COUNT#', '#OUTPUT_WEIGHT#', '#OUTPUT_COUNT#', '#TESTING_STANDAR#', '#DRIFT_MODEL_MIN#', '#DRIFT_MODEL_MIN2#', '#DRIFT_MODEL_LEN#', '#DRIFT_MODEL_LEN2#', '#MEASURED_END_PART#', '#MEASURED_MIDDLE_PART#', '#MEASURED_TAIL_PART#', '#LIKU_PROCESS_CODE#', '#SUPPLY_UNIT#', '#SUPPLY_UNIT_DESC#', (select decode('#LENGTH_TYPE#', '长尺', 1, '短尺', 2, '正尺', 0, '#LENGTH_TYPE#') from dual), '#IN_MOLD#') INSERT INTO QCM_JUGDE_APPLY_LOG( JUGDE_APPLY_CODE, JUDGE_STOVE_NO, BATCH_NO, BATCH_GROUD_NO, PROCESS_CODE, PLINE_CODE, ACT_COUNT, ACT_WEIGHT, CREATE_NAME, CREATE_TIME, LOG_TYPE) VALUES( ?, ?, ?, ?, ?, ?, ?, ?, ?, SYSDATE, ?) 0; IF (V_COUNT > 0) THEN FOR MYROW1 IN (SELECT * FROM MCH_TWISTINGLY_RESULT_D T WHERE 1 = 1 AND T.JUDGE_STOVE_NO = '#JudgeWithCoupling#' AND T.BATCH_NO = '#BatchNoWithCoupling#' AND NVL(COUPLING_NUM, 0) - NVL(JUDGE_NUM, 0) > 0 AND ROWNUM = 1) LOOP INSERT INTO MCH_TWISTINGLY_JUDGE (JUGDE_APPLY_CODE, JUGDE_APPLY_SEQUENO, JUDGE_STOVE_NO, BATCH_NO, MAT_NO, RESULT_NO, SEQ, COUPLING_STOVE_NO, LOT_NO) VALUES ('#JUGDE_APPLY_CODE#', '#JUGDE_APPLY_SEQUENO#', '#JUDGE_STOVE_NO#', '#BATCH_NO#', MYROW.MAT_NO, MYROW1.RESULT_NO, MYROW1.SEQ, MYROW1.COUPLING_STOVE_NO, MYROW1.LOT_NO); UPDATE MCH_TWISTINGLY_RESULT_D SET JUDGE_NUM = NVL(JUDGE_NUM, 0) + 1 WHERE RESULT_NO = MYROW1.RESULT_NO AND SEQ = MYROW1.SEQ; END LOOP; END IF; END IF; END LOOP; END; ]]> DECLARE V_JUDGE_STOVE_NO QCM_ZG_JUGDE_APPLY.JUDGE_STOVE_NO%type := '#JUDGE_STOVE_NO#'; V_PROCESS_CODE QCM_ZG_JUGDE_APPLY.PROCESS_CODE%type := '#PROCESS_CODE#'; BEGIN FOR MYROW IN (SELECT T.*, M.HEAT_PLAN_NO_OLD, M.ZZB_FLAG ZZB_FLAG2 FROM QCM_ZG_JUGDE_APPLY T, (SELECT DISTINCT M.PROCESS_CDOE, M.JUDGE_STOVE_NO, M.BATCH_NO, NVL(M.HEAT_PLAN_NO_OLD, M.HEAT_PLAN_NO) HEAT_PLAN_NO_OLD, M.ZZB_FLAG FROM MAT_BC_M M WHERE M.PROCESS_CDOE = V_PROCESS_CODE AND M.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO UNION ALL SELECT DISTINCT M.PROCESS_CDOE, M.JUDGE_STOVE_NO, M.BATCH_NO, NVL(M.HEAT_PLAN_NO_OLD, M.HEAT_PLAN_NO) HEAT_PLAN_NO_OLD, M.ZZB_FLAG FROM MAT_BC_BACKUP M WHERE M.PROCESS_CDOE = V_PROCESS_CODE AND M.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO) M WHERE T.PROCESS_CODE = V_PROCESS_CODE AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO AND T.PROCESS_CODE = M.PROCESS_CDOE AND T.BATCH_NO = M.BATCH_NO AND T.JUDGE_STOVE_NO = M.JUDGE_STOVE_NO) LOOP IF (V_PROCESS_CODE = 'E') THEN UPDATE QCM_ZG_JUGDE_APPLY T SET T.LOAD_JUDGE_STOVE_NO = (SELECT MAX(E.FEED_HEAT_NO) FROM PORT_VRP_BATCH_SAMPLE_RESULT E WHERE /*E.HEAT_PLAN_NO = MYROW.HEAT_PLAN_NO_OLD AND*/ E.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO AND E.PHY_BATCH_NO = MYROW.BATCH_NO), T.LOAD_BATCH_NO = (SELECT MAX(E.BATCH_NO) FROM PORT_VRP_BATCH_SAMPLE_RESULT E WHERE /*E.HEAT_PLAN_NO = MYROW.HEAT_PLAN_NO_OLD AND*/ E.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO AND E.PHY_BATCH_NO = MYROW.BATCH_NO), T.ZZB_FLAG = MYROW.ZZB_FLAG2 WHERE T.HEAT_PLAN_NO = MYROW.HEAT_PLAN_NO AND T.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO AND T.BATCH_NO = MYROW.BATCH_NO; ELSIF (V_PROCESS_CODE = 'F') THEN UPDATE QCM_ZG_JUGDE_APPLY T SET T.LOAD_JUDGE_STOVE_NO = (SELECT MAX(E.FEED_HEAT_NO) FROM PORT_HTT_BATCH_SAMPLE_RESULT E WHERE /*E.HEAT_PLAN_NO = MYROW.HEAT_PLAN_NO_OLD AND*/ E.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO AND E.PHY_BATCH_NO = MYROW.BATCH_NO), T.LOAD_BATCH_NO = CASE WHEN MYROW.ZP_M_LH IS NULL THEN (SELECT MAX(E.BATCH_NO) FROM PORT_HTT_BATCH_SAMPLE_RESULT E WHERE /*E.HEAT_PLAN_NO = MYROW.HEAT_PLAN_NO_OLD AND*/ E.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO AND E.PHY_BATCH_NO = MYROW.BATCH_NO) ELSE SUBSTR(MYROW.ZP_M_LH, -5) END, T.ZZB_FLAG = MYROW.ZZB_FLAG2 WHERE T.HEAT_PLAN_NO = MYROW.HEAT_PLAN_NO AND T.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO AND T.BATCH_NO = MYROW.BATCH_NO; ELSIF (V_PROCESS_CODE = 'G') THEN UPDATE QCM_ZG_JUGDE_APPLY T SET T.LOAD_JUDGE_STOVE_NO = (SELECT MAX(E.FEED_HEAT_NO) FROM PORT_MCH_BATCH_SAMPLE_RESULT E WHERE DECODE(MYROW.LK_FLAG, '0', E.HEAT_PLAN_NO, '/') = DECODE(MYROW.LK_FLAG, '0', MYROW.HEAT_PLAN_NO_OLD, '/') AND E.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO AND E.PHY_BATCH_NO = MYROW.BATCH_NO), T.LOAD_BATCH_NO = CASE WHEN MYROW.ZP_M_LH IS NULL THEN (SELECT MAX(E.BATCH_NO) FROM PORT_MCH_BATCH_SAMPLE_RESULT E WHERE DECODE(MYROW.LK_FLAG, '0', E.HEAT_PLAN_NO, '/') = DECODE(MYROW.LK_FLAG, '0', MYROW.HEAT_PLAN_NO_OLD, '/') AND E.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO AND E.PHY_BATCH_NO = MYROW.BATCH_NO) ELSE SUBSTR(MYROW.ZP_M_LH, -5) END, T.BUNDLING_MEMO = (SELECT MAX(M.MEMO) FROM MCH_BUNDLING_RESULT M WHERE DECODE(MYROW.LK_FLAG, '0', M.HEAT_PLAN_NO, '/') = DECODE(MYROW.LK_FLAG, '0', MYROW.HEAT_PLAN_NO_OLD, '/') AND M.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO AND M.BATCH_NO = MYROW.BATCH_NO), T.ZZB_FLAG = MYROW.ZZB_FLAG2 WHERE T.HEAT_PLAN_NO = MYROW.HEAT_PLAN_NO AND T.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO AND T.BATCH_NO = MYROW.BATCH_NO; END IF; END LOOP; --同步成品未判的库存与送判表重量,长度 FOR MYROW2 IN (SELECT T.JUGDE_APPLY_CODE, T.JUGDE_APPLY_SEQUENO, T.JUDGE_STOVE_NO, T.BATCH_NO, T.BATCH_GROUD_NO, T.PROCESS_CODE, SUM(M.ACT_COUNT) ACT_COUNT, SUM(M.ACT_WEIGHT) ACT_WEIGHT, SUM(M.ACT_LEN) ACT_LEN FROM QCM_ZG_JUGDE_APPLY T, MAT_BC_M M WHERE T.PROCESS_CODE = V_PROCESS_CODE AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO AND T.PROCESS_CODE = M.PROCESS_CDOE AND T.BATCH_NO = M.BATCH_NO AND T.JUDGE_STOVE_NO = M.JUDGE_STOVE_NO AND T.BATCH_GROUD_NO = M.BATCH_GROUD_NO AND T.JUGDE_APPLY_CODE = M.JUGDE_APPLY_CODE AND T.JUGDE_APPLY_SEQUENO = M.JUGDE_APPLY_SEQUENO AND T.VALIDFLAG = '00' AND T.TARGET = 'A' GROUP BY T.JUGDE_APPLY_CODE, T.JUGDE_APPLY_SEQUENO, T.JUDGE_STOVE_NO, T.BATCH_NO, T.PROCESS_CODE, T.BATCH_GROUD_NO) LOOP UPDATE QCM_ZG_JUGDE_APPLY T SET T.ACT_WEIGHT = MYROW2.ACT_WEIGHT, T.ACT_LEN = MYROW2.ACT_LEN WHERE T.PROCESS_CODE = MYROW2.PROCESS_CODE AND T.BATCH_NO = MYROW2.BATCH_NO AND T.JUDGE_STOVE_NO = MYROW2.JUDGE_STOVE_NO AND T.BATCH_GROUD_NO = MYROW2.BATCH_GROUD_NO AND T.JUGDE_APPLY_CODE = MYROW2.JUGDE_APPLY_CODE AND T.JUGDE_APPLY_SEQUENO = MYROW2.JUGDE_APPLY_SEQUENO AND T.ACT_COUNT = MYROW2.ACT_COUNT AND T.VALIDFLAG = '00' AND T.TARGET = 'A'; END LOOP; --更新成品送判量统计表 SET_QCM_ZC_APPLY2('#ORD_LN_DLY_PK#'); END; SELECT S.DEPARTMENT_CODE FROM COM_BASE_PLINE S WHERE S.PLINE_CODE = '#PLINE_CODE#' select T.SORT_CODE from COM_BASE_PROCESS_C t WHERE T.PROCESS_CDOE_C = (select T1.PROCESS_CODE_C from PLN_ZY_RCL_M T1 where 1 =1 SELECT CASE WHEN T.LOW_TEMP IS NULL THEN '' ELSE MAX(T.LOW_TEMP) || '℃' END LHEAT_EXIT_TEMP, CASE WHEN T.HTT_TECHNOLOGY IS NOT NULL THEN T.HTT_TECHNOLOGY WHEN T1.HTT_TECHNOLOGY IS NOT NULL THEN T1.HTT_TECHNOLOGY WHEN T.LHEAT_EXIT_TEMP IS NULL AND T1.HHEAT_EXIT_TEMP IS NOT NULL THEN T1.HHEAT_EXIT_TEMP || '℃' || '×' || T1.TOTAL_TIME || 'min' || T1.COOLING_TYPE WHEN T1.HHEAT_EXIT_TEMP IS NULL AND T.LHEAT_EXIT_TEMP IS NOT NULL THEN T.LHEAT_EXIT_TEMP || '℃' || '×' || T.TOTAL_TIME || 'min' || T.COOLING_TYPE WHEN T.LHEAT_EXIT_TEMP IS NULL AND T1.HHEAT_EXIT_TEMP IS NULL THEN '' ELSE T1.HHEAT_EXIT_TEMP || '℃' || '×' || T1.TOTAL_TIME || 'min' || T1.COOLING_TYPE || '+' ||T.LHEAT_EXIT_TEMP || '℃' || '×' || T.TOTAL_TIME || 'min' || T.COOLING_TYPE END HEAT_EXIT_TEMP, MAX(T.CREATE_TIME),MAX(T1.CREATE_TIME) FROM HTT_LHEAT_RESULT T,HTT_HHEAT_RESULT T1 WHERE T.HEAT_PLAN_NO = T1.HEAT_PLAN_NO AND T.PLINE_CODE = T1.PLINE_CODE AND T1.CREATE_TIME = (SELECT MAX(T2.CREATE_TIME) FROM HTT_HHEAT_RESULT T2 WHERE #HEAT_PLAN_NO# and #PLINE_CODE#) AND T.CREATE_TIME = (SELECT MAX(T2.CREATE_TIME) FROM HTT_LHEAT_RESULT T2 WHERE #HEAT_PLAN_NO# and #PLINE_CODE#) AND #LHEAT_PLAN_NO# and #LPLINE_CODE# GROUP BY T.HTT_TECHNOLOGY,T1.HTT_TECHNOLOGY, T.LHEAT_EXIT_TEMP,t1.total_time,t.total_time,t.LOW_TEMP, T1.HHEAT_EXIT_TEMP,T.COOLING_TYPE,T1.COOLING_TYPE SELECT NVL(SUM(REAL_OUTDOUBLE_NUM),0) REAL_OUTDOUBLE_NUM FROM ( SELECT NVL(SUM(T.ACT_COUNT), 0) REAL_OUTDOUBLE_NUM FROM MAT_BC_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.QCM_STAUS = '00' AND T.PROCESS_CDOE = 'F' UNION SELECT NVL(SUM(T.ACT_COUNT), 0) REAL_OUTDOUBLE_NUM FROM MAT_BC_BACKUP T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.QCM_STAUS = '00' AND T.PROCESS_CDOE = 'F') SELECT T.MIN_TEMP,T.HTT_TECHNOLOGY FROM qcm_zg_jugde_apply T WHERE 1 =1 AND #LHEAT_PLAN_NO# AND #LPLINE_CODE# SELECT T.GROUP_ID, CASE WHEN T.ZP_BATCH_NO IS NULL THEN T.ZP_JUDGE_STOVE_NO ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH FROM VRP_OFFLINE_RESULT T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND T.GROUP_LOG = '1' SELECT LISTAGG(DECODE(T.BATCH_NO, '',T.JUDGE_STOVE_NO,T.JUDGE_STOVE_NO || '+' || T.BATCH_NO), ',') WITHIN GROUP(ORDER BY T.BATCH_NO) ZP_COLL FROM VRP_GROUP_RESULT T WHERE T.GROUP_ID = ? SELECT T.GROUP_ID, CASE WHEN T.ZP_BATCH_NO IS NULL THEN T.ZP_JUDGE_STOVE_NO ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH FROM HTT_OFFLINE_RESULT T WHERE T.GROUP_LOG = '1' AND (NVL(T.HEAT_PLAN_NO, '/') = NVL('#HEAT_PLAN_NO_OLD#', '/') OR NVL(T.ZY_BATCH_ID1, '/') = NVL('#HEAT_PLAN_NO_OLD#', '/')) select NVL(SUM(T.ACT_COUNT), 0) ACT_COUNT from PORT_VRP_BATCH_SAMPLE_RESULT t WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND ((T.MAT_STATUS = '00' and t.instore_flag='0') or t.mat_status = '20') SELECT LISTAGG(DECODE(T.BATCH_NO, '',T.JUDGE_STOVE_NO,T.JUDGE_STOVE_NO || '+' || T.BATCH_NO), ',') WITHIN GROUP(ORDER BY T.BATCH_NO) ZP_COLL FROM HTT_GROUP_RESULT T WHERE T.GROUP_ID = ? SELECT T.GROUP_ID, CASE WHEN T.ZP_BATCH_NO IS NULL THEN T.ZP_JUDGE_STOVE_NO ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH FROM MCH_OFFLINE_RESULT T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND T.GROUP_LOG = '1' SELECT LISTAGG(DECODE(T.BATCH_NO, '',T.JUDGE_STOVE_NO,T.JUDGE_STOVE_NO || '+' || T.BATCH_NO), ',') WITHIN GROUP(ORDER BY T.BATCH_NO) ZP_COLL FROM MCH_GROUP_RESULT T WHERE T.GROUP_ID = ? SELECT T.JUDGE_STOVE_NO,t.BATCH_NO FROM MCH_GROUP_RESULT T WHERE T.GROUP_ID = ? SELECT CASE WHEN T.ZP_BATCH_NO IS NULL THEN T.ZP_JUDGE_STOVE_NO ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH, CASE WHEN T.BATCH_NO IS NULL THEN LISTAGG(T.JUDGE_STOVE_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO) ELSE LISTAGG(T.JUDGE_STOVE_NO || '+' || T.BATCH_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO) END ZP_COLL FROM VRP_GROUP_RESULT T WHERE T.ZP_JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' GROUP BY T.ZP_JUDGE_STOVE_NO, T.ZP_BATCH_NO,T.BATCH_NO SELECT CASE WHEN T.ZP_BATCH_NO IS NULL THEN T.ZP_JUDGE_STOVE_NO ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH, CASE WHEN T.BATCH_NO IS NULL THEN LISTAGG(T.JUDGE_STOVE_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO) ELSE LISTAGG(T.JUDGE_STOVE_NO || '+' || T.BATCH_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO) END ZP_COLL FROM HTT_GROUP_RESULT T WHERE T.ZP_JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' GROUP BY T.ZP_JUDGE_STOVE_NO, T.ZP_BATCH_NO,T.BATCH_NO SELECT CASE WHEN T.ZP_BATCH_NO IS NULL THEN T.ZP_JUDGE_STOVE_NO ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH, CASE WHEN T.BATCH_NO IS NULL THEN LISTAGG(T.JUDGE_STOVE_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO) ELSE LISTAGG(T.JUDGE_STOVE_NO || '+' || T.BATCH_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO) END ZP_COLL FROM MCH_GROUP_RESULT T WHERE T.ZP_JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' GROUP BY T.ZP_JUDGE_STOVE_NO, T.ZP_BATCH_NO,T.BATCH_NO SELECT T.CRAFT_SEQ, T.CRAFT_FILE_NO,T.INDEX_SEQ FROM PLN_ZY_DBK_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' SELECT T.CRAFT_SEQ, T.CRAFT_FILE_NO,T.INDEX_SEQ FROM PLN_ZY_RCL_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' SELECT T.CRAFT_SEQ, T.CRAFT_FILE_NO,T.INDEX_SEQ FROM PLN_ZY_RCL_M T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' SELECT REPLACE(DBMS_LOB.SUBSTR(WMSYS.WM_CONCAT(DISTINCT DECODE(REPORT_NO, '4', 'ET', 'UT')), 400), ',', '+') TESTING_TYPE FROM HTT_CRACK_DETECTION_PARA WHERE HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND BATCH_NO = '#BATCH_NO#' SELECT REPLACE(DBMS_LOB.SUBSTR(WMSYS.WM_CONCAT(DISTINCT TESTING_GRAGE), 400), ',', '+') TESTING_GRAGE FROM (SELECT LONGITUDINAL_EXTERNAL TESTING_GRAGE FROM HTT_CRACK_DETECTION_PARA WHERE HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND BATCH_NO = '#BATCH_NO#' AND LONGITUDINAL_EXTERNAL IS NOT NULL AND LONGITUDINAL_EXTERNAL != '/' UNION SELECT ACCPETANCE_LEVEL TESTING_GRAGE FROM HTT_CRACK_DETECTION_PARA WHERE HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND BATCH_NO = '#BATCH_NO#' AND ACCPETANCE_LEVEL IS NOT NULL AND ACCPETANCE_LEVEL != '/') SELECT COUNT(*) COUNT FROM QCM_ZC_CHECKCONSIGN T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.PROCESS_CODE = 'F' AND T.CYCLES_FLAG = '1' SELECT T.CRAFT_SEQ, T.CRAFT_FILE_NO,T.INDEX_SEQ FROM PLN_ZY_JGX_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' '0') AND T.VALIDFLAG <> '0' AND T.VALIDFLAG <> '5' ORDER BY T.CRAFT_NO_V DESC ]]> select NVL(SUM(T.ACT_COUNT), 0) ACT_COUNT from PORT_HTT_BATCH_SAMPLE_RESULT t WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND ((T.MAT_STATUS = '00' and t.instore_flag='0') or t.mat_status = '20') select NVL(SUM(T.ACT_COUNT), 0) ACT_COUNT from PORT_MCH_BATCH_SAMPLE_RESULT t WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND ((T.MAT_STATUS = '00' and t.instore_flag='0') or t.mat_status = '20') SELECT COUNT(1) COUNT FROM PORT_MCH_BATCH_SAMPLE_RESULT P, MAT_BC_M T WHERE P.MAT_NO = T.MAT_NO AND P.JUDGE_STOVE_NO = T.JUDGE_STOVE_NO AND P.PHY_BATCH_NO = T.BATCH_NO AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.PRO_ORDER_ID = '#PRO_ORDER_ID#' AND T.GX_PLAN_NO = '#GX_PLAN_NO#' AND T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.QCM_STAUS = '00' AND T.JUGDE_APPLY_CODE IS NULL AND T.ACT_WEIGHT != P.ACT_WEIGHT AND P.INSTORE_FLAG = '1' AND P.JUGDE_APPLY_CODE IS NULL select NVL(MIN(T.BESIDE_STATUS), '00') BESIDE_STATUS from PLN_ZY_JGX_C t WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND BATCH_NO = '#BATCH_NO#' SELECT T.BASECODE, T.BASENAME FROM COM_BASE_INFO T WHERE T.BASECODE = (SELECT GET_DELIVERY_STATE(?, ?) SORTCODE FROM DUAL) AND T.SORTCODE='4100' SELECT T.BASECODE, T.BASENAME FROM COM_BASE_INFO T WHERE T.BASECODE = (SELECT GET_SHIPPED_STATE(?,?,?) SORTCODE FROM DUAL) AND T.SORTCODE='4100' SELECT T.BASECODE, T.BASENAME FROM COM_BASE_INFO T WHERE T.BASECODE = (SELECT GET_SHIPPED_STATE((SELECT MAX(T.DESGIN_KEY_BL) FROM CRAFT_ORD_DESIGN_MSC_BL T WHERE T.DESGIN_KEY = ?), NVL((select MAX(T1.MSC_PLINE) from CRAFT_ORD_DESIGN_MSC_PL_STI t1, CRAFT_ORD_DESIGN_MSC_BL T2 WHERE T1.DESGIN_KEY = T2.DESGIN_KEY_BL AND T2.DESGIN_KEY = ?), '000001'), ?) SORTCODE FROM DUAL) AND T.SORTCODE = '4100' SELECT S.SALE_ORG, S.SALE_ORG_DESC FROM SLM_ORDER_HEAD S, SLM_ORDER_LINE S1, MAT_BC_M T WHERE S.ORD_PK = S1.ORD_PK AND (S.ORDER_NO || '/' || S1.ORDER_SEQ = T.PRO_ORDER_NO OR S1.ORD_LN_PK = T.ORD_LN_PK) AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND ROWNUM = 1 SELECT P.DEPARTMENT_CODE,P.DEPARTMENT_DESC FROM (SELECT S.ORD_LN_DLY_PK, S.PLN_DIVIDE_ID FROM PLN_ZY_DBK_M T, PLN_ORDER_DBK_S S WHERE T.PRO_PLAN_ID = S.PRO_PLAN_ID AND T.GX_PLAN_NO = S.GX_PLAN_NO AND T.HEAT_PLAN_NO = '#HEAT_PLAN_NO_OLD#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#') E, #PLAN# F, COM_BASE_PLINE P WHERE E.ORD_LN_DLY_PK = F.ORD_LN_DLY_PK AND E.PLN_DIVIDE_ID = F.PLN_DIVIDE_ID AND F.PLINE_CODE = P.PLINE_CODE AND ROWNUM = 1 SELECT T.VALIDFLAG,T.INSTOCK_FLAG FROM QCM_ZG_JUGDE_APPLY T WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.IS_ALL_SCRAP = '0' SELECT T.VALIDFLAG,T.INSTOCK_FLAG FROM QCM_ZG_JUGDE_APPLY T WHERE T.IS_ALL_SCRAP = '0' DECLARE V_APPLY_FLAG QCM_ZG_JUGDE_APPLY.APPLY_FLAG%TYPE := NULL; V_COUNT NUMBER :=0; BEGIN SELECT T.APPLY_FLAG INTO V_APPLY_FLAG FROM QCM_ZG_JUGDE_APPLY T WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND NVL(T.LOT_NO,'/') = NVL('#LOT_NO#','/') AND T.IS_ALL_SCRAP = '0'; FOR MYROW IN (SELECT * FROM MAT_BC_M T WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND NVL(T.LOT_NO,'/') = NVL('#LOT_NO#','/') UNION SELECT * FROM MAT_BC_BACKUP T WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND NVL(T.LOT_NO,'/') = NVL('#LOT_NO#','/')) LOOP UPDATE MAT_BC_M S SET S.JUGDE_APPLY_CODE = '', S.JUGDE_APPLY_TIME = '', S.JUGDE_APPLY_SEQUENO = '' WHERE S.MAT_NO = MYROW.MAT_NO AND S.PLINE_CODE = MYROW.PLINE_CODE; UPDATE MAT_BC_BACKUP S SET S.JUGDE_APPLY_CODE = '', S.JUGDE_APPLY_TIME = '', S.JUGDE_APPLY_SEQUENO = '' WHERE S.MAT_NO = MYROW.MAT_NO AND S.PLINE_CODE = MYROW.PLINE_CODE; DELETE FROM MAT_BC_QCMTRACK S WHERE S.MAT_NO = MYROW.MAT_NO AND S.PROCESS_CDOE = MYROW.PROCESS_CDOE; IF ('#PROCESS_CDOE#' = 'E') THEN UPDATE PORT_VRP_BATCH_SAMPLE_RESULT S SET S.JUGDE_APPLY_CODE = '', S.TR_FLAG = '0' WHERE S.MAT_NO = MYROW.MAT_NO AND S.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#'; ELSIF ('#PROCESS_CDOE#' = 'F') THEN UPDATE PORT_HTT_BATCH_SAMPLE_RESULT S SET S.JUGDE_APPLY_CODE = '', S.TR_FLAG = '0' WHERE S.MAT_NO = MYROW.MAT_NO AND S.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#'; ELSIF ('#PROCESS_CDOE#' = 'G') THEN UPDATE PORT_MCH_BATCH_SAMPLE_RESULT S SET S.JUGDE_APPLY_CODE = '' WHERE S.MAT_NO = MYROW.MAT_NO AND S.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#'; END IF; SELECT COUNT(1) INTO V_COUNT FROM MCH_TWISTINGLY_JUDGE T WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND T.MAT_NO = MYROW.MAT_NO; IF (V_COUNT > 0) THEN FOR MYROW1 IN (SELECT * FROM MCH_TWISTINGLY_JUDGE T WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND T.MAT_NO = MYROW.MAT_NO AND ROWNUM = 1) LOOP DELETE FROM MCH_TWISTINGLY_JUDGE T WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND T.MAT_NO = MYROW.MAT_NO; UPDATE MCH_TWISTINGLY_RESULT_D SET JUDGE_NUM = NVL(JUDGE_NUM, 0) - 1 WHERE RESULT_NO = MYROW1.RESULT_NO AND SEQ = MYROW1.SEQ; END LOOP; END IF; END LOOP; IF (V_APPLY_FLAG = '1') THEN UPDATE QCM_ZG_JUGDE_APPLY T SET T.IS_FLAG = '1' WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND NVL(T.GX_PLAN_NO_NEXT, '/') = NVL('#GX_PLAN_NO_NEXT#', '/') AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.PLINE_CODE = '#PLINE_CODE#'; ELSE DELETE FROM QCM_ZG_JUGDE_APPLY S WHERE S.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND S.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND S.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(S.GX_PLAN_NO_NEXT, '/') = NVL('#GX_PLAN_NO_NEXT#', '/') AND S.BATCH_NO = '#BATCH_NO#' AND S.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND S.PLINE_CODE = '#PLINE_CODE#'; END IF; DELETE FROM QCM_ADD_ASK Q WHERE Q.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND Q.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'; --更新成品送判量统计表 SET_QCM_ZC_APPLY2('#ORD_LN_DLY_PK#'); END; DECLARE BEGIN FOR MYROW IN (SELECT * FROM MAT_BC_M T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.QCM_STAUS = '00' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND T.LOT_NO = '#LOT_NO#' UNION SELECT * FROM MAT_BC_BACKUP T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.QCM_STAUS = '00' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND T.LOT_NO = '#LOT_NO#' ) LOOP INSERT INTO MAT_BC_QCMTRACK (MAT_NO, PROCESS_CDOE, STOVE_NO, JUDGE_STOVE_NO, BATCH_NO, GRADECODE, GRADENAME, MATERIAL_NO, MATERIAL_NAME, JUGDE_APPLY_CODE, JUGDE_APPLY_TIME, JUGDE_APPLY_MAKER) VALUES (MYROW.MAT_NO, MYROW.PROCESS_CDOE, MYROW.STOVE_NO, MYROW.JUDGE_STOVE_NO, MYROW.BATCH_NO, MYROW.GRADECODE, MYROW.GRADENAME, MYROW.MATERIAL_NO, MYROW.MATERIAL_NAME, '#JUGDE_APPLY_CODE#', TO_DATE('#APPLY_TIME#','YYYY-MM-DD HH24:MI:SS'), '#APPLY_NAME#'); END LOOP; END; SELECT COUNT(1) ACOUNT FROM CRAFT_ORD_DESIGN_MSC_PL_PRC T, CRAFT_ORD_DESIGN_STD_WIC W WHERE T.DESGIN_KEY = W.DESGIN_KEY AND T.MSC_PLINE = W.MSC_PLINE and t.PROCESS_CODE = W.PROCESS_CODE AND W.SPECL_FL = '2' AND T.PROCESS_CODE = ? AND T.DESGIN_KEY = ? select t.* from MCH_WATERGAGE_RESULT t WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ? select MAX(T.DRIFT_MODEL_MIN) DRIFT_MODEL_MIN, MAX(T.DRIFT_MODEL_MIN2) DRIFT_MODEL_MIN2, MAX(T.DRIFT_MODEL_LEN) DRIFT_MODEL_LEN, MAX(T.DRIFT_MODEL_LEN2) DRIFT_MODEL_LEN2, MIN(T2.MEASURED_END_PART) MEASURED_END_PART, MIN(T2.MEASURED_MIDDLE_PART) MEASURED_MIDDLE_PART, MIN(T2.MEASURED_TAIL_PART) MEASURED_TAIL_PART, COUNT(1) ACOUNT from MCH_PATH_RESULT t, MCH_PATH_RESULT_D T2 WHERE T.HEAT_PLAN_NO = T2.HEAT_PLAN_NO(+) AND T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ? select t.* from MCH_CHAMFERING_RESULT t WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ? select t.* from MCH_TWISTINGLY_RESULT t WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ? SELECT SUM(T.ACT_COUNT) ACT_COUNT FROM QCM_ZG_JUGDE_APPLY T WHERE T.JUDGE_STOVE_NO = ? AND T.PLINE_CODE = ? AND T.PROCESS_CODE = 'F' 0 ]]> SELECT COUNT(1) ACOUNT FROM QCM_ZG_JUGDE_APPLY T WHERE T.JUDGE_STOVE_NO = ? AND T.PROCESS_CODE = ? AND T.IS_FLAG = '0' AND T.IS_ALL_SCRAP IN ('0', '1') ? AND T.BATCH_NO = ? AND T.IS_FLAG = '0' AND T.IS_ALL_SCRAP = '0' AND T.JUDGE_RESULT_CODE NOT IN ('40740701', '40740707', '40740709') ]]> SELECT T.IF_MATCH_ODD FROM PLN_ZY_DBK_M T WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ? SELECT T.IF_MATCH_ODD FROM PLN_ZY_RCL_M T WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ? SELECT T.IF_MATCH_ODD FROM PLN_ZY_JGX_M T WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ? SELECT T.HEAT_PLAN_NO FROM PLN_ZY_DBK_M T WHERE T.PRO_PLAN_ID = '#PRO_PLAN_ID#' AND T.GX_PLAN_NO = '#GX_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.IF_MATCH_ODD IN('0','1') SELECT T.HEAT_PLAN_NO FROM PLN_ZY_RCL_M T WHERE T.PRO_PLAN_ID = '#PRO_PLAN_ID#' AND T.GX_PLAN_NO = '#GX_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.IF_MATCH_ODD IN('0','1') SELECT T.HEAT_PLAN_NO FROM PLN_ZY_JGX_M T WHERE T.PRO_PLAN_ID = '#PRO_PLAN_ID#' AND T.GX_PLAN_NO = '#GX_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.IF_MATCH_ODD IN('0','1') 0; IF (V_BUNDLE_NUM > 0) THEN UPDATE QCM_ZG_JUGDE_APPLY T SET T.BUNDLE_NUM = V_BUNDLE_NUM WHERE T.JUGDE_APPLY_CODE = V_JUGDE_APPLY_CODE AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO; END IF; END; ]]> SELECT COUNT(DISTINCT T.MAT_NO ) COUNT FROM MAT_BC_M T LEFT JOIN MCH_FINAL_CHECK_RESULT_MAT_NO D ON T.MAT_NO = D.MAT_NO WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.PRO_ORDER_ID = '#PRO_ORDER_ID#' AND T.GX_PLAN_NO = '#GX_PLAN_NO#' AND T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.QCM_STAUS = '00' AND T.JUGDE_APPLY_CODE IS NULL AND D.MAT_NO IS NULL SELECT COUNT(1) COUNT FROM mch_final_check_result_d d,mch_final_check_treatment t WHERE t.result_no = d.result_no AND mat_No IN( SELECT mat_No FROM MAT_BC_M T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.PRO_ORDER_ID = '#PRO_ORDER_ID#' AND T.GX_PLAN_NO = '#GX_PLAN_NO#' AND T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.QCM_STAUS = '00' AND T.JUGDE_APPLY_CODE IS NULL) AND APPROVAL_STATUS != '2' SELECT SUM(T.ACT_COUNT) ACOUNT FROM MAT_BC_M T WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' SELECT COUNT(1) ACOUNT FROM QCM_BC_PASS_APPLY T WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.VALIDFLAG = '1' SELECT C.SUPPLY_UNIT_CODE SUPPLY_UNIT, C.SUPPLY_UNIT SUPPLY_UNIT_DESC FROM MAT_BC_M T, COM_BASE_PLINE C WHERE T.PLINE_CODE = C.PLINE_CODE AND T.QCM_STAUS = '00' AND T.JUDGE_STOVE_NO = ? AND T.PROCESS_CDOE = ? AND ROWNUM = 1 SELECT ? || TO_CHAR(SYSDATE, 'yyyyMMDD') || LPAD(NVL(MAX(TO_NUMBER(SUBSTR(T.INSPECTION_NO, LENGTH(T.INSPECTION_NO) - 5))), 0) + 1, 6, '0') INSPECTION_NO FROM MIL_INSPECTION T WHERE T.INSPECTION_NO LIKE ? || TO_CHAR(SYSDATE, 'yyyyMMDD') || '______' 0 OR INSTR('#STD_NAME#', '8163') > 0 OR INSTR('#STD_NAME#', '3087') > 0) THEN '0' ELSE '1' END INTO V_TYPE FROM DUAL; --抽检状态(普通品种 10抽1,特殊品种必抽,其实免检) SELECT CASE WHEN V_TYPE = '0' AND SUBSTR(V_SEQ, -1) = '1' THEN '1' WHEN V_TYPE = '1' THEN '1' ELSE '3' END INTO V_INSPECTION_FLAG FROM DUAL; --查钢种 IF (V_PROCESS_CODE = 'E') THEN SELECT T.GRADECODE, T.GRADENAME, T.INDEX_SEQ INTO V_GRADECODE, V_GRADENAME, V_INDEX_SEQ FROM PLN_ZY_DBK_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.PLINE_CODE = '#PLINE_CODE#'; ELSIF (V_PROCESS_CODE = 'F') THEN SELECT T.GRADECODE, T.GRADENAME, T.INDEX_SEQ INTO V_GRADECODE, V_GRADENAME, V_INDEX_SEQ FROM PLN_ZY_RCL_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.PLINE_CODE = '#PLINE_CODE#'; ELSIF (V_PROCESS_CODE = 'G') THEN SELECT T.GRADECODE, T.GRADENAME, T.INDEX_SEQ INTO V_GRADECODE, V_GRADENAME, V_INDEX_SEQ FROM PLN_ZY_JGX_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.PLINE_CODE = '#PLINE_CODE#'; END IF; --需要复检 FOR MYROW IN (SELECT T.* FROM MIL_INSPECTION T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.RECHECK = '1') LOOP INSERT INTO MIL_INSPECTION (INSPECTION_NO, INSPECTION_NUM, HEAT_PLAN_NO, ZY_BATCH_ID, JUDGE_STOVE_NO, BATCH_NO, INSPECTION_FLAG, INSPECTION_RESULT, PRODUCCODE, PRODUCNAME, STEELCODE, STEELNAME, GRADECODE, GRADENAME, SPEC_CODE, SPEC_NAME, MODEL_CODE, MODEL_DESC, STD_CODE, STD_NAME, STD_STYLE, STD_STYLE_DESC, CRAFT_FILE_NO, CUSTOMER_NM, ACT_COUNT, ACT_WEIGHT, CREATE_TIME, LOAD_TIME, INSPECTION_TIME, INSPECTION_NAME, APPLY_FLAG, PROCESS_CODE, UNQUALIFIED_REASONS, DISPOSAL_METHOD, DISPOSAL_FLAG, PLINE_CODE, PLINE_NAME, DISPOSAL_TIME, DISPOSAL_NAME, ORDER_NO, ORDER_SEQ, PROC_DATE) SELECT INSPECTION_NO, INSPECTION_NUM + 1, HEAT_PLAN_NO, ZY_BATCH_ID, JUDGE_STOVE_NO, BATCH_NO, '1', '', PRODUCCODE, PRODUCNAME, STEELCODE, STEELNAME, GRADECODE, GRADENAME, SPEC_CODE, SPEC_NAME, MODEL_CODE, MODEL_DESC, STD_CODE, STD_NAME, STD_STYLE, STD_STYLE_DESC, CRAFT_FILE_NO, CUSTOMER_NM, ACT_COUNT - NVL(SCRAP_NUM, 0), ACT_WEIGHT - NVL(SCRAP_WT, 0), V_SYSDATE, LOAD_TIME, '', '', '0', PROCESS_CODE, '', '', '', PLINE_CODE, PLINE_NAME, '', '', ORDER_NO, ORDER_SEQ, CASE WHEN TO_CHAR(V_SYSDATE, 'HH24') < 7 THEN TO_CHAR(V_SYSDATE - 1, 'YYYYMMDD') ELSE TO_CHAR(V_SYSDATE, 'YYYYMMDD') END FROM MIL_INSPECTION T1 WHERE T1.INSPECTION_NO = MYROW.INSPECTION_NO AND T1.INSPECTION_NUM = MYROW.INSPECTION_NUM; FOR MYROW1 IN (SELECT T.* FROM MIL_INSPECTION_DETAIL T WHERE T.INSPECTION_NO = MYROW.INSPECTION_NO AND T.INSPECTION_NUM = MYROW.INSPECTION_NUM) LOOP INSERT INTO MIL_INSPECTION_DETAIL (INSPECTION_NO, INSPECTION_NUM, PROJECT_CATEGORY, PROJECT_NAME) SELECT T1.INSPECTION_NO, T1.INSPECTION_NUM + 1, T1.PROJECT_CATEGORY, T1.PROJECT_NAME FROM MIL_INSPECTION_DETAIL T1 WHERE T1.GUID = MYROW1.GUID; END LOOP; UPDATE MIL_INSPECTION T SET T.RECHECK = '2' WHERE T.INSPECTION_NO = MYROW.INSPECTION_NO AND T.INSPECTION_NUM = MYROW.INSPECTION_NUM; END LOOP; --交库支吨 SELECT SUM(ACT_COUNT), SUM(ACT_WEIGHT) INTO V_ACT_COUNT1, V_ACT_WEIGHT1 FROM (SELECT SUM(T.ACT_COUNT) ACT_COUNT, SUM(T.ACT_WEIGHT) ACT_WEIGHT FROM MAT_BC_M T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.QCM_STAUS = '00' AND T.TARGET = 'A' AND T.JUGDE_APPLY_CODE IS NULL UNION ALL SELECT SUM(T1.ACT_COUNT) ACT_COUNT, SUM(T1.ACT_WEIGHT) ACT_WEIGHT FROM QCM_ZG_JUGDE_APPLY T1 WHERE T1.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T1.BATCH_NO = '#BATCH_NO#' AND T1.PLINE_CODE = '#PLINE_CODE#' AND T1.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T1.TARGET = 'A'); --找库存信息 SELECT SUBSTR(MAX(T.CRAF_NO), 1, INSTR(MAX(T.CRAF_NO), '/') - 1), SUBSTR(MAX(T.CRAF_NO), INSTR(MAX(T.CRAF_NO), '/') + 1, 3), MAX(T.CRAF_NO), MAX(T.LOT_NO) INTO V_ORDER_NO, V_ORDER_SEQ, V_CRAFT_FILE_NO, V_ZY_BATCH_ID FROM MAT_BC_M T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.QCM_STAUS = '00' AND T.TARGET = 'A' AND T.JUGDE_APPLY_CODE IS NULL; --找客户名称 SELECT MAX(T.CUSTOMER_NM) INTO V_CUSTOMER_NM FROM SLM_ORDER_HEAD T WHERE T.ORDER_NO = V_ORDER_NO; --报检支吨 SELECT SUM(T.ACT_COUNT), SUM(T.ACT_WEIGHT) INTO V_ACT_COUNT2, V_ACT_WEIGHT2 FROM MIL_INSPECTION T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#' AND T.PLINE_CODE = '#PLINE_CODE#' AND T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.VALIDFLAG = '1' AND T.RECHECK = '0'; --交库支数大于报检支数才会增加报检记录 IF (NVL(V_ACT_COUNT1, 0) - NVL(V_ACT_COUNT2, 0) > 0) THEN --增加主表 INSERT INTO MIL_INSPECTION (INSPECTION_NO, INSPECTION_NUM, HEAT_PLAN_NO, ZY_BATCH_ID, JUDGE_STOVE_NO, BATCH_NO, INSPECTION_FLAG, INSPECTION_RESULT, PRODUCCODE, PRODUCNAME, STEELCODE, STEELNAME, GRADECODE, GRADENAME, SPEC_CODE, SPEC_NAME, MODEL_CODE, MODEL_DESC, STD_CODE, STD_NAME, STD_STYLE, STD_STYLE_DESC, CRAFT_FILE_NO, CUSTOMER_NM, ACT_COUNT, ACT_WEIGHT, CREATE_TIME, LOAD_TIME, INSPECTION_TIME, INSPECTION_NAME, APPLY_FLAG, PROCESS_CODE, PLINE_CODE, PLINE_NAME, ORDER_NO, ORDER_SEQ, PROC_DATE, SEQ) VALUES (V_INSPECTION_NO, '1', '#HEAT_PLAN_NO#', V_ZY_BATCH_ID, '#JUDGE_STOVE_NO#', '#BATCH_NO#', V_FLAG, '', '#PRODUCCODE#', '#PRODUCNAME#', '#STEELCODE#', '#STEELNAME#', V_GRADECODE, V_GRADENAME, '#SPEC_CODE#', '#SPEC_NAME#', '#MODEL_CODE#', '#MODEL_DESC#', '#STD_CODE#', '#STD_NAME#', '#STD_STYLE#', '#STD_STYLE_DESC#', V_CRAFT_FILE_NO, V_CUSTOMER_NM, NVL(V_ACT_COUNT1, 0) - NVL(V_ACT_COUNT2, 0), NVL(V_ACT_WEIGHT1, 0) - NVL(V_ACT_WEIGHT2, 0), SYSDATE, SYSDATE, '', '', '0', V_PROCESS_CODE, '#PLINE_CODE#', (SELECT P.PLINE_NAME FROM COM_BASE_PLINE P WHERE P.PLINE_CODE = '#PLINE_CODE#'), V_ORDER_NO, V_ORDER_SEQ, V_PROC_DATE, V_SEQ); --增加子表 FOR MYROW2 IN (SELECT '几何尺寸' XM, NVL(S.BIAS_NAME, '-') GC FROM CRAFT_ORD_DESIGN_MSC_PL_PRC T, CRAFT_ORD_DESIGN_STD_SIC S WHERE T.DESGIN_KEY = S.DESGIN_KEY(+) AND T.MSC_PLINE = S.MSC_PLINE(+) and t.PROCESS_CODE = S.PROCESS_CODE(+) AND S.SPECL_FL(+) = '2' AND T.PROCESS_CODE = 'D' AND T.MSC_PLINE = V_INDEX_SEQ AND T.DESGIN_KEY IN (SELECT C.DESGIN_KEY FROM SLM_ORDER_HEAD A, SLM_ORDER_LINE B, CRAFT_ORD_DESIGN C WHERE A.ORD_PK = B.ORD_PK AND C.ORD_LN_PK = B.ORD_LN_PK AND C.VALIDFLAG = '1' AND A.ORDER_NO = V_ORDER_NO AND B.ORDER_SEQ = V_ORDER_SEQ)) LOOP INSERT INTO MIL_INSPECTION_DETAIL (INSPECTION_NO, INSPECTION_NUM, PROJECT_CATEGORY, PROJECT_NAME) values (V_INSPECTION_NO, 1, MYROW2.XM, MYROW2.GC); END LOOP; INSERT INTO MIL_INSPECTION_DETAIL (INSPECTION_NO, INSPECTION_NUM, PROJECT_CATEGORY, PROJECT_NAME) values (V_INSPECTION_NO, 1, '表面质量', '表面质量'); INSERT INTO MIL_INSPECTION_DETAIL (INSPECTION_NO, INSPECTION_NUM, PROJECT_CATEGORY, PROJECT_NAME) values (V_INSPECTION_NO, 1, '外包装质量', '外包装质量'); END IF; END; ]]> 0 ]]>