XinYu_RZMES/.svn/pristine/ca/cab93f9d3477cec56230951a70d402ad90917582.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="STEEL MAKING QUERY ">
	<query id="UIH050500_01.select" desc="查询入库钢卷信息，用于贴标签使用">
        <![CDATA[
        SELECT    ''   CHK,
		          A.COIL_NO,
		          A.OLD_SAMPL_NO,
		         -- SUBSTR(A.SLAB_NO,0,10) CHARE_NO,
		          A.SLAB_NO,
		          A.SPEC_STL_GRD,        
		          A.SPEC_ABBSYM,
		          A.ORD_NO,
		          A.ACT_WGT,
		          A.MILL_DTIME,
		          A.INSTR_COIL_THK||'*'||A.INSTR_COIL_WTH THK_WTH, 
		          A.CHECKER_ID,
		          B.LICENSE_NO,
		          A.LICENSE_MARK,
		          A.DLIV_DIRNO,
		          C_PKG_ORD_PRC_END.FUN_GET_COIL_WGT(A.OLD_SAMPL_NO)    H05_COIL_WGT,
		          B.ORD_UNIT_WGT_MIN,
		          B.ORD_UNIT_WGT_MAX,
                  CASE WHEN A.SPEC_STL_GRD  IN ('40' , '45' , '50' ,'60', '40Mn' , '45Mn' , '65Mn' , '27Mn2' , '42Mn' , '40MnB' , '51CrV4')
                                            AND B.ORD_THK <= 16   
                                            THEN '从生产日期起，请在自然时效15天后加工食用' 
                                            ELSE A.COIL_MARK_RESVER  
                                            END   COIL_MARK_RESVER  ,
		          DECODE(A.CHANGE_SPEC_STL_GRD ,NULL, A.SPEC_STL_GRD , A.CHANGE_SPEC_STL_GRD)  CHANGE_SPEC_STL_GRD, 
		          '2'    COIL_PAGES --钢卷页数默认为2页，可以人工选择   
		FROM      TBH02_COIL_COMM     A   ,   TBE02_ORD_PRC  B
		WHERE     A.ORD_NO            =      B.ORD_NO
		AND       A.ORD_SEQ           =      B.ORD_SEQ
		AND       A.DLIV_DIRNO  LIKE  ?||'%'
		]]>
    </query>
	<query id="UIH050500_02.select" desc="查询入库钢卷是否存在,火运">
        <![CDATA[
      select a.old_sampl_no,a.coil_stat,A.ACT_WGT from tbh02_coil_comm a 
              where a.old_sampl_no = ? and a.COIL_STAT = '3' and a.CUR_PROG_CD = 'SFF' and a.SHIP_PROG_CD = '08'
		]]>
    </query>
	<query id="UIH050500_03.select" desc="火运/汽运标志">
        <![CDATA[
			SELECT A.DLIV_TP FROM TBJ01_DLIV_DIR A WHERE A.DLIV_DIRNO = ? 
		]]>
    </query>
	<query id="UIH050500_04.select" desc="查询入库钢卷是否存在,汽运">
        <![CDATA[
      select a.old_sampl_no,a.coil_stat,A.ACT_WGT from tbh02_coil_comm a 
              where a.old_sampl_no = ? and a.dliv_dirno is not null 
		]]>
    </query>
    
    <query id="UIH050500_05.select" desc="查询许可证号合同号">
        <![CDATA[
            select LICENSE_NO from TBB01_ORD_HEAD  where ORD_NO = ?
		]]>
    </query>
	<query id="UIH050500_01.update" desc="更新入库钢卷信息">
        <![CDATA[
			UPDATE 	TBH02_COIL_COMM
			   SET 	CHANGE_SPEC_STL_GRD 	=    ?,
			       	CHECKER_ID          	=    ?,
			       	LICENSE_NO          	=    ?,
			       	LICENSE_MARK        	=    ?,
			       	COIL_MARK_RESVER    	=    ?,
			       	COIL_MARK_REG       	=    ?,
			       	COIL_MARK_DTIME     	=    TO_CHAR(SYSDATE, 'YYYYMMDDHH24MIDD'),
			       	SPEC_STL_GRD        	=    ?
			 WHERE 	OLD_SAMPL_NO        	=    ?
		]]>
    </query>
	<query id="UIH050500_01.insert" desc="插入打印接口表">
        <![CDATA[
			INSERT INTO TBH06_L1_SEND_MARK  T
            ( 
              SEQ_NO,
              OLD_SAMPL_NO,
              COIL_NO,
              CHARGE_NO,
              ORD_NO,
              MILL_DTIME,
              SPEC_ABBSYM,
              STL_GRD,
              T_K,
              ACT_WGT,
              CHECKER_ID,
              LICENSE_MARK,
              LICENSE_NO,
              RESVER1,
              REG_ID,
              RESVER2,
              REG_DTIME,
              TRANS_DTIME,
              MSG_FLAG  
            )VALUES
            (tbh06_l1_send_mark_seq.nextval,
              ?,
              ?,
              ?,
              ?,
              ?,
              replace(REPLACE(?,'，',','),'。','.'),
              ?,
              ?,
              ?,
              ?,
              ?,
              ?,
              ?,
              ?,
              ?, 
              TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'),
              TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'),
              'N')
       
       
		]]>
    </query>
	<query id="UIH050500_02.update" desc="火运更新入库钢卷信息">
        <![CDATA[
     UPDATE    TBH02_COIL_COMM
	   SET     CHANGE_SPEC_STL_GRD =    ?,
	           CHECKER_ID          =    ?,
	           LICENSE_NO          =    ?,
	           LICENSE_MARK        =    ?,
	           COIL_MARK_RESVER    =    ?,
	           COIL_MARK_REG       =    ?,
	           ACT_WGT             =    ?,
	           COIL_MARK_REM       =    ?,
	           COIL_MARK_DTIME     =    TO_CHAR(SYSDATE, 'YYYYMMDDHH24MIDD'),
	           SPEC_STL_GRD        =    ?
	 WHERE     OLD_SAMPL_NO        =    ?
		]]>
    </query>
	<query id="UIH050500_01.delete" desc="" fetchSize="10">
        <![CDATA[
             DELETE  TBH06_L1_SEND_MARK A WHERE A.TRANS_DTIME < ?
        ]]>
    </query>
</queryMap>