0 ]]> SELECT T.STOVE_NO, T.JUDGE_STOVE_NO, SUM(T.ACT_COUNT) ACT_COUNT, SUM(T.ACT_WEIGHT) ACT_WEIGHT, DECODE(T.IS_DEALER, '0', '自用', '1', '双经销', '2', '来料加工') IS_DEALER, DECODE(T.MAT_STATUS, '80150101', '材料产出待判', '80150102', '材料产出(已判定)') MAT_STATUS, (SELECT T1.STORAGE_NAME FROM YDM_BS_STORAGE T1 WHERE T1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME, (SELECT T2.LOCATION_NAME FROM YDM_BS_LOCATION T2 WHERE T2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME, S.LARY_NO, T.ACT_LEN, T.CIC, T.CHEM_JUDGE_ID, S.LOCATION_NO FROM MAT_GP_M T LEFT JOIN YDM_GP_BUTTRESS S ON T.MAT_NO = S.MAT_NO WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.IS_DEALER IN( #IS_DEALER#) AND T.MAT_STATUS = '#MAT_STATUS#' AND T.ACT_LEN = '#ACT_LEN#' AND NVL(T.CIC,'/') = NVL('#CIC#','/') AND NVL(T.CHEM_JUDGE_ID,'/') = NVL('#CHEM_JUDGE_ID#','/') AND T.ORDER_NO||'/'||T.ORDER_SEQ = '#ORDER_NO#' GROUP BY T.STOVE_NO, T.JUDGE_STOVE_NO, T.IS_DEALER, T.MAT_STATUS, S.STORAGE_NO, S.LOCATION_NO, S.LARY_NO, T.ACT_LEN, T.CIC, T.CHEM_JUDGE_ID DECLARE V_MAT_NO MAT_GP_M.MAT_NO%TYPE := NULL; V_LOCATION_NO YDM_GP_BUTTRESS.LOCATION_NO%TYPE := NULL; V_LOCATION_NAME YDM_GP_BUTTRESS.LOCATION_NAME%TYPE := NULL; BEGIN IF ('#DIMATER#' = '500') THEN V_LOCATION_NO := 'TTH100187'; V_LOCATION_NAME := 'ST500A'; ELSIF ('#DIMATER#' = '450') THEN V_LOCATION_NO := 'TTH100186'; V_LOCATION_NAME := 'ST450A'; ELSIF ('#DIMATER#' = '400') THEN V_LOCATION_NO := 'TTH100185'; V_LOCATION_NAME := 'ST400A'; ELSIF ('#DIMATER#' = '390') THEN V_LOCATION_NO := 'TTH100184'; V_LOCATION_NAME := 'ST390A'; ELSIF ('#DIMATER#' = '380') THEN V_LOCATION_NO := 'TTH100183'; V_LOCATION_NAME := 'ST380A'; ELSIF ('#DIMATER#' = '310') THEN V_LOCATION_NO := 'TTH100182'; V_LOCATION_NAME := 'ST310A'; END IF; SELECT SUBSTR('#MAT_NO_OLD#', 0, LENGTH('#MAT_NO_OLD#') - 3) || LPAD(NVL(MAX(SUBSTR(T1.MAT_NO, LENGTH(T1.MAT_NO) - 2)), 0) + 1, 3, 0) INTO V_MAT_NO FROM (SELECT MAT_NO FROM MAT_GP_M T WHERE T.STOVE_NO = '#STOVE_NO#' UNION ALL SELECT MAT_NO FROM MAT_GP_M_HISTORY T WHERE T.STOVE_NO = '#STOVE_NO#') T1; INSERT INTO MAT_GP_M SELECT V_MAT_NO, PRODUCT_FLAG, MAT_STATUS, STOVE_NO, FLAG_STOVE_NO, JUDGE_STOVE_NO, CAST_NO, CCMID, MAT_ORIGIN_CODE, MAT_ORIGIN_NAME, SOURE_CODE, SOURE_NAME, MATERIAL_NO, MATERIAL_NAME, INPUT_MATERIAL_NAME, INPUT_MATERIAL_NO, INPUT_ORIGIN_CODE, GRADECODE, GRADENAME, STD_CODE, STD_NAME, PRO_ORDER_NO, ORDER_NO, ORDER_SEQ, ORDER_SEQ_NO, ORD_PK, ORD_LN_PK, ORD_LN_DLY_PK, PROCESS_CDOE, PROCESS_DESC, NEXT_PROCESS_CDOE, NEXT_PROCESS_DESC, PLINE_CODE, PLINE_NAME, DIMATER, HEIGHT, '#ACT_LEN#', '#FIX_NUM#', '#FIX_LEN#', ACT_COUNT, '#ACT_WEIGHT#', ACT_THEORY_WEIGHT, PONDER_NO, PONDER_GROSS_WT, MEASURE_FLAG, STOVE_PRINT_FLAG, MAT_GOWHERE_CODE, MAT_GOWHERE_NAME, BELONG_CODE, BELONG_NAME, LOCK_FLAG, MNG_LOCK_FLAG, MNG_LOCK_RSN_CODE, MNG_LOCK_TIME, MNG_LOCK_MAKER, MNG_LOCK_REMARK, LOCK_RSN_CODE, LOCK_TIME, LOCK_MAKER, LOCK_REMARK, UNLOCK_TIME, UNLOCK_MAKER, UNLOCK_REMARK, OLD_ORDER_NO, OLD_ORDER_SEQ, OLD_ORDER_SEQ_NO, OLD_MATERIAL_NO, OLD_MATERIAL_NAME, REMAIN_RSN_CODE, REMAIN_JUGDE_TIME, REMAIN_JUGDE_MAKER, REMAIN_JUGDE_CODE, REMAIN_REMARK, JUGDE_APPLY_FLAG, JUGDE_APPLY_CODE, JUGDE_APPLY_TIME, JUGDE_SCAN_TIME, FACE_RESULT_CODE, FACE_RESULT_TIME, FACE_MAKER, CHEM_RESULT_CODE, CHEM_RESULT_TIME, CHEM_MAKER, PHY_RESULT_CODE, PHY_RESULT_TIME, PHY_MAKER, DETECT_REPORT_NO, DETECT_RESULT_CODE, BUG_NO, BUG_DEAL, OUTSOURCING_DOC, OUTSOURCING_FLAG, SAMPLING_FLAG, SAMPLING_TYPE, SAMPLING_NO, CHECKOUT_NO, CHEM_STCHECK_NO, CHEM_PROCHECK_NO, INSTOCK_FLAG, SYSDATE, OUTSTOCK_TIME, PRO_BC, PRO_BZ, RPO_TIME, BAR_CODE, BEGINNING_FLAG, BAL_YEAR_MONTH, MEMO, CREATE_NAME, CREATE_TIME, UPDATE_NAME, UPDATE_TIME, GROUD_NO, BUG_DEAL_CODE, SURFACE_CHECK_NO, CHEM_JUDGE_ID, PHY_JUDGE_ID, PHY_RESULT_ID, OLD_JUDGE_STOVE_NO, OLD_GROUD_NO, OLD_GRADECODE, OLD_GRADENAME, OLD_STD_CODE, OLD_STD_NAME, JUDGE_RESULT_CODE, JUDGE_RESULT_TIME, JUDGE_MAKER, OLD_STOVE_NO, PRINT_STOVE_NO, PRO_PLAN_ID, GX_PLAN_NO, GPREQ_ID, DB_ACT_COUNT, CIC, PIC, SIC, DIC, GPTYPE, SEQUENCENO, FURNACENO, QCM_STAUS, HANGING_FLAG, LG_CRAFT_NO, ISENDGX, PRODUCCODE, PRODUCNAME, CRAFTNO, PLAN_ROUTE, PRO_PLAN_ID_ZG, GX_PLAN_NO_ZG, STEELCODE, STEELNAME, CUT_YU_LONG, LK_FLAG, STEEL_STANDRAD, JUDGE_ID, EF_PLINE_CODE, EF_PLINE_NAME, INSTANCY_FLAG, JUDGE_STOVE_NO_LG, OLD_CIC, JUDGE_FLAG, JUDGE_STOVE_NO_OLD, HEAT_PLAN_NO_NEXT, CUT_NUM, IS_DEALER, SUPPLY_UNIT_CODE, SUPPLY_UNIT, '2', '#MAT_NO_OLD#', '#IS_SETFOOT#', '#SETFOOT_SEQ#', PLAN_MEMO FROM MAT_GP_M T WHERE T.MAT_NO = '#MAT_NO#'; INSERT INTO YDM_GP_BUTTRESS SELECT V_MAT_NO, STOVE_NO, FLAG_STOVE_NO, JUDGE_STOVE_NO, STORAGE_NO, V_LOCATION_NO, LARY_NO, LOC_NO, STORAGE_ATTR, STORAGE_ATTR_NAME, STORAGE_TYPE_NO, STORAGE_TYPE_NAME, DEPARTMENT_CODE, DEPARTMENT_DESC, MANAGEMENT_NO, MANAGEMENT_NAME, MEMO, CREATE_NAME, CREATE_TIME, UPDATE_NAME, UPDATE_TIME, DELETE_NAME, DELETE_TIME, GROUD_NO, V_LOCATION_NAME, JUDGE_STOVE_NO_LG FROM YDM_GP_BUTTRESS WHERE MAT_NO = '#MAT_NO#'; END;