XinYu_RZMES/classes/query/E/E01/UIE012040-query.xml

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="物料进程现状查询">
	<query id="UIE012040.OrdPrc.Select" desc="" fetchSize="10">
		<![CDATA[
			SELECT ORD_NO, ORD_SEQ
			FROM TBE02_ORD_PRC							-- 订单进程表
			WHERE ROWNUM = 1
			  AND ORD_NO LIKE ?||'%'					-- 参数：合同号
			  AND ORD_SEQ LIKE ?||'%'					-- 参数：订单号
		]]>
	</query> 
	<query id="UIE012040.Charge.Select" desc="" fetchSize="10">
		<![CDATA[
			SELECT
				'炉次' MAT_TP,							-- 区分
				A.PROG_CD,								-- 物料进程
				DECODE(A.PROG_CD,
					'JBA', A.CHARGE_MANA_NO,
					'JBB', A.CHARGE_MANA_NO,
					B.CHARGE_NO) MAT_NO,				-- 炉次号
				A.CCM_THK MAT_THK,
				A.CCM_WTH MAT_WTH,
				'' MAT_LEN,								-- 长度
				A.PREV_CHARGE_WGT MAT_WGT,
				C.WGT,									-- 产品重量
				'' CUR_LOAD_LOC,						-- 堆置位置
				A.REG_DTIME								-- 生产日期
			FROM TBF01_SPEC_CHARGE A, TBG02_CHARGE_COMM B, (
				SELECT Y.CHARGE_EDT_SEQ, SUM(X.ORD_WGT) WGT
				FROM TBF01_SPEC_SLAB_D X, TBF01_SPEC_SLAB Y
				WHERE X.ORD_NO = ?
				  AND X.ORD_SEQ = ?
				  AND X.ORD_FL = '1'
				  AND Y.SLAB_EDT_SEQ = X.SLAB_EDT_SEQ
				  AND Y.ORD_FL = '1'
				GROUP BY Y.CHARGE_EDT_SEQ) C, TBZ00_COMMCD D
			WHERE A.STATUS_CD IN ('A', 'B')
			  AND A.CHARGE_EDT_SEQ = C.CHARGE_EDT_SEQ
			  AND A.CHARGE_MANA_NO = B.PLAN_CHARGE_NO(+)
			  AND NVL(?, A.PROG_CD) = A.PROG_CD			-- 参数：物料进程('J%')
			  AND D.LG_CD = 'E01002'
			  AND A.PROG_CD = D.SM_CD
			ORDER BY D.CD_SEQ, A.REG_DTIME,
				DECODE(A.PROG_CD, 'JBA', A.CHARGE_MANA_NO, 'JBB', A.CHARGE_MANA_NO, B.CHARGE_NO)
		]]>
	</query> 
	<query id="UIE012040.Slab.Select" desc="" fetchSize="10">
		<![CDATA[
			SELECT
				'板坯' MAT_TP,							-- 区分
				A.CUR_PROG_CD PROG_CD,					-- 物料进程
				A.SLAB_NO MAT_NO,						-- 物料号
				A.SLAB_THK MAT_THK,						-- 厚度
				A.SLAB_WTH MAT_WTH,						-- 宽度
				A.SLAB_LEN MAT_LEN,						-- 长度
				A.SLAB_WGT MAT_WGT,						-- 重量
				B.WGT,									-- 产品重量
				A.CUR_LOAD_LOC,							-- 堆置位置
				A.SLAB_CUT_DTIME REG_DTIME				-- 生产日期
			FROM TBG02_SLAB_COMM A, (
				SELECT SLAB_NO, SUM(ORD_WGT) WGT
				FROM TBG02_SLAB_COMM_D
				WHERE ORD_NO = ?
				  AND ORD_SEQ = ?
				  AND ORD_FL = '1'
				GROUP BY SLAB_NO) B, TBZ00_COMMCD C
			WHERE A.SUB_SLAB_NO = B.SLAB_NO
			  AND A.ORD_FL = '1'
			  AND A.SLAB_STAT = '2'
			  AND NVL(?, A.CUR_PROG_CD) = A.CUR_PROG_CD	-- 参数：物料进程('R%')
			  AND C.LG_CD = 'E01002'
			  AND A.CUR_PROG_CD = C.SM_CD
			ORDER BY C.CD_SEQ, A.SLAB_CUT_DTIME, A.SLAB_NO
		]]>
	</query> 
	<query id="UIE012040.Coil.Select" desc="" fetchSize="10">
		<![CDATA[
			SELECT
				'钢卷' MAT_TP,							-- 区分
				A.CUR_PROG_CD PROG_CD,					-- 物料进程
				A.OLD_SAMPL_NO MAT_NO,					-- 物料号
			    -------------------------------------------------------
			    --MODIFY BY SJW 091016
				--DESC:刘工要求增加成品对应板坯号
			    A.SLAB_NO,                               --成品对应板坯号
			    -------------------------------------------------------
				A.COIL_THK MAT_THK,						-- 厚度
				A.COIL_WTH MAT_WTH,						-- 宽度
				A.COIL_LEN MAT_LEN,						-- 长度(实重量)
				A.ACT_WGT MAT_WGT,						-- 重量
				B.WGT,									-- 产品重量
				A.CUR_LOAD_LOC,							-- 堆置位置
				A.MILL_DTIME REG_DTIME,				    -- 生产日期
				---------------------------------------------------------
			    --modify by wxy 100205
			    --desc: 时间长度不统一，时分秒有的没有 ，界面排序错误
			    substr(A.TRNF_DTIME,1,8)  TRNF_DTIME                          --发货结束时间
				-----------------------------------------------------------
			FROM TBH02_COIL_COMM A, (
				SELECT COIL_NO, SUM(ORD_WGT) WGT
				FROM TBH02_COIL_COMM_D
				WHERE ORD_NO = ?
				  AND ORD_SEQ = ?
				  AND ORD_FL = '1'
				GROUP BY COIL_NO) B, TBZ00_COMMCD C
			WHERE A.COIL_NO = B.COIL_NO
			  AND A.ORD_FL = '1'
			  AND ((A.CUR_PROG_CD = 'SFF' AND A.COIL_STAT = '3')OR(A.CUR_PROG_CD = 'SGF' AND A.COIL_STAT = '3') OR (A.CUR_PROG_CD != 'SFF' AND A.COIL_STAT = '2'))
			  AND NVL(?, A.CUR_PROG_CD) = A.CUR_PROG_CD	-- 参数：物料进程('S%')
			  AND C.LG_CD = 'E01002'
			  AND A.CUR_PROG_CD = C.SM_CD
			ORDER BY C.CD_SEQ, A.COIL_CRE_DTIME, A.OLD_SAMPL_NO
		]]>
	</query> 

</queryMap>