XinYu_RZMES/.svn/pristine/2e/2ed693a9bec481fcb8b49348370e9cd380a4061d.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="复试样钢卷号指定与措施">
	
	<query id="UIB020150_02.INITSELECT"  desc="复试样原因 ReSmpReason">
		 SELECT      SM_CFNM   LABEL
                    ,SM_CD    VALUE 
         FROM        TBZ00_COMMCD
         WHERE       LG_CD     =  'B01108'
	</query>
	
	<query id="UIB020150_01.SELECT" 
		desc="按样片号号进行查询  获取某炉次号的所有钢卷信息(大约有10块到20块左右的钢卷) CoilMessageResult">
		SELECT 
  	    'N' CHK
		,C.COIL_NO --钢卷号
		,C.SMP_DIR_PIC_YN
		,C.SAMPL_NO                                  SMP_NO
		,C.SAMPL_CUT_LOC                             SMP_CUT_LOC
		,C.ORD_NO
		,C.ORD_SEQ              
		,C.DCS_THK
		,PKG_QUALITY_COMM.FIB020203(C.ORD_USE_CD )        ORD_USE_CD     --订单用途
		,C.SPEC_ABBSYM             --标准号
		,C.SPEC_STL_GRD
		,C.SLAB_NO                 --板坯号
		,C.MATLQLTY_DEC_GRD        --材质判定等级
		,C.OLD_SAMPL_NO
		,DECODE(L.OVER_SMP_TP  , NULL , NULL , L.OVER_SMP_TP  )      OVER_SMP_TP
		FROM          TBH02_COIL_COMM       C         ,       TBB02_LOT_COM            L
		WHERE         C.TOT_DEC_GRD IS NULL
		AND           C.MATLQLTY_DEC_GRD    =    '2'
 	    --AND           C.COIL_STAT           =    '2'
		AND           C.SAMPL_NO            =    L.SMP_NO
		AND           (L.OVER_SMP_TP IS NULL OR L.OVER_SMP_TP != '9')
		AND           L.SMP_PROG_CD         =   'E'
		AND           DECODE(? , '1' , '1' , SUBSTR(C.OLD_SAMPL_NO , 1,10))   BETWEEN   ? AND ?
		ORDER BY      C.OLD_SAMPL_NO
	</query>
	
	<query id="UIB020150_02.SELECT" desc="">
		SELECT       'Y'  CHK
					 ,CCM.COIL_NO
            		 ,CCM.OLD_SAMPL_NO
					 ,CCM.DCS_THK
					 ,CCM.SPEC_ABBSYM
					 ,CCM.SPEC_STL_GRD
					 ,PKG_QUALITY_COMM.FIB020203(CCM.ORD_USE_CD )      ORD_USE_CD     --订单用途
					 ,CCM.SLAB_NO
					 ,CCM.SAMPL_NO                                 SMP_NO
					 ,CCM.SAMPL_CUT_LOC                            SMP_CUT_LOC
				     ,CCM.SMP_DIR_PIC_YN
		             ,DECODE(CCM.COIL_NO , ? , 'Y' , NULL)           QUYANGJUAN
		FROM          TBH02_COIL_COMM    CCM
		WHERE         CCM.SAMPL_NO                    =            ?      
		AND           CCM.MATLQLTY_DEC_GRD            =            '2'
	--	AND           CCM.COIL_STAT                   =            '2'
		AND           CCM.TOT_DEC_GRD                 IS           NULL 
		ORDER BY      CCM.OLD_SAMPL_NO 
	</query>
	
	<query id="UIB020150_04.SELECT" desc="用于判断是否对某钢卷进行了取样，若取了样（包含原样和复样），则后面的“代表”更新操作不进行">
		SELECT 1 FROM TBB02_LOT_COIL WHERE SMP_TIP_YN ='Y'
	</query>
	
	
	<query id="UIB020150_01.UPDATE" desc="不进行复样">
		UPDATE    TBB02_LOT_COM    T
		SET       T.OVER_SMP_TP    =    '9'
		WHERE     T.SMP_NO         =    ?
	</query>
	
	<query id="UIB020150_01.CALLSTATEMENT" desc="复样">
		{call NIB027060(? , ? , ? , ? )}
	</query>
	
</queryMap>