XinYu_RZMES/.svn/pristine/4c/4c93c7dc2f152009856e2aeacef5c6ee0a554a66.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="充当结果删除">

	<query id="NIE031030.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,
					? / (B.ORD_THK * B.ORD_WTH * 7.8) * 1000000,
					?,
					B.ORD_INDIA,
					SQRT(4 * ? / (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
				WHERE B.ORD_NO = ?
				  AND B.ORD_SEQ = ?
				  AND A.SLAB_NO = T.SLAB_NO)
			WHERE SLAB_NO = ?		-- 板坯号
		]]>
	</query>
	<query id="NIE031030.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 ?, A.SLAB_NO, A.SLAB_THK, A.SLAB_WTH,
				? * (100 / C.PROC_RATE) / (A.SLAB_THK * A.SLAB_WTH * 7.8) * 1000000,
				? * (100 / C.PROC_RATE),
				B.ORD_THK, B.ORD_WTH,
				? / (B.ORD_THK * B.ORD_WTH * 7.8) * 1000000,
				?,
				B.ORD_INDIA,
				SQRT(4 * ? / (B.ORD_WTH / 1000000 * 7.8 * 3.14 ) + (B.ORD_INDIA * B.ORD_INDIA)),
				B.ORD_NO, B.ORD_SEQ, '1'
			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 = ?
		]]>
	</query>

	<query id="NIE031030.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="NIE031030.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 ?, COIL_NO, COIL_THK, COIL_WTH, COIL_LEN,
				COIL_INDIA, COIL_OUTDIA, ?, ORD_NO, ORD_SEQ, '1'
			FROM TBE04_REP_COIL
			WHERE COIL_NO = ?
		]]>
	</query>

</queryMap>