XinYu_RZMES/.svn/pristine/9f/9f42c9910521c4f1df76c3788630227643f915a2.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="STEEL MAKING QUERY ">
	<query id="UIG040061_SLAB_INFO.select" desc=" 板坯详细信息查询 ">
        <![CDATA[
				SELECT A.SLAB_NO
				,a.CHARGE_NO
	            ,A.STL_GRD
	            ,CUR_LOAD_LOC
	            ,YARD_ADDR||STORELAY YARD_ADDR
	            ,A.SLAB_THK||'*'||A.SLAB_WTH||'*'||A.SLAB_LEN SLAB_SIZE
	            ,A.SLAB_RT
	            ,A.CUR_PROG_CD
	            ,A.ORD_FL
	            ,A.ORD_NO
	            ,A.ORD_SEQ
	            ,A.REMARKS
	            ,D.ORD_NO ORDNO
	            ,SLAB_STAT
	            ,'' CR_NO
	            ,'' TO_YARD
	            ,'' CHK
	            ,GF_NIB028720(A.SLAB_NO , A.ORD_NO , A.ORD_SEQ)  QLFD_YN
              	,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE SM_CD = A.SLAB_INGR_DEC_KIND AND LG_CD = 'B01133') SLAB_INGR_DEC_KIND --成分判定依据
	            ,MILL_SCH_STAT
	            ,A.HCR_CLF
	            ,a.SLAB_INGR_DEC_GRD
	            ,a.SLAB_SIZE_DEC_GRD
	            ,(SELECT SM_CFNM FROM TBZ00_COMMCD  WHERE LG_CD LIKE 'B01136' AND SM_CD = A.SLAB_TOT_DEC_GRD) SLAB_TOT_DEC_GRD                    
	            ,E.CASTING_STA_DTIME
	            ,E.CASTING_END_DTIME
	            ,A.SLAB_CUT_DTIME                --切割时间
	            ,DECODE(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME) INGR_DEC_DTIME
	            ,ROUND((((SYSDATE-TO_DATE(TO_CHAR(TO_DATE(E.CASTING_STA_DTIME,'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-TO_DATE(DECODE(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) IGR_LAG_DTIME
	            ,ROUND((((SYSDATE-TO_DATE(TO_CHAR(TO_DATE(E.CASTING_END_DTIME,'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-TO_DATE(A.SLAB_CUT_DTIME,'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) CUT_LAG_DTIME   
	            ,C.ROLL_MANA_NO||'-'||C.ROLL_SLAB_SEQ ROLL_SEQ
	            ,decode(a.SLAB_OUT_TP,'Y','允许出库','不允许出库') SLAB_OUT_TP
	            ,a.WEIGHT_WGT
	            ,a.SAMPLINGID
	            ,F.SAMPLINGTIME
	            ,F.REG_DTIME
	            ,E.CC_DEVNO
	            , (SELECT SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD='G03004' AND SM_CD =A.CRK_CD1)||DECODE(A.CRK_CD1_LOC,'T','(上)','B','(下)',A.CRK_CD1_LOC) CRK
	          FROM TBG02_SLAB_COMM A
	         ,TBG04_SLAB_YARD B 
	         ,TBG02_CHARGE_COMM E
	         ,(SELECT ROLL_MANA_NO,ROLL_SLAB_SEQ,SLAB_NO FROM TBF02_SPEC_MILL WHERE STATUS_CD = 'A') C
	         ,TBG04_SLAB_TRANSF d
	         ,TBG04_SLAB_ACT_WGT F
	      WHERE '1' = '1'
	      AND SUBSTR(A.SLAB_NO,1,9) = SUBSTR(E.CHARGE_NO(+),1,9)  
	      AND A.SLAB_NO = B.SLAB_NO(+)
	      AND A.SLAB_NO = C.SLAB_NO(+)
	      AND A.SLAB_NO = D.SLAB_NO(+)
	      AND A.SAMPLINGID = F.SAMPLINGID(+)
		  AND 	A.SLAB_NO LIKE ?||'%'
		  AND 	(A.CUR_LOAD_LOC  LIKE ?||'%' OR A.CUR_LOAD_LOC LIKE ?||'%')
	      AND 	A.SLAB_STAT LIKE ?||'%'
		  AND   ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) >= ?
	      AND   ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) <= ?
	      AND   ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) >= ?
	      AND   ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) <= ?
	      ORDER BY A.SLAB_NO ASC
        ]]>
    </query>
	<query id="UIG040061_SLAB_NO_INIT.select" desc=" 板坯详细信息查询 ">
        <![CDATA[
			  SELECT CHARGE_NO LABEL,CHARGE_NO VALUE  FROM(
		             SELECT T.CHARGE_NO,ROW_NUMBER() OVER( ORDER BY T.CHARGE_NO DESC) RM
		           FROM TBG02_CHARGE_COMM T 
		           WHERE SUBSTR(t.CHARGE_NO,3,1) LIKE '1%'       --连铸机号
		           AND SUBSTR(T.CHARGE_NO,2,1) LIKE (SELECT SUBSTR(TO_CHAR(SYSDATE,'YYYY'),4,1) FROM DUAL)  --年号
		           AND T.CHARGE_STAT = '3' 
		           --AND T.CASTING_END_DTIME IS NOT NULL
		      ORDER BY T.CHARGE_NO DESC)
		      WHERE RM <= 10
		      UNION ALL
		      SELECT CHARGE_NO LABEL,CHARGE_NO VALUE  FROM(
		             SELECT T.CHARGE_NO,ROW_NUMBER() OVER( ORDER BY T.CHARGE_NO DESC) RM
		           FROM TBG02_CHARGE_COMM T 
		           WHERE SUBSTR(t.CHARGE_NO,3,1) LIKE '2%'       --连铸机号
		           AND SUBSTR(T.CHARGE_NO,2,1) LIKE (SELECT SUBSTR(TO_CHAR(SYSDATE,'YYYY'),4,1) FROM DUAL)  --年号
		           AND T.CHARGE_STAT = '3' 
		           --AND T.CASTING_END_DTIME IS NOT NULL
		      ORDER BY T.CHARGE_NO DESC)
		      WHERE RM <= 10
        ]]>
    </query>
	<query id="UIG040061_MOVEALBE_SLAB.select" desc=" 板坯详细信息查询 ">
        <![CDATA[
			SELECT SLAB_STAT,MISSNO_CLF,LST_INGR_CD,A.SLAB_INGR_DEC_GRD,a.SLAB_TOT_DEC_GRD,A.CUR_PROG_CD,A.SLAB_OUT_TP
			FROM TBG02_SLAB_COMM A
			     ,TBG02_CHARGE_COMM_D B
			WHERE '1' = '1'
			AND   SUBSTR(A.SLAB_NO,1,10) = B.CHARGE_NO
			AND   SLAB_NO = ?
        ]]>
    </query> 
    
    <query id="UIG040061_SLAB_REMARK.update" desc=" 板坯详细信息查询 ">
        <![CDATA[
			UPDATE TBG02_SLAB_COMM T
			SET T.REMARKS = :1
			WHERE T.SLAB_NO = :2
        ]]>
    </query>	  
</queryMap>