XinYu_RZMES/.svn/pristine/ba/ba776919bcbfa5e6e33479acd588f01bcb9a1d75.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="试样进程现况">
    <query id="UIB020110_01.INITSELECT" desc="炉次号" fetchSize="10">   
        <![CDATA[
           SELECT DISTINCT
           SUBSTR(SMP_NO ,1 , 10 )      LABEL
          ,SUBSTR(SMP_NO ,1 , 10 )      VALUE
           FROM TBB02_LOT_COM 
		   ORDER BY 	LABEL
        ]]>   
    </query> 

	<query id="UIB020110_02.INITSELECT" desc="获得试样进程代码信息，初始化页面">
		SELECT      SM_CFNM LABEL
                  , SM_CD VALUE
        FROM        TBZ00_COMMCD
        WHERE       LG_CD   =  'B01107'
	</query>
	
	<query id="UIB020110_011.SELECT" desc="获得试样号的后几位数字">
		 SELECT      DISTINCT
          SUBSTR(SMP_NO ,11 )    LABEL
         ,SUBSTR(SMP_NO ,11 )    VALUE
         FROM         TBB02_LOT_COM 
		 WHERE        SUBSTR(SMP_NO ,1 , 10) = ?
	</query>
	
	<query id="UIB020110_01.SELECT" desc="试样号信息多条件查询">
	      SELECT      
		  'N' CHK 
		 , CCM.OLD_SAMPL_NO        OLD_SAMPL_NO
         , a.PRDNM_CD        --品名
         , b.COIL_NO         --coil号
         , a.SMP_NO          --试样号（试样编号）
         , a.SMP_CUT_LOC     --位置
         , a.SMP_PROG_CD     --位置（SMP_PROG_CD）
         , b.COIL_THK        --厚度
         , a.SPEC_ABBSYM     --标准号
         , a.SPEC_STL_GRD    --标准钢号
         , a.EXAMORG_CD      -- 检查机关
         , a.SMP_DIR_DTIME   --试样指示
         , a.SMP_GET_DTIME   --试样日期
         , a.SMP_INTO_DTIME  --试样入库
         , a.SMP_WORK_DTIME  --试样检验时间
		 , a.QLTY_DCS_DTIME  --判定时间
		 , a.MOD_ID          --入库人
		 , A.SMP_SEND_DTIME  --送样时间
		 , a.SMP_SEND_ID
		   --供前台界面使用（可否被选择入库），为Y则允许入库
		 , decode(a.OVER_SMP_TP , NULL , NULL , 'Y')    FUYANG
		 , decode(a.OVER_SMP_TP , null , null , decode(a.SMP_PROG_CD,  'B' , 'Y'))  OVER_SMP_TP  
           FROM TBB02_LOT_COM a , TBB02_LOT_COIL b , TBH02_COIL_COMM CCM
           WHERE          a.SMP_NO           =     b.SMP_NO  
		   AND            CCM.COIL_NO        =     B.COIL_NO
		   AND            a.SMP_CUT_LOC      =     b.SMP_CUT_LOC 
		   AND            b.SMP_TIT_YN       =     'Y' 

	</query>
	
	<query id="UIB020110_01.SUAN.SELECT">
		SELECT      
		  'N' CHK 
		 , b.COIL_NO        OLD_SAMPL_NO
         , a.PRDNM_CD        --品名
         , b.COIL_NO         --coil号
         , a.SMP_NO          --试样号（试样编号）
         , a.SMP_CUT_LOC     --位置
         , a.SMP_PROG_CD     --位置（SMP_PROG_CD）
         , b.COIL_THK        --厚度
         , a.SPEC_ABBSYM     --标准号
         , a.SPEC_STL_GRD    --标准钢号
         , a.EXAMORG_CD      -- 检查机关
         , a.SMP_DIR_DTIME   --试样指示
         , a.SMP_GET_DTIME   --试样日期
         , a.SMP_INTO_DTIME  --试样入库
         , a.SMP_WORK_DTIME  --试样检验时间
         , a.QLTY_DCS_DTIME  --判定时间
         , a.MOD_ID          --入库人
         , A.SMP_SEND_DTIME  --送样时间
         , a.SMP_SEND_ID
          --供前台界面使用（可否被选择入库），为Y则允许入库
         , decode(a.OVER_SMP_TP , NULL , NULL , 'Y')    FUYANG
         , decode(a.OVER_SMP_TP , null , null , decode(a.SMP_PROG_CD,  'B' , 'Y'))  OVER_SMP_TP  
           FROM TBB02_LOT_COM a , TBB02_LOT_COIL b 
           WHERE          a.SMP_NO           =     b.SMP_NO  
           AND            a.SMP_CUT_LOC      =     b.SMP_CUT_LOC 
           AND            b.SMP_TIT_YN       =     'Y' 
           AND            B.COIL_NO LIKE 'L%'
           AND            A.SMP_PROG_CD      =      ?
	</query>
	
	<query id="UIB020110_02.SELECT" desc="">
		SELECT COIL_NO , QLTY_SEND_DTIME , SMP_NO 
		,QLTY_CD1 ,COIL_THK , SPEC_ABBSYM , SPEC_STL_GRD , QLTY_TT1 
		,QLTY_CD2
		,QLTY_TT2
		FROM TBB02_L2INS_QLTY
		WHERE  QLTY_SEND_DTIME BETWEEN ? AND ?
		ORDER BY COIL_NO
	</query>
	
	<query id="UIB020110_01_0.SELECT" desc="">
		 AND   a.SMP_NO = ?
	</query>
	
	<query id="UIB020110_01_1.SELECT" desc="">
		 AND   a.SMP_PROG_CD = ?
	</query>
	
	<query id="UIB020110_01.UPDATE" desc="试样号进入入库状态，即从B--C">
		 UPDATE    TBB02_LOT_COM 
		 SET       SMP_PROG_CD =   'C' 
		         , SMP_INTO_DTIME = to_char(sysdate , 'YYYYMMDDHH24MISS')
		         , MOD_ID      =   ?
		         , MOD_DTIME   =   to_char(sysdate , 'YYYYMMDDHH24MISS')
		 WHERE     SMP_NO      =   ? 
		 AND       SMP_CUT_LOC =   ?
	</query>
	
	<query id="UIB020110_02.UPDATE" desc="式样发送到检化验系统检测">
		UPDATE        TBB02_L2INS_QLTY              T
		SET           T.MSG_FLAG                    =   'N'
		WHERE         T.MSG_FLAG                    =   '1'
		AND           T.SMP_NO                      =   ?
		AND           T.SMP_CUT_LOC                 =   ?
	</query>
	
</queryMap>