XinYu_RZMES/.svn/pristine/df/df0e30e0bd487ff7fca54663a3ee64ba6d19c87f.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="自动钢卷余材充当处理">

 	<!--
 		选取充当订单及订单余量：同 NIE031023.RepOrd.Select
 		更新充当订单的重量与余量：同 NIE031023.RepOrd.Update
 	-->

	<query id="NIE031024.RepCoil.Select" desc="选取充当钢卷及充当重量">
		<![CDATA[
			SELECT
				A.COIL_NO MAT_NO,
				A.COIL_WGT WGT
			FROM TBE04_REP_COIL A, TBE04_REP_ORD B, TBH02_COIL_COMM C
			WHERE A.ORD_FL = '2'
			  AND B.ORD_NO = ?
			  AND B.ORD_SEQ = ?
			  AND A.COIL_WGT BETWEEN B.ORD_WGT_MIN AND B.ORD_WGT_MAX	-- 列入尺寸
/*
			  AND DECODE(B.EACHLOT_YN, 'Y', A.SAMPL_PICK_YN, 'Y') = 'Y'	-- 列入材质
*/
			  AND A.COIL_NO = C.COIL_NO
			  AND A.STL_GRD = B.STL_GRD									-- 同牌号
			  AND GF_NIB028720(C.SLAB_NO, B.ORD_NO, B.ORD_SEQ) = 'YY'	-- 检查成分项目
			  AND GF_NIB028750(A.COIL_NO, B.ORD_NO, B.ORD_SEQ) = 'YY'	-- 检查材质项目
			  AND GF_NIB028780(A.COIL_NO, B.ORD_NO, B.ORD_SEQ) = 'YY'	-- 检查尺寸通过
			ORDER BY A.PROD_DTIME --DESC
		]]>
	</query>

	<query id="NIE031024.RepCoil.Update" desc="">
		<![CDATA[
			UPDATE TBE04_REP_COIL SET
				ORD_FL = '1', DGR = '1',
				(SPEC_ABBSYM, ORD_USEAGE_CD, ORD_NO, ORD_SEQ) = (
				SELECT SPEC_ABBSYM, ORD_USEAGE_CD, ORD_NO, ORD_SEQ
				FROM TBE04_REP_ORD
				WHERE ORD_NO = ?
				  AND ORD_SEQ = ?)
			WHERE COIL_NO = ?		-- 钢卷号
		]]>
	</query>

	<query id="NIE031024.RepCoilD.Delete" desc="">
		<![CDATA[
			DELETE TBE04_REP_COIL_D
			WHERE COIL_NO = ?
		]]>
	</query>
	<query id="NIE031024.RepCoilD.Insert" desc="" fetchSize="10">
		<![CDATA[
			INSERT INTO TBE04_REP_COIL_D
			( COIL_CUT_SEQ, COIL_NO, COIL_THK, COIL_WTH, COIL_LEN, 
			  COIL_INDIA, COIL_OUTDIA, COIL_WGT, ORD_NO, ORD_SEQ, 
			  ORD_FL
			)
			-- (1) 钢卷切割顺序, 钢卷号, 钢卷厚度, 钢卷宽度, 钢卷长度, 
			-- (2) 钢卷内径, 钢卷外径, 钢卷重量, 合同号, 订单号, 
			-- (3) 订单材/余材区分
			SELECT '01', COIL_NO, COIL_THK, COIL_WTH, COIL_LEN,
				COIL_INDIA, COIL_OUTDIA, COIL_WGT, ORD_NO, ORD_SEQ, '1'
			FROM TBE04_REP_COIL
			WHERE COIL_NO = ?
		]]>
	</query>

</queryMap>