XinYu_RZMES/.svn/pristine/58/58597c736f16f729e8d6dd33a9338d5d2d803121.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="STEEL MAKING QUERY ">
	<query id="UIH050201_01.select" desc="钢卷库库区信息查询">
        <![CDATA[
		SELECT TO_NUMBER(SUBSTR(Y.YARD_CLF, 4, 2)) SROW,
              (TO_NUMBER(Y.STEP_CLF)*2 - MOD(TO_NUMBER(Y.STORE_SEQ),2)) SCOL,
         		TO_NUMBER(Y.STORELAY) SLAYER,
				 Y.YARD_CLF||Y.STEP_CLF||Y.STORELAY||Y.STORE_SEQ YARD
		  FROM TBH05_COIL_YARD Y
		 WHERE SUBSTR(Y.YARD_CLF, 1, 3) = :1 || :2
		   AND Y.STORELAY = '1'
		 ORDER BY SROW, SCOL
        ]]>
    </query>
	<query id="UIH050201_02.select" desc="钢卷库钢卷信息查询">
        <![CDATA[
		SELECT TO_NUMBER(SUBSTR(Y.YARD_CLF, 4, 2)) SROW,
              (TO_NUMBER(Y.STEP_CLF)*2 - MOD(TO_NUMBER(Y.STORE_SEQ),2)) SCOL,
         		TO_NUMBER(Y.STORELAY) SLAYER,
				 Y.YARD_CLF||Y.STEP_CLF||Y.STORELAY||Y.STORE_SEQ YARD,
				 C.OLD_SAMPL_NO COIL_NO,
				 C.SPEC_STL_GRD,
				 C.COIL_THK,
				 C.COIL_WTH,
				 C.ORD_NO,
				 C.ORD_SEQ,
				 C.ACT_WGT,
				 C.YARD_ENTRY_DTIME,
				 CASE WHEN C.ORD_FL = 2 THEN '4' ELSE (CASE WHEN O.PRDNM_CD IN('HK','KP') THEN '2' WHEN O.PRDNM_CD IN('CR','LT','SX') THEN '3' ELSE '1' END) END FLAG
		  FROM TBH05_COIL_YARD Y, TBH02_COIL_COMM C, TBA01_ORD_COMM O
		 WHERE Y.COIL_NO = C.OLD_SAMPL_NO
		   AND C.COIL_STAT = '2'
		   AND C.ORD_NO = O.ORD_NO(+)
		   AND SUBSTR(Y.YARD_CLF, 1, 3) = :1 || :2
		 ORDER BY SLAYER, SROW, SCOL
        ]]>
    </query>
</queryMap>