XinYu_RZMES/classes/query/G/UIG040060-query.xml

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="STEEL MAKING QUERY ">
    <query id="UIG040060_ROLLER_C.select" desc="" fetchSize="10">
        <![CDATA[
    SELECT      seq
             ,YARD_ADDR
             ,YARD_NAME  
             ,SLAB_NO
             ,SLAB_THK
             ,SLAB_WTH
             ,SLAB_LEN
             ,SLAB_WGT
             ,STL_GRD
             ,FROM_ADDR
             ,TO_ADDR
             ,CR_NO
             ,  ORD_SEQ  
             ,ADDR_LEN
             ,MILL_SCH_STAT
             ,BEF_STORE_LOC
    FROM 
   ( SELECT  '1' seq
             ,YARD_ADDR
             ,YARD_NAME  
             ,a.SLAB_NO
             ,SLAB_THK
             ,SLAB_WTH
             ,SLAB_LEN
             ,SLAB_WGT
             ,STL_GRD
             ,b.FROM_ADDR
             ,b.TO_ADDR
             ,b.CR_NO
             ,b.SEQ_NO ORD_SEQ  
             ,ADDR_LEN
             ,MILL_SCH_STAT
             ,'' BEF_STORE_LOC
         FROM 
        (
          SELECT  a.YARD_ADDR  
          ,c.YARD_NAME
           ,b.SLAB_NO
           ,b.SLAB_THK
           ,b.SLAB_WTH
           ,b.SLAB_LEN
           ,b.SLAB_WGT 
           ,b.STL_GRD 
           ,length(a.YARD_ADDR) ADDR_LEN
           ,b.MILL_SCH_STAT
          FROM  TBG04_SLAB_YARD a,
                TBG02_SLAB_COMM b,
                TBG04_STD_SLAB_YARD c 
           WHERE  a.SLAB_NO = b.SLAB_NO(+)   
            AND (SUBSTR(a.YARD_ADDR,1,1) = 'A' OR SUBSTR(a.YARD_ADDR,1,1) = 'C')
            AND a.YARD_ADDR = c.YARD_ADDR
            AND a.YARD_ADDR LIKE 'C0'||'%'  
        ) a,
        (
          SELECT FROM_ADDR,TO_ADDR,ORD_SLAB_NO1,CR_NO,SEQ_NO,ORD_STAT
     
          FROM TBG04_SLAB_CRANE_ORDER
         WHERE (SUBSTR(FROM_ADDR,1,1) = 'A' OR SUBSTR(FROM_ADDR,1,1) = 'C')
           AND FROM_ADDR LIKE 'C0'||'%'
           AND (ORD_STAT IS NULL OR ORD_STAT = '1')
        ) b
        WHERE a.SLAB_NO = b.ORD_SLAB_NO1(+)   
          AND (ORD_STAT IS NULL OR  ORD_STAT = '1')
          AND  a.YARD_ADDR =  b.FROM_ADDR(+)  
          ORDER BY  YARD_ADDR  
    ) 
    
    
   UNION   
     SELECT   seq
             ,YARD_ADDR
             ,YARD_NAME  
             , SLAB_NO
             ,SLAB_THK
             ,SLAB_WTH
             ,SLAB_LEN
             ,SLAB_WGT
             ,STL_GRD
             , FROM_ADDR
             , TO_ADDR
             , CR_NO
             ,  ORD_SEQ
             ,ADDR_LEN
             ,MILL_SCH_STAT
             ,BEF_STORE_LOC
       from
      (SELECT DECODE(YARD_ADDR,'C12','2','C11','3','C10','4','C9','5','C8','6','C7','7') SEQ 
             , YARD_ADDR
             ,YARD_NAME  
             ,a.SLAB_NO
             ,SLAB_THK
             ,SLAB_WTH
             ,SLAB_LEN
             ,SLAB_WGT
             ,STL_GRD
             ,b.FROM_ADDR
             ,b.TO_ADDR
             ,b.CR_NO
             ,b.SEQ_NO ORD_SEQ
             ,ADDR_LEN
             ,MILL_SCH_STAT
             ,BEF_STORE_LOC
         FROM 
        (
          SELECT  a.YARD_ADDR  
          ,c.YARD_NAME
           ,b.SLAB_NO
           ,b.SLAB_THK
           ,b.SLAB_WTH
           ,b.SLAB_LEN
           ,b.SLAB_WGT 
           ,b.STL_GRD
           ,length(a.YARD_ADDR) ADDR_LEN
           ,b.MILL_SCH_STAT
           ,substr(a.BEF_STORE_LOC,1,1) BEF_STORE_LOC
          FROM  TBG04_SLAB_YARD a,
                TBG02_SLAB_COMM b,
                TBG04_STD_SLAB_YARD c 
           WHERE  a.SLAB_NO = b.SLAB_NO(+)   
            AND (SUBSTR(a.YARD_ADDR,1,1) = 'A' OR SUBSTR(a.YARD_ADDR,1,1) = 'C')
            AND a.YARD_ADDR = c.YARD_ADDR
            AND SUBSTR(a.YARD_ADDR,1,2) > 'C0'||'%' 
            AND SUBSTR(a.YARD_ADDR,1,2) < 'CA'||'%'   
        ) a,
        (
          SELECT FROM_ADDR,TO_ADDR,ORD_SLAB_NO1,CR_NO,SEQ_NO,ORD_STAT
     
          FROM TBG04_SLAB_CRANE_ORDER
         WHERE (SUBSTR(FROM_ADDR,1,1) = 'A' OR SUBSTR(FROM_ADDR,1,1) = 'C')
           AND SUBSTR(FROM_ADDR,1,2) > 'C0'||'%'
           AND SUBSTR(FROM_ADDR,1,2) < 'CA'||'%'
           AND (ORD_STAT IS NULL OR ORD_STAT = '1')
        ) b
        WHERE a.SLAB_NO = b.ORD_SLAB_NO1(+)   
          AND (ORD_STAT IS NULL OR  ORD_STAT = '1')
          AND  a.YARD_ADDR =  b.FROM_ADDR(+)  
        
      )
      ORDER BY SEQ
    
        ]]>
    </query> 
    <query id="UIG040060_ROLLER_A.select" desc="" fetchSize="10">
        <![CDATA[
       SELECT    
              YARD_ADDR
             ,YARD_NAME  
             ,a.SLAB_NO
             ,SLAB_THK
             ,SLAB_WTH
             ,SLAB_LEN
             ,SLAB_WGT
             ,STL_GRD
             ,b.FROM_ADDR
             ,b.TO_ADDR
             ,b.CR_NO
             ,b.SEQ_NO ORD_SEQ  
             ,ADDR_LEN
             ,BEF_STORE_LOC
             ,MILL_SCH_STAT
         FROM 
        (
          SELECT  a.YARD_ADDR  
          ,c.YARD_NAME
           ,b.SLAB_NO
           ,b.SLAB_THK
           ,b.SLAB_WTH
           ,b.SLAB_LEN
           ,b.SLAB_WGT 
           ,b.STL_GRD 
           ,length(a.YARD_ADDR) ADDR_LEN
           ,SUBSTR(BEF_STORE_LOC,1,1) BEF_STORE_LOC
           ,b.MILL_SCH_STAT
          FROM  TBG04_SLAB_YARD a,
                TBG02_SLAB_COMM b,
                TBG04_STD_SLAB_YARD c 
           WHERE  a.SLAB_NO = b.SLAB_NO(+)   
            AND (SUBSTR(a.YARD_ADDR,1,1) = 'A' OR SUBSTR(a.YARD_ADDR,1,1) = 'C')
            AND a.YARD_ADDR = c.YARD_ADDR
            AND a.YARD_ADDR LIKE 'A'||'%'  
        ) a,
        (
          SELECT FROM_ADDR,TO_ADDR,ORD_SLAB_NO1,CR_NO,SEQ_NO,ORD_STAT
     
          FROM TBG04_SLAB_CRANE_ORDER
         WHERE (SUBSTR(FROM_ADDR,1,1) = 'A' OR SUBSTR(FROM_ADDR,1,1) = 'C')
           AND FROM_ADDR LIKE 'A'||'%'
           AND (ORD_STAT IS NULL OR ORD_STAT = '1')
        ) b
        WHERE a.SLAB_NO = b.ORD_SLAB_NO1(+)   
          AND (ORD_STAT IS NULL OR  ORD_STAT = '1')
          AND  a.YARD_ADDR =  b.FROM_ADDR(+)  
	    ORDER BY  YARD_ADDR		
        ]]>
    </query> 
    
	<query id="UIG040060_CR_ORD.insert" desc=" " fetchSize="10">
		<![CDATA[
		    INSERT INTO TBG04_SLAB_CRANE_ORDER 
		    (
		       SEQ_NO
		      ,CR_NO
		      ,ORD_SLAB_NO1
		      ,FROM_ADDR
		      ,TO_ADDR
		      ,ORD_STAT 
		      ,SLAB_CNT
		      ,REG_ID
		      ,REG_DTIME
		    )
		    VALUES
		    (
		       SLAB_CRANE_ORDER_SEQ.NEXTVAL
		      ,?
		      ,?
		      ,? 
		      ,?
		      ,'1' 
		      ,1
		      ,?
		      ,TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
		    )
		]]>
	</query> 
	 <query id="UIG040060_CR_COMM.update" desc=" " fetchSize="10">
		<![CDATA[
	    UPDATE  TBG04_SLAB_CRANE_ORDER SET 
	        TO_ADDR   = ?
           ,CR_NO     = ?
           ,SLAB_CNT  = 1
           ,REG_ID    = ?
           ,REG_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
	     WHERE  SEQ_NO  =  ? 
		]]>
	</query>
    <query id="UIG040060_STD_YARD.select" desc=" " fetchSize="10">
		<![CDATA[
	     SELECT YARD_ADDR ,FROM_STL_GRD,TO_STL_GRD
	           ,STL_GRD1,STL_GRD2,STL_GRD3,STL_GRD4
	           ,STL_GRD5,STL_GRD6,STL_GRD7,STL_GRD8,STL_GRD9,STL_GRD10
	       FROM TBH05_YARD_STD_STOCK
	      WHERE YARD_KIND = 'S' 
	        AND YARD_ADDR  >= ? 
	        AND YARD_ADDR  <= ? 
		]]>
	</query>  
	<query id="UIG040060_LOAD_YARD.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 
                   , to_char(decode(count(slab_no),0,1,count(slab_no)))  STORELAY   
	           FROM TBG04_SLAB_YARD
	           WHERE   (ORD_FLAG IS NULL OR  ORD_FLAG = '')
	             AND  YARD_ADDR LIKE ?||'%'  
	           group by YARD_ADDR    
	           
	        )       
	        group by YARD_ADDR 
         ) a,
         (
           SELECT YARD_ADDR ,STORELAY,SLAB_NO 
	        FROM TBG04_SLAB_YARD
	        WHERE   (ORD_FLAG IS NULL OR  ORD_FLAG = '')
	          AND  YARD_ADDR LIKE ?||'%'  
	        
     
         ) b 
         WHERE a.STORELAY  =  b.STORELAY 
          AND a.YARD_ADDR  = b.YARD_ADDR 
		]]>
	</query>  
	<query id="UIG040060_YARD_COMMAND.insert" desc="it's selected query  from TBG03_MAINRAW table   " fetchSize="10">
        <![CDATA[
       INSERT INTO TBG04_SLAB_CRANE_ORDER  
       (
          SEQ_NO  
         ,CR_NO
         ,FROM_ADDR
         ,TO_ADDR
         ,ORD_SLAB_NO1
         ,SLAB_CNT
         ,ORD_DTIME
         ,ORD_STAT
       )
       VALUES 
       ( 
          SLAB_CRANE_ORDER_SEQ.NEXTVAL 
         ,?
         ,?
         ,?
         ,?
         ,1
         ,to_char(sysdate,'yyyymmddhh24miss')
         ,'1'  
       )
        ]]>
    </query>   
	<query id="UIG040060_YARD_COMMAND.update" desc="it's selected query  from TBG03_MAINRAW table   " fetchSize="10">
        <![CDATA[
       UPDATE TBG04_SLAB_CRANE_ORDER   SET 
        
          CR_NO           = ?
         ,FROM_ADDR       = ?
         ,TO_ADDR         = ?
         ,ORD_SLAB_NO1    = ?
         ,SLAB_CNT        = 1
         ,ORD_DTIME       = to_char(sysdate,'yyyymmddhh24miss')
         ,ORD_STAT        = '1'
        WHERE SEQ_NO = ? 
        ]]>
    </query>   
    <query id="UIG040060_YARD_LAY.select" desc="it's selected query  from TBG03_MAINRAW table   " fetchSize="10">
        <![CDATA[
        SELECT max(case when STORELAY < 10 then '0'||STORELAY else   STORELAY  end) STORELAY 
 
        FROM
        (
           SELECT  TO_CHAR(DECODE(COUNT(SLAB_NO),0,1,COUNT(SLAB_NO)+1)) STORELAY

             FROM TBG04_SLAB_YARD
            WHERE YARD_ADDR = ?
        )  
        ]]>
    </query>    
    <query id="UIG040060_CR_ORD.select" desc="it's selected query  from TBG03_MAINRAW table   " fetchSize="10">
        <![CDATA[
        SELECT  * 
          FROM TBG04_SLAB_CRANE_ORDER 
         WHERE SEQ_NO = ?
           
        ]]>
    </query>     
     <query id="UIG040060_SLAB_YARD.update" desc=" " fetchSize="10">
		<![CDATA[
	    UPDATE  TBG04_SLAB_YARD SET 
	        ORD_FLAG   = ? 
           ,REG_ID    = ?
           ,REG_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
	     WHERE  SLAB_NO  =  ? 
	      AND   YARD_ADDR = ?
		]]>
	</query>    
	<query id="UIG040060_CR_COMM_DEL.update" desc=" " fetchSize="10">
		<![CDATA[
	    UPDATE  TBG04_SLAB_CRANE_ORDER SET 
	        ORD_STAT   = ? 
           ,REG_ID    = ?
           ,REG_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
	     WHERE  SEQ_NO  =  ? 
		]]>
	</query>
	<query id="UIG040060_COMPLUS_TO_ADDR.select" desc=" " fetchSize="10">
        <![CDATA[ 
     SELECT  
        DECODE(LENGTH(STORELAY),1,'0'||STORELAY ,STORELAY)  STORELAY
     FROM 
     (         
      SELECT  decode(MAX(STORELAY),null,'01','','01', MAX(STORELAY)+1) STORELAY  
         FROM  TBG04_SLAB_YARD 
        WHERE ( SLAB_NO IS NOT NULL OR SLAB_NO = '')
         AND  YARD_ADDR = ?
     )     
			
        ]]>
    </query>
	 
	<query id="UIG040060_COMPLUS_MOVE.update" desc=" " fetchSize="10">
        <![CDATA[
        UPDATE  TBG04_SLAB_YARD SET 
            SLAB_NO   = ? 
           ,REG_ID    = ?
           ,REG_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
		   ,BEF_STORE_LOC = ?
         WHERE  STORELAY  =  ? 
          AND   YARD_ADDR = ?
        ]]>
    </query> 
	 
    <query id="UIG040060_COMPLUS_FROM.update" desc=" " fetchSize="10">
        <![CDATA[
        UPDATE  TBG04_SLAB_YARD SET 
            SLAB_NO   = null 
           ,REG_ID    = null
           ,REG_DTIME = null
         WHERE  STORELAY  =  ? 
          AND   YARD_ADDR = ?
        ]]>
    </query> 
	<query id="UIG040060_COMPLUS_FROM_SLAB_NO.update" desc=" " fetchSize="10">
        <![CDATA[
        UPDATE  TBG04_SLAB_YARD SET 
            SLAB_NO   = null 
           ,REG_ID    = null
           ,REG_DTIME = null
         WHERE  SLAB_NO  =  ? 
        ]]>
    </query>
	<query id="UIG040060_COMPLUS_FROM_02.update" desc=" " fetchSize="10">
        <![CDATA[
        UPDATE  TBG04_SLAB_YARD SET 
            SLAB_NO   = null 
           ,REG_ID    = null
           ,REG_DTIME = null
         WHERE  STORELAY  =  '01' 
          AND   YARD_ADDR = ?
        ]]>
    </query>
    <query id="UIG040060_LOC_01.update" desc=" 板坯入库 更细板坯跺位 以及入库，出库时间 ">
        <![CDATA[
		UPDATE TBG02_SLAB_COMM SET
               CUR_LOAD_LOC = ?
               ,CUR_LOAD_LOC_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
               ,BEF_LOAD_LOC =  CUR_LOAD_LOC
               ,BEF_LOAD_LOC_DTIME  = CUR_LOAD_LOC_DTIME 
               ,HCR_CLF = 'C'  
               ,MILL_SCH_STAT = null  
               ,SLAB_STOCK_ENT_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
			   ,SLAB_STOCK_EXT_DTIME = null
        WHERE SLAB_NO = ?
        ]]>
    </query> 	
	<query id="UIG040060_LOC_02.update" desc=" 板坯入库 更细板坯跺位 以及入库，出库时间 ">
        <![CDATA[
		UPDATE TBG02_SLAB_COMM SET
               CUR_LOAD_LOC = ?
               ,CUR_LOAD_LOC_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
               ,BEF_LOAD_LOC =  CUR_LOAD_LOC
               ,BEF_LOAD_LOC_DTIME  = CUR_LOAD_LOC_DTIME 
               ,HCR_CLF = 'C'  
               ,MILL_SCH_STAT = null  
               ,SMS_YARD_ENT_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
			   ,SMS_YARD_EXT_DTIME = null 
        WHERE SLAB_NO = ?
        ]]>
    </query>
	<query id="UIG040060_LOC_03.update" desc=" 板坯入库 更细板坯跺位 以及入库，出库时间 ">
        <![CDATA[
		UPDATE TBG02_SLAB_COMM SET
               CUR_LOAD_LOC = ?
               ,CUR_LOAD_LOC_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
               ,BEF_LOAD_LOC =  CUR_LOAD_LOC
               ,BEF_LOAD_LOC_DTIME  = CUR_LOAD_LOC_DTIME 
               ,HCR_CLF = 'H'  
               ,MILL_SCH_STAT = null  
               ,SLAB_STOCK_ENT_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') 
			   ,SLAB_STOCK_EXT_DTIME = null
        WHERE SLAB_NO = ?
        ]]>
    </query> 	  
</queryMap>