XinYu_RZMES/.svn/pristine/c5/c5ed1de1cbf0815ac060cdea778da9d48dfd69c1.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="STEEL MAKING QUERY ">
	<query id="UIH051600_01.select" desc="  ">
        <![CDATA[
       SELECT A.SPEC_STL_GRD,A.COIL_THK||'*'||A.COIL_WTH T_W,
               A.INSTR_COIL_THK||'*'||A.INSTR_COIL_WTH IT_IW,
             A.ORD_NO,A.ORD_SEQ,A.COIL_LEN,A.ACT_WGT,A.CAL_WGT,
             DECODE(A.CUR_PROG_CD,'SFA','发货指示待机','SED','判定待机','SRC','充当待机','SFB','运送待机','SFF','发货完成',null) CUR_PROG_CD,
             DECODE(A.TOT_DEC_GRD,'1','合格','2','不合格','3','次品','4','废品','','待判定') TOT_DEC_GRD,
             DECODE(A.ORD_FL,'1','订单材','2','余材','','未判') ORD_FL,
             DECODE(A.COIL_STAT,'0','加热炉上料','1','加热炉出炉','2','轧制完成','3','出库/轧废','4','预装车',null) COIL_STAT,
             A.COIL_IN_REG,A.COIL_IN_DTIME,A.COIL_OUT_REG,A.COIL_OUT_DTIME ,EXTSHAPE_DEC_GRD
       
    FROM TBH02_COIL_COMM A  WHERE A.OLD_SAMPL_NO = ? 
		]]>
    </query>
	<query id="UIH051600_02.select" desc=" 查询钢卷号是否存在于钢卷公共表 ">
        <![CDATA[
			SELECT A.OLD_SAMPL_NO,A.COIL_NO,A.COIL_STAT,A.SLAB_NO,a.CUR_PROG_CD,a.SHIP_PROG_CD,a.TRNF_DTIME
			,A.ORD_NO,A.ORD_SEQ,A.ORD_FL FROM TBH02_COIL_COMM A 
           WHERE A.OLD_SAMPL_NO = ? AND A.COIL_STAT <> '2'
		]]>
    </query>
	<query id="UIH051600_03.select" desc="  ">
        <![CDATA[
			SELECT A.OLD_SAMPL_NO,A.COIL_NO,A.COIL_STAT,CUR_PROG_CD ,A.EXTSHAPE_DEC_GRD
			,A.ORD_NO,A.ORD_SEQ,A.ORD_FL FROM TBH02_COIL_COMM A 
				   WHERE A.OLD_SAMPL_NO = ? AND A.COIL_STAT = '2'
		]]>
    </query>
	<query id="UIH051600_04.select" desc="  ">
        <![CDATA[
			SELECT A.COIL_NO FROM TBH05_COIL_YARD A WHERE A.YARD_CLF||A.STEP_CLF||A.STORELAY||A.STORE_SEQ = ? 
		]]>
    </query>
	<query id="UIH051600_05.select" desc="  ">
        <![CDATA[
			SELECT A.COIL_NO FROM TBH05_COIL_YARD A WHERE A.COIL_NO = ? 
		]]>
    </query>
	<query id="UIH051600_06.select" desc="  ">
        <![CDATA[
			SELECT A.CUR_PROG_CD FROM TBG02_SLAB_COMM A WHERE A.SLAB_NO = ? 
		]]>
    </query>
    <query id="UIH051600_07.select" desc="  ">
        <![CDATA[
			SELECT MAX(A.WDLIVNO) WDLIVNO FROM tbh02_coil_comm A WHERE A.WDLIVNO LIKE ?||'%' 
		]]>
    </query>
	<query id="UIH051600_01.update" desc=" 钢卷公共表 ">
        <![CDATA[
			UPDATE TBH02_COIL_COMM A SET 
				   A.CUR_LOAD_LOC = ?,
				   A.COIL_IN_REG  = ?,
				   A.CUR_PROG_CD = 'SRC',
				   A.COIL_STAT = '2',
				   A.ORD_FL = '2',
				   A.ORD_NO = '',
				   A.ORD_SEQ = '',
				   A.ISUSED = '0',
				   A.SHIP_DIRNO = '',
				   A.DLIV_DIRNO = '',
				   A.SHIP_PROG_CD = '',
				   A.SHIP_DIR_DTIME = '',
				   A.COIL_IN_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
				   
				   WHERE A.OLD_SAMPL_NO = ?
		]]>
    </query>
	<query id="UIH051600_02.update" desc=" 钢卷公共_D表 ">
        <![CDATA[
			UPDATE TBH02_COIL_COMM_D A SET 
				   A.ORD_FL = '2'  
				   
				   WHERE A.COIL_NO = ? 
		]]>
    </query>
	<query id="UIH051600_03.update" desc=" 垛位表 ">
        <![CDATA[
			UPDATE TBH05_COIL_YARD A SET 
 				   A.COIL_NO = ?
				   
				   WHERE  A.YARD_CLF  =  ?
				     AND  A.STEP_CLF  =  ?
					 AND  A.STORELAY  =  ?
                     AND  A.STORE_SEQ  =  ?
		]]>
    </query>
	<query id="UIH051600_04.update" desc="  ">
        <![CDATA[
			UPDATE TBH02_COIL_COMM A SET 
       				A.COIL_STAT = '3',
					   A.CUR_LOAD_LOC = '',
					   A.ORD_FL = '2',
				       A.ORD_NO = '',
				       A.ORD_SEQ = '',
					   A.SHIP_PROG_CD = '10',
					   A.COIL_OUT_REG = ?,
					   A.COIL_OUT_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
					   
					   WHERE A.OLD_SAMPL_NO = ? 
		]]>
    </query>
    <query id="UIH051600_08.update" desc="  ">
        <![CDATA[
			UPDATE TBH02_COIL_COMM A SET 
       				A.COIL_STAT = '3',
					   A.CUR_LOAD_LOC = '',
					   A.ORD_FL = '2',
				       A.ORD_NO = '',
				       A.ORD_SEQ = '',
					   A.SHIP_PROG_CD = '10',
					   A.COIL_OUT_REG = ?,
					   A.WDLIVNO = ?,
					   A.COIL_OUT_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
					   
					   WHERE A.OLD_SAMPL_NO = ? 
		]]>
    </query>
	<query id="UIH051600_05.update" desc="  ">
        <![CDATA[
			UPDATE TBH05_COIL_YARD T SET 
				   T.COIL_NO = '',
				   T.REG_ID = '',
				   T.REG_DTIME = '' 
				   
				   WHERE T.COIL_NO = ?
		]]>
    </query>
	<query id="UIH051600_06.update" desc="  ">
        <![CDATA[
			UPDATE TBG02_SLAB_COMM A SET 
       A.SLAB_STAT = '3',
       A.CUR_LOAD_LOC = 'H516' 
       
       WHERE A.SLAB_NO = ? 
		]]>
    </query>
	<query id="UIH051600_07.update" desc="  ">
        <![CDATA[
			UPDATE TBG04_SLAB_YARD A SET 
				   A.SLAB_NO = ''
				   WHERE A.SLAB_NO = ?  
		]]>
    </query>
	<query id="UIH051600_01.call" desc=" 插入降级余材记录 ">
        <![CDATA[
			{call C_PKG_ORD_REP.PRD_ORD_HIS(?,?,?,?,?,?,?,?,?,?,?,?,?)} 
		]]>
    </query>
</queryMap>