XinYu_RZMES/.svn/pristine/75/757c944a11c4cd4bdb64c57090d48e705a71a817.svn-base

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

	<query id="NIE031023.RepOrd.Select" desc="选取充当订单及订单余量">
		<![CDATA[
			SELECT
				ORD_NO,
				ORD_SEQ,
				REP_REM_WGT
			FROM TBE04_REP_ORD
			WHERE REP_REM_WGT > 0
			ORDER BY DEL_TO_DATE ASC
		]]>
	</query>
	<query id="NIE031023.RepSlab.Select" desc="选取充当板坯及充当重量">
		<![CDATA[
			SELECT
				A.SLAB_NO MAT_NO,
				(A.SLAB_WGT * C.PROC_RATE / 100) WGT
			FROM TBE04_REP_SLAB A, TBE04_REP_ORD B, (
				SELECT PROC_RATE FROM TBE01_PROC_RATE WHERE PROC_CD = 'R') C
			WHERE A.ORD_FL = '2'
			  AND B.ORD_NO = ?
			  AND B.ORD_SEQ = ?
			  AND A.SLAB_WTH BETWEEN B.ORD_WTH AND B.ORD_WTH + 100
			  AND (A.SLAB_WGT * C.PROC_RATE / 100) BETWEEN B.ORD_WGT_MIN AND B.ORD_WGT_MAX	-- 板坯重量
			  AND A.STL_GRD = B.STL_GRD									-- 同牌号
			  AND GF_NIB028720(SLAB_NO, B.ORD_NO, B.ORD_SEQ) = 'YY'		-- 检查成分项目
			ORDER BY A.PROD_DTIME --DESC
		]]>
	</query>

 	<query id="NIE031023.RepOrd.Update" desc="更新充当订单的重量与余量">
		<![CDATA[
			UPDATE TBE04_REP_ORD A SET
				REP_WGT = REP_WGT + ?,
				REP_REM_WGT = REP_REM_WGT - ?
			WHERE ORD_NO = ?
			  AND ORD_SEQ = ?
		]]>
	</query>
	<query id="NIE031023.RepSlab.Update" desc="">
		<![CDATA[
			UPDATE TBE04_REP_SLAB T SET
				ORD_FL = '1',
				(PROD_THK, PROD_WTH, PROD_LEN, PROD_WGT, COIL_INDIA, COIL_OUTDIA,
				 SPEC_ABBSYM, ORD_USEAGE_CD, ORD_NO, ORD_SEQ, PRODNM_CD) = (
				SELECT B.ORD_THK, B.ORD_WTH,
					(A.SLAB_WGT * C.PROC_RATE / 100) / (B.ORD_THK * B.ORD_WTH * 7.8) * 1000000,
					(A.SLAB_WGT * C.PROC_RATE / 100),
					B.ORD_INDIA,
					SQRT(4 * (A.SLAB_WGT * C.PROC_RATE / 100) / (B.ORD_WTH / 1000000 * 7.8 * 3.14 ) + (B.ORD_INDIA * B.ORD_INDIA)),
					B.SPEC_ABBSYM, B.ORD_USEAGE_CD, B.ORD_NO, B.ORD_SEQ, B.PRODNM_CD
				FROM TBE04_REP_SLAB A, TBE04_REP_ORD B, (
					SELECT PROC_RATE FROM TBE01_PROC_RATE WHERE PROC_CD = 'R') C
				WHERE B.ORD_NO = ?
				  AND B.ORD_SEQ = ?
				  AND A.SLAB_NO = T.SLAB_NO)
			WHERE SLAB_NO = ?		-- 板坯号
		]]>
	</query>

	<query id="NIE031023.RepSlabD.Delete" desc="">
		<![CDATA[
			DELETE TBE04_REP_SLAB_D
			WHERE SLAB_NO = ?
		]]>
	</query>
	<query id="NIE031023.RepSlabD.Insert" desc="" fetchSize="10">
		<![CDATA[
			INSERT INTO TBE04_REP_SLAB_D
			( SLAB_CUT_SEQ, SLAB_NO, SLAB_THK, SLAB_WTH, SLAB_LEN, 
			  SLAB_WGT, PROD_THK, PROD_WTH, PROD_LEN, PROD_WGT, 
			  COIL_INDIA, COIL_OUTDIA, ORD_NO, ORD_SEQ, ORD_FL
			)
			-- (1) 板坯切割顺序, 板坯号, 板坯厚度, 板坯宽度, 板坯长度, 
			-- (2) 板坯重量, 产品厚度, 产品宽度, 产品长度, 产品重量, 
			-- (3) 钢卷内径, 钢卷外径, 合同号, 订单号, 订单材/余材区分
			SELECT '01', SLAB_NO, SLAB_THK, SLAB_WTH, SLAB_LEN,
				SLAB_WGT, PROD_THK, PROD_WTH, PROD_LEN, PROD_WGT,
				COIL_INDIA, COIL_OUTDIA, ORD_NO, ORD_SEQ, '1'
			FROM TBE04_REP_SLAB
			WHERE SLAB_NO = ?
/*
			产品重量(PROD_WGT) = 板坯重量 * 实得率
			产品长度(PROD_LEN) = 产品重量 / (产品厚度 * 产品宽度 * 7.8) / 1000000
*/
		]]>
	</query>

</queryMap>