XinYu_RZMES/.svn/pristine/ed/ed13f9fb1944de1f0d1af73c629760d1b3153ee1.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="STEEL MAKING QUERY ">
	<query id="UIK010020_01.select" desc=" FJH热卷数据查询 " fetchSize="10">
		<![CDATA[
SELECT     '' CHK
           ,A.OLD_SAMPL_NO
           ,A.PRODNM_CD
           ,A.SPEC_STL_GRD
           ,A.COIL_THK,A.COIL_WTH,A.COIL_LEN,A.COIL_INDIA,A.COIL_OUTDIA
           ,A.CRK_CD1,A.CRK_CD2,A.CRK_CD3,A.CRK_CD4,A.CRK_CD5
           ,DECODE(A.APPOINT_YN,'Q','未入库','Y','板加已入库','已出库')  APPOINT_YN---指定
           ,DECODE(A.TOT_DEC_GRD,'1','合格','2','不合格','3','次品','4','废品') TOT_DEC_GRD
           ,DECODE(A.INGR_DEC_GRD,'0','综合判定取消','1','合格','2','不合格') INGR_DEC_GRD
           ,DECODE(A.MATLQLTY_DEC_GRD,'0','无性能要求','1','合格','2','不合格') MATLQLTY_DEC_GRD
           ,DECODE(A.SIZE_DEC_RST,'1','合格','2','不合格') SIZE_DEC_RST
           ,DECODE(A.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品','待判定') EXTSHAPE_DEC_GRD
           ,DECODE(A.WGT_DEC_RST,'1','合格','2','不合格') WGT_DEC_RST        
           ,SUBSTR(A.SLAB_NO,0,10) CHARGE_NO         
           ,DECODE(A.CUR_PROG_CD,'SFA','发货指示待机','SED','判定待机','SRC','充当待机') CUR_PROG_CD
           
           ,A.INSTR_COIL_WTH
           ,A.INSTR_COIL_THK
           ,A.DCS_THK --判定厚度
           ,A.DCS_WTH --判定宽度
           ,A.ACT_WGT
           ,A.CUR_LOAD_LOC
           ,A.ORD_NO,A.ORD_SEQ,DECODE(A.ORD_FL,'1','订单材','2','余材','','未判') ORD_FL
           ,A.TOT_DEC_DTIME
           ,A.DLIV_TP,A.ORDCUST_CD
           ,A.APPOINT_ID,A.APPOINT_DTIME,A.APPOINT_NOTE

      FROM TBH02_COIL_COMM_BJ A
      WHERE '1' = '1'
      AND   A.OLD_SAMPL_NO LIKE :1||'%'
      AND   A.SPEC_STL_GRD||'&' LIKE :2||'%'      
      AND   A.COIL_THK >= NVL(:3,'000')
      AND   A.COIL_THK <= NVL(:4,'999')
      AND   A.COIL_WTH >= NVL(:5,'00000')
      AND   A.COIL_WTH <= NVL(:6,'99999')      
      AND   A.CUR_PROG_CD||'&' LIKE :7||'%'  
	  AND 	SUBSTR(A.APPOINT_DTIME ,1,8 ) >= NVL(:8,'00000000')
      AND 	SUBSTR(A.APPOINT_DTIME ,1,8 ) <= NVL(:9,'99999999')
      AND	A.CUR_LOAD_LOC||'&' LIKE :10||'%'
      AND   A.COIL_STAT = :11
		]]>
	</query>
	
	

	
	
	<query  id="UIK010020_01.INITSELECT" desc="初始化外观缺陷代码表 BugResult">
	   SELECT 
        SM_CFNM  LABEL
      , SM_CD VALUE
        FROM  TBZ00_COMMCD T   WHERE   LG_CD='H02001'
        AND   T.USED_YN        =       'Y'
	</query>
	
	<query id="UIK010020_02.INITSELECT" desc="查询所有钢种组中的牌号" fetchSize="10">
        <![CDATA[
		SELECT     DISTINCT
                   FAC_STL_GRD     LABEL
                  ,FAC_STL_GRD     VALUE
         FROM      TBD00_STLGRD
         UNION     ALL
         SELECT    'ALL'   LABEL
                   ,''     VALUE
         FROM      DUAL
         ORDER BY  VALUE DESC
        ]]>
    </query>
    
    
    <query id="UIK010020_01.update" desc="指定修改状态" fetchSize="10">
		<![CDATA[
            UPDATE TBH02_COIL_COMM_BJ T
			SET  T.COIL_THK 	= :1
    			,T.COIL_WTH 	= :2
    			,T.COIL_LEN 	= :3
    			,T.COIL_INDIA 	= :4
    			,T.COIL_OUTDIA 	= :5
    			,T.DCS_THK 		= :6
    			,T.DCS_WTH 		= :7
    			,T.ACT_WGT 		= :8
    			,T.CUR_LOAD_LOC = :9
    			,T.CRK_CD1 		= :10
    			,T.CRK_CD2 		= :11
    			,T.CRK_CD3 		= :12
    			,T.CRK_CD4 		= :13
    			,T.CRK_CD5 		= :14
    			,T.SPEC_STL_GRD = :15
			WHERE T.OLD_SAMPL_NO LIKE :16||'%'
			AND   T.COIL_STAT = '2'
			AND   T.APPOINT_YN = 'Y'
		]]>
	</query>
	
	
	<query id="UIK010020_02.update" desc="入库状态修改" fetchSize="10">
		<![CDATA[
            UPDATE TBH02_COIL_COMM_BJ T
			SET T.COIL_STAT = '2'
				,T.CUR_LOAD_LOC	= :1
				,T.YARD_ENTRY_REG = :2
				,T.YARD_ENTRY_USE_TIME =TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
    			,T.APPOINT_YN = 'Y'
    			
    			,T.CUR_PROG_CD = 'SFA'
			WHERE T.OLD_SAMPL_NO LIKE :3||'%'
			AND   T.COIL_STAT = '1'
			AND   T.APPOINT_YN = 'Q'---出热轧库实物到板加但未入库
		]]>
	</query>
	
	<query id="UIK010020_03.update" desc="退回状态修改" fetchSize="10">
		<![CDATA[
            UPDATE TBH02_COIL_COMM T
			SET T.APPOINT_YN  = 'P'
    		   ,T.CUR_PROG_CD = 'SDB'----------钢卷入库待机
    		   
			WHERE T.OLD_SAMPL_NO LIKE :1||'%'
			AND   T.COIL_STAT = '3'
		]]>
	</query>
	
	<query id="UIK010020_04.update" desc="板加入库同步状态修改" fetchSize="10">
		<![CDATA[
            UPDATE TBH02_COIL_COMM T
			SET T.APPOINT_YN  = 'Y'
			WHERE T.OLD_SAMPL_NO LIKE :1||'%'
			AND   T.COIL_STAT = '3'
		]]>
	</query>
	
	<query id="UIK010020_01.delete" desc="退回删除BJ修改" fetchSize="10">
		<![CDATA[
            UPDATE TBH02_COIL_COMM_BJ T
            SET  T.COIL_STAT = '3'
				,T.BEF_LOAD_LOC	=	T.CUR_LOAD_LOC
				,T.CUR_LOAD_LOC = ''
    			,T.APPOINT_YN = 'P'
    			,T.CUR_PROG_CD = 'SGF'	-------进程状态
    			,T.CUR_PROG_CD_DTIME 	=	TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
    			,T.CUR_PROG_CD_PGM 		= 	'UIK010020'
          		,T.BEF_PROG_CD 			= 	T.CUR_PROG_CD
          		,T.BEF_PROG_CD_DTIME 	= 	T.CUR_PROG_CD_DTIME
          		,T.BEF_PROG_CD_PGM 		= 	T.CUR_PROG_CD_PGM
          		,T.TRNF_REG   = :1
    			,T.TRNF_DTIME			= 	TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
    			,T.TRNF_USE_TIME 		= 	TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
   		
            WHERE T.OLD_SAMPL_NO LIKE :2||'%'
              AND T.COIL_STAT   = '2'
              AND T.APPOINT_YN  = 'Y'
		]]>
	</query>
	
</queryMap>