XinYu_RZMES/.svn/pristine/63/6329cc61a717b75aca904679421c23b131345f3a.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="STEEL MAKING QUERY ">
	<query id="UIG040047_ORD_LIST.select" desc=" 行车命令查询 " fetchSize="10">
		<![CDATA[
	     	SELECT ''CHK
             ,SEQ_NO
             ,ORD_TYPE
             ,ORD_STAT
             ,CR_NO
             ,ROLL_SEQ
             ,ORD_SLAB_NO1
             ,FROM_ADDR
             ,TO_ADDR
             ,REG_DTIME
             ,ORD_DTIME 
         FROM TBG04_SLAB_CRANE_ORDER T 
              ,(SELECT A.ROLL_MANA_NO||'-'||A.ROLL_SLAB_SEQ ROLL_SEQ, -- 轧辊内顺序
     A.SLAB_NO -- 板坯号
  FROM TBF02_SPEC_MILL A
 WHERE '1' = '1'
   AND A.STATUS_CD IN ('A', 'B')) B--处于指示和作业
      WHERE '1' = '1'
      AND   T.ORD_SLAB_NO1 = B.SLAB_NO(+)
			AND   T.ORD_TYPE LIKE ?||'%'
			AND   T.REG_DTIME BETWEEN NVL(?,'10000000000000') AND NVL(?,'30000000000000')
			AND   NVL(T.ORD_DTIME,TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')) BETWEEN NVL(?,'10000000000000') AND NVL(?,'30000000000000')
			AND   T.ORD_STAT LIKE ?||'%'
			AND   T.CR_NO LIKE ?||'%'
			AND   T.ORD_SLAB_NO1 LIKE ?||'%'
			ORDER BY T.SEQ_NO,B.ROLL_SEQ 
		]]>
	</query>
	<query id="UIG040047_ORD_LIST_02.select" desc=" 行车命令查询 " fetchSize="10">
		<![CDATA[
	     	SELECT A.ROLL_MANA_NO||'-'||A.ROLL_SLAB_SEQ ROLL_SEQ-- 轧辊内顺序
       ,A.SLAB_NO -- 板坯号
       ,''CHK
             ,SEQ_NO
             ,ORD_TYPE
             ,ORD_STAT
             ,CR_NO
             ,ORD_SLAB_NO1
             ,FROM_ADDR
             ,TO_ADDR
             ,B.REG_DTIME
             ,ORD_DTIME
FROM TBF02_SPEC_MILL A
       ,TBG04_SLAB_CRANE_ORDER B
 WHERE '1' = '1'
   AND A.SLAB_NO = B.ORD_SLAB_NO1(+)
   AND A.STATUS_CD IN ('A', 'B') --处于指示和作业
   AND ROLL_MANA_NO = ?
   AND NVL(B.ORD_STAT,'4') <> '3'           
ORDER BY A.ROLL_MANA_NO,A.ROLL_SLAB_SEQ
		]]>
	</query>
	<query id="UIG040047_ADDR_ORD.select" desc=" 行车命令涉及的垛位情况查询  " fetchSize="10">
		<![CDATA[
	     	SELECT '' CHK
	     		   ,A.YARD_ADDR
	     		   ,A.STORELAY
	     		   ,A.SLAB_NO
	     		   ,B.SLAB_THK
	     		   ,B.SLAB_WTH
	     		   ,B.SLAB_LEN
	     		   ,B.SLAB_WGT
	     		   ,B.STL_GRD
	     		   ,B.HCR_CLF
	     		   ,A.ORD_FLAG
	     		   ,C.SEQ_NO
		    FROM TBG02_SLAB_COMM B
		    	 ,TBG04_SLAB_YARD A
		         ,(SELECT SEQ_NO,FROM_ADDR,ORD_SLAB_NO1 FROM TBG04_SLAB_CRANE_ORDER WHERE ORD_STAT = '1') C
		    WHERE A.SLAB_NO = B.SLAB_NO(+)
		    AND   A.SLAB_NO = C.ORD_SLAB_NO1(+)
		    AND   A.YARD_ADDR = C.FROM_ADDR(+)
		    AND   A.YARD_ADDR = ?
		    ORDER BY A.STORELAY DESC
		]]>
	</query> 
	<query id="UIG040047_USABLE_CRORD.select" desc=" 行车命令涉及的垛位可执行情况检查  " fetchSize="10">
		<![CDATA[
	     	SELECT b.YARD_ADDR,b.STORELAY,b.SLAB_NO
			FROM
			    (
			       SELECT  YARD_ADDR
			               ,max(case when STORELAY < 10 then '0'||STORELAY else   STORELAY  end) STORELAY 
			       FROM 
			           (
			               select yard_addr,MAX(storelay)STORELAY
			               from tbg04_slab_yard a
			               where A.SLAB_NO IS NOT NULL 
			               AND  a.YARD_ADDR = ?
			               GROUP BY A.YARD_ADDR
			           )       
			       group by YARD_ADDR 
			    ) a,
			    (
			       SELECT YARD_ADDR ,STORELAY,SLAB_NO 
			       FROM TBG04_SLAB_YARD
			       where SLAB_NO IS NOT NULL 
			       AND  YARD_ADDR = ?  
			    ) b 
			WHERE a.STORELAY  =  b.STORELAY 
			AND   a.YARD_ADDR  = b.YARD_ADDR 
			AND   B.SLAB_NO = ?
			UNION ALL
			SELECT 	D.YARD_ADDR,D.STORELAY,D.SLAB_NO 
			FROM 	TBG04_SLAB_YARD D
			WHERE 	D.SLAB_NO IS NOT NULL 
			AND   	D.ORD_FLAG IS NOT NULL
			AND   	D.YARD_ADDR = ?
		]]>
	</query>
	<query id="UIG040047_UNEXICUTED_CRORD.select" desc=" 行车命令涉及的垛位可执行情况检查  " fetchSize="10">
		<![CDATA[
	     	SELECT T.SEQ_NO,T.FROM_ADDR,T.TO_ADDR,T.ORD_SLAB_NO1
			FROM TBG04_SLAB_CRANE_ORDER T
			WHERE T.ORD_STAT = '1'
		]]>
	</query>
	<query id="NIG040047_01.CALLSTATEMENT" desc=" 切割计划变更处理 ">
		{call NIG040047(?,?,?,?,?,?,?)}
	</query>
</queryMap>