INSERT INTO QCM_ZG_JUGDE_APPLY (JUGDE_APPLY_CODE, JUDGE_STOVE_NO, BATCH_NO, BATCH_GROUD_NO, PLINE_CODE, ACT_COUNT, ACT_WEIGHT, ACT_THEORY_WEIGHT, PRO_ORDER_ID, VALIDFLAG, APPLY_NAME, APPLY_TIME, PRODUCNAME, STEELNAME, GRADENAME, SPEC_NAME, MODEL_DESC, STD_NAME, STD_STYLE_DESC, CRAF_NO, LOT_NO, PLINE_NAME, PRO_ORDER_NO, TARGET, PROCESS_STATUS, ORD_LN_DLY_PK, APPLY_FLAG, BELONG_CODE, BELONG_NAME, BELONG_CODE_JUGDE, BELONG_NAME_JUGDE, GX_PLAN_NO, INPUT_WEIGHT, INPUT_COUNT, OUTPUT_WEIGHT, OUTPUT_COUNT, BAL_YEAR_MONTH, IS_ALL_SCRAP, PROCESS_CODE, QUALITY_GROUP, MAT_GOWHERE_CODE, MAT_GOWHERE_NAME, JUDGE_STOVE_NO_SEQ, JUDGE_RESULT_CODE, JUDGE_RESULT, JUDGE_RESULT_TIME, JUDGE_MAKER, JUDGE_TOLRESULT_CODE, JUDGE_TOLRESULT, --JUDGE_TOLMAKER, JUDGE_TOLRESULT_TIME, SUPPLY_UNIT, SUPPLY_UNIT_DESC) VALUES ('#JUGDE_APPLY_CODE#', '#JUDGE_STOVE_NO#', '#BATCH_NO#', '#BATCH_GROUD_NO#', '#PLINE_CODE#', '#ACT_COUNT#', '#ACT_WEIGHT#', '#ACT_THEORY_WEIGHT#', '#PRO_ORDER_ID#', '#VALIDFLAG#', '#APPLY_NAME#', SYSDATE, '#PRODUCNAME#', '#STEELNAME#', '#GRADENAME#', '#SPEC_NAME#', '#MODEL_DESC#', '#STD_NAME#', '#STD_STYLE_DESC#', '#CRAF_NO#', '#LOT_NO#', '#PLINE_NAME#', '#PRO_ORDER_NO#', '#TARGET#', '#PROCESS_STATUS#', '#ORD_LN_DLY_PK#', '#APPLY_FLAG#', '#BELONG_CODE#', '#BELONG_NAME#', '#BELONG_CODE_JUGDE#', '#BELONG_NAME_JUGDE#', '#GX_PLAN_NO#', '#INPUT_WEIGHT#', '#INPUT_COUNT#', '#OUTPUT_WEIGHT#', '#OUTPUT_COUNT#', '#BAL_YEAR_MONTH#', '#IS_ALL_SCRAP#', 'D', '1', '1', '', '#JUDGE_STOVE_NO_SEQ#', '#JUDGE_RESULT_CODE#', '#JUDGE_RESULT#', SYSDATE, '#JUDGE_MAKER#', '#JUDGE_TOLRESULT_CODE#', '#JUDGE_TOLRESULT#', --'#JUDGE_TOLMAKER#', TO_DATE('#JUDGE_TOLRESULT_TIME#', 'YYYY-MM-DD HH24:MI:SS'), (SELECT C.SUPPLY_UNIT_CODE FROM COM_BASE_PLINE C WHERE C.PLINE_CODE = '#PLINE_CODE#'), (SELECT C.SUPPLY_UNIT FROM COM_BASE_PLINE C WHERE C.PLINE_CODE = '#PLINE_CODE#')) DELETE FROM QCM_ZG_JUGDE_APPLY T WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' AND T.IS_ALL_SCRAP = '#IS_ALL_SCRAP#' SELECT MAX(T.BAL_YEAR_MONTH) BAL_YEAR_MONTH,to_char(to_date(MAX(t.BAL_YEAR_MONTH), 'YYYY-MM'), 'yyyy-MM') as B_BAL_YEAR_MONTH FROM YDM_ZC_INITIAL_ZG T UPDATE PLN_ZY_ZG_M T SET T.PLANSTATUS = ? WHERE T.PRO_PLAN_ID = ? AND T.GX_PLAN_NO = ? AND T.FEED_HEAT_NO = REGEXP_REPLACE(?, '-.*', '')