XinYu_LZMES/.svn/pristine/3f/3fde16b4a4b697dfedd2d2486bc9cfd06df4b004.svn-base

<?xml version="1.0" encoding='UTF-8'?>

<queryMap desc="检验结果录入">


<query id="UIB100220_01.INITSELECT" desc="材质代码与材质名称">
	SELECT  T.QLTY_CD , T.QLTY_CD_CFNM  FROM TBB10_QLTY_CD T
</query>

<query id="UIB100220_01.SELECT" desc="查询中厚板">
<![CDATA[	
	SELECT       T1.SMP_NO
                ,T1.SMP_CUT_LOC
                ,T1.SMP_MOLD_TYPE
                ,T1.SMP_NO_TYPE
                ,T1.SMP_PICK_TYPE
                ,T1.MATERIAL_NO
                ,T1.SMP_STEEL_NO
                ,T1.EXAMORG_CD 
                ,T1.SPEC_STL_GRD
                ,T1.WEITO_NO
                ,T1.WEITO_DTIME
                ,T1.MATERIAL_THK
                ,T1.SEND_STAT
                ,T1.SEND_ID
                ,T1.SEND_DTIME
                ,DECODE('C' , 'C' , '试样检验待机' , 'D' , '试样判定待机' , 'E' , '试样判定完成' , 'ERROR')    SMP_PROG_CD
                ,JHY_QLTY_BASE.F_GET_SMP_STATS(T1.SMP_NO , T1.SMP_CUT_LOC , T1.SMP_NO_TYPE , 'LX' )          WORK_STATS 
    FROM         TBB10_QLTY_MAT             T1  
    WHERE        T1.PROD_LINE               =                 ?   
    AND          INSTR(T1.TRIAL_ADDRESS   , ?  )      >       0
    AND          DECODE(? , 'LX' ,  SUBSTR(T1.SEND_STAT , 1,1) , 'JX' ,  SUBSTR(T1.SEND_STAT , 2,1) ,'全部' ) = NVL(? , '全部')
    AND          T1.WEITO_DTIME             BETWEEN           ?      AND     ?
	  ]]>
</query>

<query id="UIB100220_01_01.SELECT"  desc="查询冷轧、热轧">
    SELECT       T1.SMP_NO
                ,T1.SMP_CUT_LOC
                ,T1.SMP_MOLD_TYPE
                ,T1.SMP_NO_TYPE
                ,T1.SMP_PICK_TYPE
                ,T1.MATERIAL_NO
                ,T1.SMP_STEEL_NO
                ,T1.EXAMORG_CD 
                ,T1.SPEC_STL_GRD
                ,T1.WEITO_NO
                ,T1.WEITO_DTIME
                ,T1.MATERIAL_THK
                ,T1.SEND_STAT
                ,T1.SEND_ID
                ,T1.SEND_DTIME
                ,DECODE(T2.SMP_PROG_CD , 'C' , '试样检验待机' , 'D' , '试样判定待机' , 'E' , '试样判定完成' , 'ERROR' )    SMP_PROG_CD
                ,JHY_QLTY_BASE.F_GET_SMP_STATS(T1.SMP_NO , T1.SMP_CUT_LOC , T1.SMP_NO_TYPE , 'LX' )                      WORK_STATS 
    FROM         TBB10_QLTY_MAT             T1  
                ,TBB02_LOT_COM@XG3Q         T2 
    WHERE        T1.SMP_NO                  =             T2.SMP_NO
    AND          T1.SMP_CUT_LOC             =             T2.SMP_CUT_LOC
    AND          T1.PROD_LINE               =                    ?   
    AND          INSTR(T1.TRIAL_ADDRESS   , ?  )      >          0
    AND          DECODE(? , 'LX' ,  SUBSTR(T1.SEND_STAT , 1,1) , 'JX' ,  SUBSTR(T1.SEND_STAT , 2,1) ,'全部' ) = NVL(? , '全部')
    AND          T1.WEITO_DTIME             BETWEEN              ?    AND   ?
</query>

<query id="UIB100220_02.SELECT" desc="获取所有检验项目">
<![CDATA[
          SELECT      DISTINCT
                      T3.QLTY_CD_3 
                     ,T3.QLTY_CD_3_NM 
                     ,T3.QLTY_CD_2
                     ,T3.DISPLAY_SEQ
          FROM        TBB10_QLTY_OPE    T1  
                     ,TBB10_QLTY_MAT    T2
                     ,TBB10_QLTY_CD     T3
          WHERE       T1.SMP_NO         =         T2.SMP_NO
          AND         T1.SMP_CUT_LOC    =         T2.SMP_CUT_LOC
          AND         T1.QLTY_CD        =         T3.QLTY_CD
          AND         T3.QLTY_CD_3 IS NOT NULL
          AND         T1.QLTY_CD_1      =         NVL(? , T1.QLTY_CD_1)
          AND         T2.WEITO_NO       =         ?
          ORDER BY    T3.DISPLAY_SEQ
	  ]]>          
</query>

<query id="UIB100220_03.SELECT" desc="获取检验代码，在JAVA代码UIB100220中被调用">
		    SELECT         T.QLTY_OPE_CD
	                      ,T.QLTY_DIS_SEQ
	                      ,T.QLTY_OPE_CFNM
	        FROM           TBB10_QLTY_TMPL    T
	        WHERE          T.QLTY_CD_2        LIKE     ?||'%'
	        ORDER BY       T.QLTY_DIS_SEQ
</query>
	

<query id="UIB100220_04.SELECT" desc="纵转横">
SELECT        Q2.QLTY_CD_CFNM
             ,Q2.MATERIAL_NO
             ,Q2.MATERIAL_THK
             ,Q2.SMP_STEEL_NO
             ,Q2.QLTY_CD_3
             ,Q2.QLTY_CD 
             ,Q2.QLTY_MIN 
             ,Q2.QLTY_MAX 
             ,Q2.QLTY_VAL
             ,Q2.QLTY_DCS_RST
             ,Q1.* 
FROM         (SELECT    T1.SMP_NO
                       ,T1.SMP_CUT_LOC
                       ,T1.SMP_NO_TYPE
                       ,T1.QLTY_CD_2
                       ,T2.SPEC_STL_GRD
                        {1}
              FROM      TBB10_QLTY_OPE   T1 ,  TBB10_QLTY_MAT     T2
              WHERE     T1.SMP_NO        =     T2.SMP_NO
              AND       T1.SMP_CUT_LOC   =     T2.SMP_CUT_LOC
              AND       T1.SMP_NO_TYPE   =     T2.SMP_NO_TYPE
              AND       T2.WEITO_NO      =     ?
              AND       T1.QLTY_CD_2     =     ?
              GROUP BY  T1.SMP_NO  ,T1.SMP_CUT_LOC  ,T1.SMP_NO_TYPE ,T1.QLTY_CD_2 ,T2.SPEC_STL_GRD 
              )    Q1  
            ,(SELECT    X1.* , X2.QLTY_CD_CFNM  , X3.MATERIAL_NO , X3.MATERIAL_THK 
                       ,X3.SMP_STEEL_NO 
                       ,X2.QLTY_CD_3
              FROM      TBB10_QLTY_OPE X1 , TBB10_QLTY_CD X2  , TBB10_QLTY_MAT X3
              WHERE     X1.QLTY_CD_2     =     X2.QLTY_CD_2
              AND       X1.QLTY_CD       =     X2.QLTY_CD
              AND       X1.SMP_NO        =     X3.SMP_NO
              AND       X1.SMP_CUT_LOC   =     X3.SMP_CUT_LOC
              AND       X1.SMP_NO_TYPE   =     X3.SMP_NO_TYPE
              AND       X3.WEITO_NO      =     ?
              AND       X1.QLTY_CD_2     =     ?
              AND       X2.QLTY_CD_3     =     ?
              AND       X1.QLTY_CD	     =     NVL(? , X1.QLTY_CD)
              )    Q2
WHERE         Q1.SMP_NO       =   Q2.SMP_NO
AND           Q1.SMP_CUT_LOC  =   Q2.SMP_CUT_LOC
AND           Q1.SMP_NO_TYPE  =   Q2.SMP_NO_TYPE
AND           Q1.QLTY_CD_2    =   Q2.QLTY_CD_2
ORDER BY      Q2.SMP_STEEL_NO , Q2.MATERIAL_NO
</query>

<query id= "UIB100220_05.SELECT"  desc="需要录入的过程项目">
            SELECT   TT.* 
                   /* ,LEAD(TT.COMP_CAL , 1 , NULL) OVER(ORDER BY TT.QLTY_DIS_SEQ)    NEXT_COMP_CAL
                    ,LEAD(TT.QLTY_OPE_CD , 1 , NULL) OVER(ORDER BY TT.QLTY_DIS_SEQ)   NEXT_OPE_CD
                    ,LEAD(TT.QLTY_DIS_LEN , 1 , NULL) OVER(ORDER BY TT.QLTY_DIS_SEQ)  NEXT_DIS_LEN
                    ,LEAD(TT.CRCT_REG , 1 , NULL) OVER(ORDER BY TT.QLTY_DIS_SEQ)      NEXT_CRCT_REG
                   */
            FROM    (
		            SELECT      DISTINCT
		                        T2.QLTY_OPE_CFNM
					           ,T2.QLTY_OPE_CD
					           ,DECODE(? , 'L' , '' , T2.COMP_CAL)  COMP_CAL   --连退和热轧区分
					           ,T2.QLTY_DIS_LEN
					           ,T2.CRCT_REG
					           ,T2.QLTY_DIS_SEQ
					           ,T1.QLTY_VAL
					           ,T1.EDIT_TP
					           ,T1.QLTY_DCS_RST
					           ,T1.QLTY_CD
					FROM        TBB10_QLTY_OPE     T1
					           ,TBB10_QLTY_TMPL    T2
					WHERE       T1.QLTY_OPE_CD     =     T2.QLTY_OPE_CD
					AND         T1.QLTY_CD_2       =     T2.QLTY_CD_2
		            AND         T1.SMP_NO          =     ?
		            AND         T1.SMP_CUT_LOC     =     ?
		            AND         T1.SMP_NO_TYPE     =     ?
		            AND         INSTR(T2.QLTY_OPE_GRP ,  NVL(? , T2.QLTY_OPE_GRP) ) >  0
		            AND         T2.QLTY_CD_2       =     ?
                    )  TT
           ORDER  BY   TT.QLTY_DIS_SEQ
</query>

<query id="UIB100220_06.SELECT">
<![CDATA[
SELECT      T2.MATERIAL_NO 
           ,T1.QLTY_CD
           ,T1.QLTY_VAL
           ,JHY_QLTY_OPE.F_GET_QLTY_VAL(T1.SMP_NO , T1.SMP_CUT_LOC , T1.SMP_NO_TYPE , T1.QLTY_CD_1 , T1.QLTY_CD_2 , 'A1') QLTY_VAL_1
           ,JHY_QLTY_OPE.F_GET_QLTY_VAL(T1.SMP_NO , T1.SMP_CUT_LOC , T1.SMP_NO_TYPE , T1.QLTY_CD_1 , T1.QLTY_CD_2 , 'A2') QLTY_VAL_2
           ,JHY_QLTY_OPE.F_GET_QLTY_VAL(T1.SMP_NO , T1.SMP_CUT_LOC , T1.SMP_NO_TYPE , T1.QLTY_CD_1 , T1.QLTY_CD_2 , 'A3') QLTY_VAL_3 	
           ,T1.QLTY_MIN
           ,T1.QLTY_MAX
           ,T1.SMP_RMK
           ,T1.QLTY_CD_AFTER  
           ,T1.QLTY_VAL
           ,T1.SMP_NO_TYPE
           ,T2.MATERIAL_THK
           ,T2.SPEC_STL_GRD
           ,T1.REG_ID
           ,T1.REG_DTIME
           ,T1.SEND_DTIME
           ,T1.SEND_ID
           ,T1.EQUMT_ID
           ,T2.SMP_STEEL_NO
FROM        TBB10_QLTY_OPE      T1  
           ,TBB10_QLTY_MAT      T2
WHERE       T1.SMP_NO           =         T2.SMP_NO
AND         T1.SMP_CUT_LOC      =         T2.SMP_CUT_LOC
AND         T1.QLTY_CD  IS  NOT  NULL 
AND         T1.QLTY_CD         !=         'ARER'
AND         T1.SMP_NO_TYPE      =         T2.SMP_NO_TYPE
AND         T1.QLTY_CD_1        =         NVL(? , T1.QLTY_CD_1)
AND         T2.WEITO_NO         =         ?        
AND         T2.MATERIAL_NO      LIKE      ?||'%'
ORDER BY    T2.SMP_STEEL_NO , T2.MATERIAL_NO , T2.SMP_NO_TYPE
	  ]]>     
</query>

<query id="UIB100220_07.SELECT"  desc="具体项目名称和编码">
SELECT     T3.QLTY_CD_CFNM
          ,T3.QLTY_CD
          ,T3.QLTY_CD_2
          ,T3.QLTY_CD_3
FROM       TBB10_QLTY_OPE   T1 ,  TBB10_QLTY_MAT     T2   ,   TBB10_QLTY_CD   T3
WHERE      T1.SMP_NO        =     T2.SMP_NO
AND        T1.SMP_CUT_LOC   =     T2.SMP_CUT_LOC
AND        T1.SMP_NO_TYPE   =     T2.SMP_NO_TYPE
AND        T1.QLTY_CD       =     T3.QLTY_CD
AND        T1.QLTY_CD_2     =     T3.QLTY_CD_2
AND        T1.QLTY_CD_2     =     ? 
AND        T3.QLTY_CD_3     =     ?
AND        T2.WEITO_NO      =     ?
GROUP BY   T3.QLTY_CD_CFNM
          ,T3.QLTY_CD_2
          ,T3.QLTY_CD_3
          ,T3.QLTY_CD
</query>

<query id="UIB100220_08.SELECT"  desc="基本信息">
<![CDATA[
SELECT       T.MATERIAL_NO
            ,T.SMP_NO
            ,T.SMP_CUT_LOC
            ,T.SMP_NO_TYPE
            ,T.SMP_MOLD_TYPE
            ,T.SMP_PICK_TYPE
            ,T.SPEC_STL_GRD
            ,T.MATERIAL_THK
            ,T.SMP_ID
            ,T.PRDNM_CD
            ,T.EXAMORG_CD
            ,T.RMK_1
            ,T.RMK_2
            ,T.REG_ID
            ,T.REG_DTIME
FROM         TBB10_QLTY_MAT                    T
WHERE        INSTR(T.TRIAL_ADDRESS , ? )       >    0
AND          T.WEITO_NO                        =    ?
	  ]]>    
</query>

<query id="UIB100220_01.EXPORT.SELECT" desc="拉力及弯曲原始记录导出">
      SELECT      T2.SMP_STEEL_NO
                 ,''''||T2.SPEC_STL_GRD  SPEC_STL_GRD
                 ,T2.MATERIAL_NO
                 ,T2.MATERIAL_THK
                 ,T2.SMP_NO_TYPE
                 ,MAX(DECODE(T1.QLTY_OPE_CD , 'a' ,  T1.QLTY_VAL ,NULL )) LA
                 ,MAX(DECODE(T1.QLTY_OPE_CD , 'b' ,  T1.QLTY_VAL ,NULL )) LB
                 ,MAX(DECODE(T1.QLTY_OPE_CD , 'Fe' , T1.QLTY_VAL ,NULL )) FE
                 ,MAX(DECODE(T1.QLTY_OPE_CD , 'Fm' ,  T1.QLTY_VAL ,NULL )) FM
                 ,MAX(DECODE(T1.QLTY_OPE_CD , 'Lo' ,  T1.QLTY_VAL ,NULL )) LO
                 ,MAX(DECODE(T1.QLTY_OPE_CD , 'Lu' ,  T1.QLTY_VAL ,NULL )) LU
                 ,MAX(DECODE(T1.QLTY_OPE_CD , 'ZJ' ,  T1.QLTY_VAL ,NULL )) ZJ
                 ,MAX(DECODE(T1.QLTY_OPE_CD , 'CB' ,  T1.QLTY_VAL ,NULL )) CB
      FROM        TBB10_QLTY_OPE  T1, TBB10_QLTY_MAT T2 
      WHERE       T1.SMP_NO       =       T2.SMP_NO
      AND         T1.SMP_CUT_LOC  =       T2.SMP_CUT_LOC
      AND         T1.SMP_NO_TYPE  =       T2.SMP_NO_TYPE
      AND         T1.QLTY_CD_2    IN(     'LL' , 'CB')
      AND         INSTR(?  , T2.MATERIAL_NO) > 0 
      AND         INSTR(?  , T2.WEITO_NO) > 0
      GROUP BY    T2.SMP_STEEL_NO
                 ,T2.SPEC_STL_GRD
                 ,T2.MATERIAL_NO
                 ,T2.MATERIAL_THK
                 ,T2.SMP_NO_TYPE
      ORDER BY    T2.SMP_STEEL_NO
</query>

<query id="UIB100220_02.EXPORT.SELECT" desc="冲击导出">
		SELECT      T2.SMP_STEEL_NO
		           ,T2.SPEC_STL_GRD
		           ,T2.MATERIAL_NO
		           ,T2.MATERIAL_THK
		           ,MAX(DECODE(T1.QLTY_OPE_CD , 'A1' ,  T1.QLTY_VAL ,NULL ))   A1
		           ,MAX(DECODE(T1.QLTY_OPE_CD , 'A2' ,  T1.QLTY_VAL ,NULL ))   A2
		           ,MAX(DECODE(T1.QLTY_OPE_CD , 'A3' ,  T1.QLTY_VAL ,NULL ))   A3
		FROM        TBB10_QLTY_OPE  T1, TBB10_QLTY_MAT T2 
		WHERE       T1.SMP_NO       =       T2.SMP_NO
		AND         T1.SMP_CUT_LOC  =       T2.SMP_CUT_LOC
		AND         T1.SMP_NO_TYPE  =       T2.SMP_NO_TYPE
		AND         T1.QLTY_CD_2    IN      ('PC' ,'SC')
		AND         INSTR(?  , T2.MATERIAL_NO)  > 0 
		AND         INSTR(?  , T2.WEITO_NO) > 0
		GROUP BY    T2.SMP_STEEL_NO
		           ,T2.SPEC_STL_GRD
		           ,T2.MATERIAL_NO
		           ,T2.MATERIAL_THK
		ORDER BY    T2.SMP_STEEL_NO
</query>

<query id="UIB100220_01.UPDATE" desc="备注和设备编号">
<![CDATA[
UPDATE       TBB10_QLTY_MAT          T
SET          T.RMK_1                 =         ?
            ,T.RMK_2                 =         ?
WHERE        T.SMP_NO                =         ?
AND          T.SMP_CUT_LOC           =         ?
AND          T.SMP_NO_TYPE           =         ?
	  ]]>    
</query>


<query id="UIB100220_02.UPDATE" desc="委托编号变更">
           UPDATE     TBB10_QLTY_MAT      T
		   SET        T.WEITO_NO          =      ?
		   WHERE      T.WEITO_NO          =      ?
</query>


<query id="UIB100203_01.CALL" desc="原始数据保存">
	{call JHY_QLTY_OPE.SAVE_WORK_VAL(?,?,?,?,?,?,?,?,?,?,?,?)}
</query>

<query id="UIB100203_02.CALL" desc="项目编码变更，如Rp，Rel等">
	{call JHY_QLTY_OPE.SAVE_CHGE_CDS(?,?,?,?,?,?,?)}
</query>
		
<query id="UIB100203_03.CALL" desc="钢印号变更">
	{call JHY_QLTY_OPE.SAVE_STEEL_NO(?,?,?,?,?,?)}
</query>
		
<query id="UIB100203_04.CALL" desc="发送">
	{call JHY_QLTY_OPE.SEND_WORK_VAL(?,?,?,?,?,?)}
</query>

</queryMap>