XinYu_RZMES/classes/query/B/B02/UIB020060-query.xml

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="钢卷号成分实绩录入">
	
  <query id="UIB020060_01.INITSELECT" desc="TBH02_COIL_COMM 钢卷号" fetchSize="10">   
        <![CDATA[
		  SELECT          DISTINCT  
          COIL_NO         LABEL
        , COIL_NO         VALUE 
          FROM            TBH02_COIL_COMM
          WHERE           INGR_COIL_TP   =  'Y'  --订单有要求的（需要钢卷成分）
		  ORDER BY 	      COIL_NO
        ]]>   
  </query> 
  
   <query id="UIB020060_01.SELECT" desc="TBH02_COIL_COMM 钢卷相关信息" fetchSize="10">  
        <![CDATA[	
           SELECT    SLAB_NO                   --板坯号
			         ,ORD_NO||ORD_SEQ ORD_NO   --订单
			         ,SPEC_ABBSYM              --标准号
			         ,ORD_USE_CD               --订单用途
		   FROM      TBH02_COIL_COMM 
		   WHERE     COIL_NO = ?
        ]]>   
   </query> 
   
	<query id="UIB020060_02.SELECT" 
		desc="在TBB02_WORK_INGR中，炉次号和钢卷号共存。若PROC_CD = 'CO'，则CHARGE_NO表示的是钢卷号， 否则表示炉次号">
			SELECT         DISTINCT 
			 'N' CHK 
			, CHARGE_NO     COIL_NO     --钢卷号，非炉次号
			, CHEM_SEQ                  --次数
			FROM            TBB02_WORK_INGR t 
			WHERE           PROC_CD = 'CO'
		    AND             t.CHARGE_NO = ?
	</query>
   
     <query id="UIB020060_03.SELECT" desc="钢卷成分单一元素" fetchSize="10">  
        <![CDATA[	
        SELECT              SSS.*
	    FROM                TBB01_SEQ_INGR  SIN
        , (
        SELECT                OI.CHEM_CD
                            , OI.CHEM_MIN
                            , OI.CHEM_MAX
                            , WI.CHEM_VAL  
                            , decode(WI.CHEM_CD , null , 'Y' ) EX
        FROM                  TBB01_ORD_INGR  OI  LEFT JOIN  TBB02_WORK_INGR  WI 
        ON                    (OI.CHEM_CD    =  WI.CHEM_CD)
        AND                   WI.PROC_CD            =    'CO'
        AND                   WI.CHARGE_NO          =    ?
        AND                   WI.CHEM_SEQ           =    ?
        WHERE                 OI.ORD_NO||OI.ORD_SEQ =    ?     --合同号
        AND                   OI.DSN_KIND           =    '2'   --'2'表示标准    
        ) SSS
        WHERE SIN.CHEM_CD     =    SSS.CHEM_CD                   
        AND   SIN.COMP_YN     =    'N'
        ORDER BY SIN.DISPLAY_SEQ
        ]]>   
   </query> 
   
     <query id="UIB020060_04.SELECT" desc="钢卷成分复合元素" fetchSize="10">  
        <![CDATA[	
	    SELECT              SSS.* , SIN.COMP_DETAIL , SIN.COMP_CAL
	    FROM                TBB01_SEQ_INGR  SIN
        , (
        SELECT                OI.CHEM_CD
                            , OI.CHEM_MIN
                            , OI.CHEM_MAX
                            , WI.CHEM_VAL  
                            , decode(WI.CHEM_CD , null , 'Y' ) EX
        FROM                  TBB01_ORD_INGR  OI  LEFT JOIN  TBB02_WORK_INGR  WI 
        ON                    (OI.CHEM_CD    =  WI.CHEM_CD)
        AND                   WI.PROC_CD            =    'CO'
        AND                   WI.CHARGE_NO          =    ?
        AND                   WI.CHEM_SEQ           =    ?
        WHERE                 OI.ORD_NO||OI.ORD_SEQ =    ?     --合同号
        AND                   OI.DSN_KIND           =    '2'   --'2'表示标准    
        ) SSS
        WHERE SIN.CHEM_CD     =    SSS.CHEM_CD                   
        AND   SIN.COMP_YN     =    'Y'
        ORDER BY SIN.DISPLAY_SEQ
        ]]>   
   </query> 
   
   <query id="UIB020060_01.UPDATE" desc="更新钢卷号实绩">
	   UPDATE        TBB02_WORK_INGR
		SET           CHEM_VAL     = ?
	                , CHEM_VAL_TP  = 'P'  --'P'表示更新的钢卷的信息
	                , MOD_ID       = ?
	                , MOD_DTIME    = to_char(sysdate , 'YYYYMMDDHH24MISS')
		WHERE         CHARGE_NO = ?       --钢卷号
		AND           PROC_CD   = 'CO'
		AND           CHEM_SEQ  = ?
		AND           CHEM_CD   = ?
   </query>
 
	<query id="UIB020060_01.INSERT" desc="插入钢卷号、次数及实绩">
		INSERT   INTO  TBB02_WORK_INGR(
							CHARGE_NO 
						  , PROC_CD 
		                  , CHEM_SEQ 
		                  , CHEM_CD 
		                  , CHEM_VAL
		                  , CHEM_VAL_TP 
		                  , REG_ID
		                  , REG_DTIME
		                     )
		VALUES(?,'CO',?,?,?,'P',?,to_char(sysdate , 'YYYYMMDDHH24MISS'))     --'P'表示钢卷，CO表示为钢卷号
	</query>
	
	<query id="UIB020060_01.DELETE" desc="删除">
		DELETE    FROM TBB02_WORK_INGR
		WHERE     CHARGE_NO = ?
		AND       PROC_CD   = 'CO'
		AND       CHEM_SEQ  = ?
	</query>
	
</queryMap>