XinYu_LZMES/WebRoot/WEB-INF/query/M/M02/UIM020050-query.xml

<?xml version="1.0" encoding="UTF-8"?>
<queryMap desc="重卷上料">
	<query id="UIM020050_01.SELECT"  desc="查询重卷计划">
		<![CDATA[
		SELECT '' CAL_SEQ, --编制号 
               L.OLD_SAMPL_NO C_COIL_NO, --热卷号 
               M.R_COIL_NO L_COIL_NO, --冷卷号 
               L.CUR_LOAD_LOC YARD_ADDR, --垛位
               DECODE(L.TRNF_SHIFT,  '0', '常白班', '1','早班', '2', '中班', '3', '晚班') TRNF_SHIFT, --出库班次
               to_char(L.COIL_THK, 'FM990.099') || ' * ' || L.COIL_WTH T_W,
               to_char(E.C_ORD_THK, 'FM990.099') || ' * ' || E.C_ORD_WTH IT_IW,
               L.COIL_LEN,
               L.ACT_WGT COIL_WGT,
               L.SPEC_STL_GRD,
               DECODE(M.STATUS_CD, 'A', '计划中',  'B', '上鞍座', 'C','焊接', 'D','生产完成','F','预备吊销钢卷','E','真正吊销钢卷') STATUS_CD,
               L.EXTSHAPE_QUALITY EXTSHAPE_DEC_GRD,
		       (SELECT TC1.SM_CFNM
          FROM TBZ00_COMMCD TC1
         WHERE TC1.LG_CD = 'B02001'
           AND TC1.SM_CD = l.CRK_CD1) CRK_CD1,
           l.CRK_CD1_TYPE,
       (SELECT TC1.SM_CFNM
          FROM TBZ00_COMMCD TC1
         WHERE TC1.LG_CD = 'B02001'
           AND TC1.SM_CD = l.CRK_CD2) CRK_CD2,
           l.CRK_CD2_TYPE,
       (SELECT TC1.SM_CFNM
          FROM TBZ00_COMMCD TC1
         WHERE TC1.LG_CD = 'B02001'
           AND TC1.SM_CD = l.CRK_CD3) CRK_CD3,
           l.CRK_CD3_TYPE,
       (SELECT TC1.SM_CFNM
          FROM TBZ00_COMMCD TC1
         WHERE TC1.LG_CD = 'B02001'
           AND TC1.SM_CD = l.CRK_CD4) CRK_CD4,
           l.CRK_CD4_TYPE,
       (SELECT TC1.SM_CFNM
          FROM TBZ00_COMMCD TC1
         WHERE TC1.LG_CD = 'B02001'
           AND TC1.SM_CD = l.CRK_CD5) CRK_CD5,
           l.CRK_CD5_TYPE,
               L.ORD_NO,
               L.ORD_SEQ,
               L.ORD_FL
          FROM C_TBC02_COIL_COMM L, L_TBF03_SPEC_REEL M, TBE02_ORD_PRC E
         WHERE L.OLD_SAMPL_NO = M.C_COIL_NO
           AND L.ORD_NO = E.ORD_NO
           AND L.ORD_SEQ = E.ORD_SEQ
           AND L.OLD_SAMPL_NO LIKE ?||'%'
          -- AND M.STATUS_CD IN ('A','B','F')
          AND M.STATUS_CD ='A'
         ORDER BY M.STATUS_CD DESC,M.C_COIL_NO ASC
		]]>
	</query>
	
	<query id="UIM020050_04.SELECT"  desc="查询重卷计划">
		<![CDATA[
		SELECT '' CAL_SEQ, --编制号 
               L.OLD_SAMPL_NO C_COIL_NO, --热卷号 
               M.R_COIL_NO L_COIL_NO, --冷卷号 
               L.CUR_LOAD_LOC YARD_ADDR, --垛位
               DECODE(L.TRNF_SHIFT,  '0', '常白班', '1','早班', '2', '中班', '3', '晚班') TRNF_SHIFT, --出库班次
               to_char(L.COIL_THK, 'FM990.099') || ' * ' || L.COIL_WTH T_W,
               to_char(E.C_ORD_THK, 'FM990.099') || ' * ' || E.C_ORD_WTH IT_IW,
               L.COIL_LEN,
               L.ACT_WGT COIL_WGT,
               L.SPEC_STL_GRD,
               DECODE(M.STATUS_CD, 'A', '计划中',  'B', '上鞍座', 'C','焊接', 'D','生产完成','F','预备吊销钢卷','E','真正吊销钢卷') STATUS_CD,
               L.ORD_NO,
               L.ORD_SEQ,
               L.ORD_FL
          FROM C_TBL02_COIL_COMM L, L_TBF03_SPEC_REEL M, TBE02_ORD_PRC E
         WHERE L.OLD_SAMPL_NO = M.C_COIL_NO
           AND L.ORD_NO = E.ORD_NO
           AND L.ORD_SEQ = E.ORD_SEQ
           AND M.STATUS_CD IN ('A','B','F')
         ORDER BY M.STATUS_CD DESC,M.C_COIL_NO ASC
		]]>
	</query>
	<query id="UIM020050_05.SELECT"  desc="查询未加班次班组的钢卷">
		<![CDATA[		
			select
	             T.OLD_SAMPL_NO L_COIL_NO,
	             M.R_COIL_NO C_COIL_NO,
	             T.TRNF_SHIFT,
	             T.TRNF_GROUP,
	             T.TRNF_REG
	        from C_TBL02_COIL_COMM T, L_TBF03_SPEC_REEL m
	       where T.OLD_SAMPL_NO = M.C_COIL_NO
	         and m.STATUS_CD in ('B', 'C', 'D')
	         AND T.TRNF_SHIFT IS NULL
	       		
		]]>
	</query>
	<query id="UIM020050_06.SELECT"  desc="查询成品表中钢卷记录是否存在">
		<![CDATA[		
			SELECT 1 FROM C_TBL02_COIL_COMM T WHERE T.OLD_SAMPL_NO = ?		
		]]>
	</query>
	<query id="UIM020050_02.SELECT"  desc="查询未加班次班组的钢卷">
		<![CDATA[		
			select
	             T.OLD_SAMPL_NO L_COIL_NO,
	             M.R_COIL_NO C_COIL_NO,
	             T.TRNF_SHIFT,
	             T.TRNF_GROUP,
	             T.TRNF_REG
	        from C_TBC02_COIL_COMM T, L_TBF03_SPEC_REEL m
	       where T.OLD_SAMPL_NO = M.C_COIL_NO
	         and m.STATUS_CD in ('B', 'C', 'D')
	         AND T.TRNF_SHIFT IS NULL
	       		
		]]>
	</query>
	<query id="UIM020050_03.SELECT"  desc="查询成品表中钢卷记录是否存在">
		<![CDATA[		
			SELECT 1 FROM C_TBC02_COIL_COMM T WHERE T.OLD_SAMPL_NO = ?		
		]]>
	</query>
	<query id="UIM020050_01.INSERT"  desc="上料后插入钢卷成品数据">
		<![CDATA[		
			INSERT INTO C_TBC02_COIL_COMM C
        (COIL_NO,
         SLAB_NO,
         OLD_SAMPL_NO,
         ORI_OLD_SAMPL_NO,
         COIL_STAT,
         INSTR_COIL_THK,
         INSTR_COIL_WTH,
         INSTR_COIL_LEN,
         INSTR_COIL_INDIA,
         INSTR_COIL_OUTDIA,
         INSTR_COIL_WGT,
         DEVLMT_DTIME,
         DEST_CD,
         ORDCUST_CD,
         CUST_CD,
         ORD_FL,
         ORD_NO,
         ORD_SEQ,
         PRODNM_CD,
         SPEC_ABBSYM,
         SPEC_STL_GRD,
         ORD_USE_CD,
         STL_GRD,
         SMP_NO,
         SMP_CUT_LOC,
         SMP_DIR_PIC_YN,
         SMP_PICK_YN,
         MATLQLTY_DEC_GRD,
         LINE_TP,
         BEF_STL_GRD)
        SELECT P.R_COIL_ID COIL_NO,
               L.SLAB_NO,
               P.R_COIL_NO OLD_SAMPL_NO,
               L.OLD_SAMPL_NO,
               '1' COIL_STAT,
               O.C_ORD_THK INSTR_COIL_THK,
               O.C_ORD_WTH INSTR_COIL_WTH,
               O.C_ORD_LEN INSTR_COIL_LEN,
               O.C_ORD_INDIA INSTR_COIL_INDIA,
               O.C_ORD_OUTDIA INSTR_COIL_OUTDIA,
               O.ORD_WGT INSTR_COIL_WGT,
               O.DEL_FR_DATE DEVLMT_DTIME,
               O.DEST_CD,
               O.ORDCUST_CD,
               O.CUST_CD,
               '1' ORD_FL,
               L.ORD_NO,
               L.ORD_SEQ,
               O.PRD_TY PRODNM_CD,
               O.C_SPEC_ABBSYM SPEC_ABBSYM,
               L.SPEC_STL_GRD,
               O.ORD_USEAGE_CD ORD_USE_CD,
               L.STL_GRD,
               L.SMP_NO,
               L.SMP_CUT_LOC,
               L.SMP_DIR_PIC_YN,
               L.SMP_PICK_YN,
               L.MATLQLTY_DEC_GRD,
               'C',
               L.SPEC_STL_GRD
          FROM C_TBC02_COIL_COMM L, L_TBF03_SPEC_REEL P, TBE02_ORD_PRC O
         WHERE L.OLD_SAMPL_NO = P.C_COIL_NO
           AND P.ORD_NO = O.ORD_NO
           AND P.ORD_SEQ = O.ORD_SEQ
           AND P.STATUS_CD = 'B'
           AND L.OLD_SAMPL_NO = ? 	
		]]>
	</query>
	<query id="UIM020050_03.INSERT"  desc="上料后插入钢卷成品数据">
		<![CDATA[		
			INSERT INTO C_TBL02_COIL_COMM C
        (COIL_NO,
         SLAB_NO,
         OLD_SAMPL_NO,
         ORI_OLD_SAMPL_NO,
         COIL_STAT,
         INSTR_COIL_THK,
         INSTR_COIL_WTH,
         INSTR_COIL_LEN,
         INSTR_COIL_INDIA,
         INSTR_COIL_OUTDIA,
         INSTR_COIL_WGT,
         DEVLMT_DTIME,
         DEST_CD,
         ORDCUST_CD,
         CUST_CD,
         ORD_FL,
         ORD_NO,
         ORD_SEQ,
         PRODNM_CD,
         SPEC_ABBSYM,
         SPEC_STL_GRD,
         ORD_USE_CD,
         STL_GRD,
         SMP_NO,
         SMP_CUT_LOC,
         SMP_DIR_PIC_YN,
         SMP_PICK_YN,
         MATLQLTY_DEC_GRD,
        -- LINE_TP,
         BEF_STL_GRD)
        SELECT P.R_COIL_ID COIL_NO,
               L.SLAB_NO,
               P.R_COIL_NO OLD_SAMPL_NO,
               L.OLD_SAMPL_NO,
               '1' COIL_STAT,
               O.C_ORD_THK INSTR_COIL_THK,
               O.C_ORD_WTH INSTR_COIL_WTH,
               O.C_ORD_LEN INSTR_COIL_LEN,
               O.C_ORD_INDIA INSTR_COIL_INDIA,
               O.C_ORD_OUTDIA INSTR_COIL_OUTDIA,
               O.ORD_WGT INSTR_COIL_WGT,
               O.DEL_FR_DATE DEVLMT_DTIME,
               O.DEST_CD,
               O.ORDCUST_CD,
               O.CUST_CD,
               '1' ORD_FL,
               L.ORD_NO,
               L.ORD_SEQ,
               O.PRD_TY PRODNM_CD,
               O.C_SPEC_ABBSYM SPEC_ABBSYM,
               L.SPEC_STL_GRD,
               O.ORD_USEAGE_CD ORD_USE_CD,
               L.STL_GRD,
               L.SMP_NO,
               L.SMP_CUT_LOC,
               L.SMP_DIR_PIC_YN,
               L.SMP_PICK_YN,
               L.MATLQLTY_DEC_GRD,
             --  'C',
               L.SPEC_STL_GRD
          FROM C_TBL02_COIL_COMM L, L_TBF03_SPEC_REEL P, TBE02_ORD_PRC O
         WHERE L.OLD_SAMPL_NO = P.C_COIL_NO
           AND P.ORD_NO = O.ORD_NO
           AND P.ORD_SEQ = O.ORD_SEQ
           AND P.STATUS_CD = 'B'
           AND L.OLD_SAMPL_NO = ? 	
		]]>
	</query>
	<query id="UIM020050_02.INSERT"  desc="上料后插入钢卷成品_D数据">
		<![CDATA[		
			INSERT INTO C_TBC02_COIL_COMM_D
			  (L_COIL_NO,
			   CUT_SEQ,
			   ORD_THK,
			   ORD_WTH,
			   ORD_LEN,
			   ORD_WGT,
			   ORD_WGT_MIN,
			   ORD_WGT_MAX,
			   ORD_INDIA,
			   ORD_OUTDIA,
			   ORD_NO,
			   ORD_SEQ,
			   ORD_FL,
			   MERGE_FL)
			  SELECT F.R_COIL_NO,
			         D.COIL_CUT_SEQ,
			         D.ORD_THK,
			         D.ORD_WTH,
			         D.ORD_LEN,
			         D.ORD_WGT,
			         D.ORD_WGT_MIN,
			         D.ORD_WGT_MAX,
			         D.ORD_INDIA,
			         D.ORD_OUTDIA,
			         D.ORD_NO,
			         D.ORD_SEQ,
			         D.ORD_FL,
			         D.MERGE_FL
			    FROM L_TBF03_SPEC_REEL_D D, L_TBF03_SPEC_REEL F
			   WHERE D.COIL_EDT_SEQ = F.COIL_EDT_SEQ
           		 AND D.L_COIL_NO = F.C_COIL_NO
			     AND F.STATUS_CD = 'B'
			     AND D.L_COIL_NO = ?	
		]]>
	</query>
	<query id="UIM020050_04.INSERT"  desc="上料后插入钢卷成品_D数据">
		<![CDATA[		
			INSERT INTO C_TBL02_COIL_COMM_D
			  (L_COIL_NO,
			   CUT_SEQ,
			   ORD_THK,
			   ORD_WTH,
			   ORD_LEN,
			   ORD_WGT,
			   ORD_WGT_MIN,
			   ORD_WGT_MAX,
			   ORD_INDIA,
			   ORD_OUTDIA,
			   ORD_NO,
			   ORD_SEQ,
			   ORD_FL,
			   MERGE_FL)
			  SELECT F.R_COIL_NO,
			         D.COIL_CUT_SEQ,
			         D.ORD_THK,
			         D.ORD_WTH,
			         D.ORD_LEN,
			         D.ORD_WGT,
			         D.ORD_WGT_MIN,
			         D.ORD_WGT_MAX,
			         D.ORD_INDIA,
			         D.ORD_OUTDIA,
			         D.ORD_NO,
			         D.ORD_SEQ,
			         D.ORD_FL,
			         D.MERGE_FL
			    FROM L_TBF03_SPEC_REEL_D D, L_TBF03_SPEC_REEL F
			   WHERE D.COIL_EDT_SEQ = F.COIL_EDT_SEQ
           		 AND D.L_COIL_NO = F.C_COIL_NO
			     AND F.STATUS_CD = 'B'
			     AND D.L_COIL_NO = ?	
		]]>
	</query>
	<query id="UIM020050_01.DELETE"  desc="删除钢卷成品_D数据">
		<![CDATA[
			DELETE FROM C_TBC02_COIL_COMM_D T WHERE T.L_COIL_NO = ?
		]]>
	</query>
	<query id="UIM020050_03.DELETE"  desc="删除钢卷成品_D数据">
		<![CDATA[
			DELETE FROM C_TBL02_COIL_COMM_D T WHERE T.L_COIL_NO = ?
		]]>
	</query>
	<query id="UIM020050_02.DELETE"  desc="删除成品表数据">
		<![CDATA[
			DELETE FROM C_TBC02_COIL_COMM T 
			 WHERE T.OLD_SAMPL_NO = 
			      (SELECT F.R_COIL_NO FROM L_TBF03_SPEC_REEL F 
		            WHERE F.C_COIL_NO = ?
		              AND F.STATUS_CD <> 'E')
			 AND T.COIL_STAT = '1'
		]]>
	</query>
</queryMap>