XinYu_RZMES/.svn/pristine/8a/8a9050d72b58e4045069a269f8afb90322c4330f.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="STEEL MAKING QUERY ">
	<query id="UIG040700_SIMP_SLAB.select" desc=" 板坯详细信息查询 ">
        <![CDATA[
			SELECT A.SLAB_NO
        			,STL_GRD
					,CUR_LOAD_LOC
					,YARD_ADDR||STORELAY YARD_ADDR
					,SLAB_THK||'*'||SLAB_WTH||'*'||SLAB_LEN SLAB_SIZE
					,SLAB_RT
					,CUR_PROG_CD
					,ORD_FL
					,ORD_NO
			        ,ORD_SEQ
			        ,A.SLAB_RT
					,SLAB_STAT
					,'' CR_NO
					,'' TO_YARD
					,'' CHK
          			,MILL_SCH_STAT
			        ,HCR_CLF
			        ,SLAB_INGR_DEC_GRD
                    ,SLAB_SIZE_DEC_GRD
						FROM TBG02_SLAB_COMM A
							 ,TBG04_SLAB_YARD B 
						WHERE '1' = '1'
						AND A.SLAB_NO = B.SLAB_NO(+)
				  AND A.SLAB_NO LIKE ?||'%'
				  ORDER BY A.SLAB_NO ASC
        ]]>
	</query>
	<query id="UIG040700_RAB_SLAB.select" desc=" 板坯详细信息查询 ">
        <![CDATA[
			SELECT A.SLAB_NO
		              ,STL_GRD
		          ,CUR_LOAD_LOC
		          ,YARD_ADDR||STORELAY YARD_ADDR
		          ,SLAB_THK||'*'||SLAB_WTH||'*'||SLAB_LEN SLAB_SIZE
		          ,SLAB_RT
		          ,CUR_PROG_CD
		          ,ORD_FL
		          ,ORD_NO
		              ,ORD_SEQ
		              ,A.SLAB_RT
		          ,SLAB_STAT
		          ,'' CR_NO
		          ,'' TO_YARD
		          ,'' CHK
		                ,MILL_SCH_STAT
		              ,HCR_CLF
		              ,SLAB_INGR_DEC_GRD
		                    ,SLAB_SIZE_DEC_GRD
		      FROM TBG02_SLAB_COMM A
		         ,TBG04_SLAB_YARD B 
		      WHERE '1' = '1'
		      AND A.SLAB_NO = B.SLAB_NO(+)
		        AND A.CUR_PROG_CD =  'RAB'
		        AND A.SLAB_STAT = '2'
		        ORDER BY A.SLAB_NO ASC
        ]]>
	</query>
	<query id="UIG040700_RABERR_SLAB.select" desc=" 板坯详细信息查询 ">
        <![CDATA[
			SELECT A.SLAB_NO
		              ,STL_GRD
		          ,CUR_LOAD_LOC
		          ,YARD_ADDR||STORELAY YARD_ADDR
		          ,SLAB_THK||'*'||SLAB_WTH||'*'||SLAB_LEN SLAB_SIZE
		          ,SLAB_RT
		          ,CUR_PROG_CD
		          ,ORD_FL
		          ,ORD_NO
		              ,ORD_SEQ
		              ,A.SLAB_RT
		          ,SLAB_STAT
		          ,'' CR_NO
		          ,'' TO_YARD
		          ,'' CHK
		                ,MILL_SCH_STAT
		              ,HCR_CLF
		              ,SLAB_INGR_DEC_GRD
		                    ,SLAB_SIZE_DEC_GRD
		      FROM TBG02_SLAB_COMM A
		         ,TBG04_SLAB_YARD B 
		      WHERE '1' = '1'
		      AND A.SLAB_NO = B.SLAB_NO(+)
		        AND A.CUR_PROG_CD =  'RAB'
		        AND A.SLAB_STAT = '2'
		        AND A.ORD_FL = '2'
		        ORDER BY A.SLAB_NO ASC
        ]]>
	</query>
	<query id="UIG040700_STATERRO_SLAB.select" desc=" 板坯详细信息查询 ">
        <![CDATA[
			SELECT A.SLAB_NO
		              ,STL_GRD
		          ,CUR_LOAD_LOC
		          ,YARD_ADDR||STORELAY YARD_ADDR
		          ,SLAB_THK||'*'||SLAB_WTH||'*'||SLAB_LEN SLAB_SIZE
		          ,SLAB_RT
		          ,CUR_PROG_CD
		          ,ORD_FL
		          ,ORD_NO
		              ,ORD_SEQ
		              ,A.SLAB_RT
		          ,SLAB_STAT
		          ,'' CR_NO
		          ,'' TO_YARD
		          ,'' CHK
		                ,MILL_SCH_STAT
		              ,HCR_CLF
		              ,SLAB_INGR_DEC_GRD
		                    ,SLAB_SIZE_DEC_GRD
		      FROM TBG02_SLAB_COMM A
		         ,TBG04_SLAB_YARD B 
		      WHERE '1' = '1'
		      AND A.SLAB_NO = B.SLAB_NO
		      AND A.SLAB_STAT = '3'
        ]]>
	</query>
	<query id="UIG040700_SLAB_BACK.update" desc="     " fetchSize="10">
        <![CDATA[
          UPDATE TBG02_SLAB_COMM   SET   
				 MATRL_END_CAUSE_CD    =  ''    
				,MATRL_END_DTIME       = ''
				,SLAB_STAT             = '2'
				,CUR_PROG_CD = (CASE WHEN SLAB_RT = 'H' THEN 'RRC' WHEN SLAB_RT IN ('Z','P') THEN 'RGB' ELSE CUR_PROG_CD END)
				,BEF_LOAD_LOC = CUR_LOAD_LOC
				,CUR_LOAD_LOC = 'A0'
				,ORD_NO = ''
				,ORD_SEQ = ''
				,PLT_TRS_CAR_NO=''
				,ORD_FL = '2'
			    ,MILL_SCH_STAT = ''	 
			    ,SLAB_RTURN = ?         
		  WHERE SLAB_NO          = ? 
        ]]>
	</query>
	<query id="UIG040700_SLAB_CHF.update" desc="     " fetchSize="10">
        <![CDATA[
          UPDATE TBG02_SLAB_COMM T
   SET T.MATRL_END_CAUSE_CD = '',
       T.MATRL_END_DTIME    = '',
       T.SLAB_STAT          = '4',
       T.BEF_PROG_CD=T.CUR_PROG_CD,
       T.CUR_PROG_CD = '',
       T.CUR_PROG_CD_PGM = 'ErrorSalbChekCHF',
       T.CUR_PROG_CD_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'),
       T.CUR_LOAD_LOC       = 'A0',
       T.ORD_NO             = '',
       T.ORD_SEQ            = '',
       T.PLT_TRS_CAR_NO     = '',
       T.ORD_FL             = '2',
       T.MILL_SCH_STAT      = '',
       T.SLAB_RTURN         = ?
 WHERE SLAB_NO = ?
        ]]>
	</query>
	<query id="UIG040700_CHF_YARD.update" desc="     " fetchSize="10">
        <![CDATA[
          UPDATE TBG04_SLAB_YARD T 
          SET T.SLAB_NO='',
              T.REG_ID='',
              T.REG_DTIME ='' WHERE T.SLAB_NO=?
        ]]>
	</query>

	<query id="UIG040700_SLAB_ZHK.update" desc="     " fetchSize="10">
        <![CDATA[
          UPDATE TBG02_SLAB_COMM T
   SET T.MATRL_END_CAUSE_CD = '',
       T.MATRL_END_DTIME    = '',
       T.SLAB_STAT          = '5',
       T.BEF_PROG_CD=T.CUR_PROG_CD,
       T.CUR_PROG_CD = '',
       T.CUR_LOAD_LOC       = 'A0',
       T.ORD_NO             = '',
       T.ORD_SEQ            = '',
       T.PLT_TRS_CAR_NO     = '',
       T.ORD_FL             = '2',
       T.MILL_SCH_STAT      = '',
       T.SLAB_RTURN         = ?
 WHERE SLAB_NO = ?
        ]]>
	</query>
</queryMap>