update Mil_Straightening_Result SET node_fur_flag = '1', end_time = SYSDATE, QUALIFIED_NUM = '#QUALIFIED_NUM#', IN_MAT_NUM = '#IN_MAT_NUM#' WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/') AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/') Update mil_plan SET NODE_STATUS = '80' WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/') AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/') UPDATE MIL_STRAIGH_RACK T SET T.COL_USER = '#COL_USER#', T.COL_SHIFT = '#COL_SHIFT#', T.COL_GROUP = '#COL_GROUP#' WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(T.PRO_PLAN_ID,'/') = NVL('#PRO_PLAN_ID#','/') AND NVL(T.GX_PLAN_NO,'/') = NVL('#GX_PLAN_NO#','/') AND T.COL_USER is null AND T.COL_SHIFT is null AND T.COL_GROUP is null AND T.MAT_NO is not null UPDATE MIL_STRAIGHTENING_RESULT T SET T.COL_SHIFT = '#COL_SHIFT#', T.COL_GROUP = '#COL_GROUP#', T.COL_USER = '#COL_USER#' WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(T.PRO_PLAN_ID,'/') = NVL('#PRO_PLAN_ID#','/') AND NVL(T.GX_PLAN_NO,'/') = NVL('#GX_PLAN_NO#','/') UPDATE mil_straightening_result SET SCRAP_NUM1 = SCRAP_NUM1 + 1, QUALIFIED_NUM1=(case nvl(QUALIFIED_NUM1,0) WHEN 0 THEN 0 ELSE QUALIFIED_NUM1-1 END) WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/') AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/') UPDATE mil_straightening_result SET SCRAP_NUM2 = SCRAP_NUM2 + 1, QUALIFIED_NUM2=(case nvl(QUALIFIED_NUM2,0) WHEN 0 THEN 0 ELSE QUALIFIED_NUM2-1 END) WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/') AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/') UPDATE mil_straightening_result SET SCRAP_NUM3 = SCRAP_NUM3 + 1, QUALIFIED_NUM3=(case nvl(QUALIFIED_NUM3,0) WHEN 0 THEN 0 ELSE QUALIFIED_NUM3-1 END) WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/') AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/') SELECT RESULT_NO, LOT_NO, STOVE_NO, JUDGE_STOVE_NO, PLINE_CODE, SCRAP_NUM1, QUALIFIED_NUM1, SCRAP_NUM2, QUALIFIED_NUM2, SCRAP_NUM3, QUALIFIED_NUM3, IN_MAT_NUM, SCRAP_NUM, QUALIFIED_NUM, REMARK, COL_USER, case COL_SHIFT WHEN '0' THEN '常白班' WHEN '1' THEN '早班' WHEN '2' THEN '中班' WHEN '3' THEN '晚班' end as COL_SHIFT, case COL_GROUP WHEN '1' THEN '甲' WHEN '2' THEN '乙' WHEN '3' THEN '丙' WHEN '4' THEN '丁' end as COL_GROUP, QA_TON, CHANGE_NUM FROM Mil_Straightening_Result WHERE 1=1 AND PLINE_CODE=? AND COL_SHIFT=? AND COL_GROUP=? AND END_TIME BETWEEN TO_DATE(?,'YYYY-MM-DD HH24:MI:SS') AND TO_DATE(?,'YYYY-MM-DD HH24:MI:SS') AND NODE_FUR_FLAG='1' update Mil_Straightening_Result SET QUALIFIED_NUM3 = '#QUALIFIED_NUM3#', IN_MAT_NUM = '#IN_MAT_NUM#', QUALIFIED_NUM = '#QUALIFIED_NUM#', QUALIFIED_NUM1 = '#QUALIFIED_NUM1#', QUALIFIED_NUM2 = '#QUALIFIED_NUM2#', QA_TON = '#QA_TON#' WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/') AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/') DECLARE V_ROLLING_STATUS MIL_PLAN.ROLLING_STATUS%TYPE := NULL; BEGIN IF (#COL_TYPE# = 1) THEN IF (#OFFLINE_TYPE# = 1) THEN UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T SET T.STATUS = '3', T.OP_PROCESS = '#OP_PROCESS#', T.Offline_Type = '1' WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.MAT_NO = '#MAT_NO#'; ELSIF (#OFFLINE_TYPE# = 2) THEN UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T SET T.STATUS = '3', T.OP_PROCESS = '#OP_PROCESS#', T.Offline_Type = '2' WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.MAT_NO = '#MAT_NO#'; ELSE UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T SET T.STATUS = '3', T.OP_PROCESS = '#OP_PROCESS#', T.Offline_Type = '0' WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.MAT_NO = '#MAT_NO#'; END IF; ELSE UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T SET T.STATUS = '2', T.OP_PROCESS = '#OP_PROCESS#' WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.MAT_NO = '#MAT_NO#'; END IF; END; DECLARE BEGIN FOR MYROW IN (SELECT MAT_NO FROM (SELECT ROWNUM SEQ, MAT_NO FROM (SELECT T.MAT_NO FROM PORT_MIL_BATCH_SAMPLE_RESULT T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(T.PRO_PLAN_ID,'/') = NVL('#PRO_PLAN_ID#','/') AND NVL(T.GX_PLAN_NO,'/') = NVL('#GX_PLAN_NO#','/') AND (T.OP_PROCESS IS NULL OR T.OP_PROCESS = '#OP_PROCESS#') AND T.INSTORE_FLAG = '0' AND T.STATUS = '0' ORDER BY T.IS_SAMPLE_PIPE, T.MAT_NO ASC)) --WHERE SEQ = '#SEQ#' WHERE ROWNUM = 1) LOOP UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T SET T.STATUS = '5', T.OP_PROCESS = '#OP_PROCESS#' WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(T.PRO_PLAN_ID,'/') = NVL('#PRO_PLAN_ID#','/') AND NVL(T.GX_PLAN_NO,'/') = NVL('#GX_PLAN_NO#','/') AND T.MAT_NO = MYROW.MAT_NO; END LOOP; END; DECLARE BEGIN FOR MYROW IN (SELECT MAT_NO FROM (SELECT ROWNUM SEQ, MAT_NO FROM (SELECT T.MAT_NO FROM PORT_MIL_BATCH_SAMPLE_RESULT T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(T.PRO_PLAN_ID,'/') = NVL('#PRO_PLAN_ID#','/') AND NVL(T.GX_PLAN_NO,'/') = NVL('#GX_PLAN_NO#','/') AND (T.OP_PROCESS IS NULL OR T.OP_PROCESS = '#OP_PROCESS#') AND T.INSTORE_FLAG = '0' AND T.STATUS = '0' ORDER BY T.IS_SAMPLE_PIPE, T.MAT_NO ASC)) --WHERE SEQ = '#SEQ#' WHERE ROWNUM = 1) LOOP UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T SET T.RECUT_LENGTH = '#RECUT_LENGTH#', T.CUT_ACT_THEORY_WEIGHT = (T.ACT_THEORY_WEIGHT / T.ORDER_LENGTH) * TO_NUMBER('#RECUT_LENGTH#') WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND NVL(T.PRO_PLAN_ID,'/') = NVL('#PRO_PLAN_ID#','/') AND NVL(T.GX_PLAN_NO,'/') = NVL('#GX_PLAN_NO#','/') AND T.MAT_NO = MYROW.MAT_NO; END LOOP; END; 0 ]]>