0
AND A.PRODNM_CD LIKE ?||'%' -- 产品代码
AND A.CUST_CD||'&' LIKE ?||'%' -- 客户代码
AND A.STL_GRD LIKE ?||'%' -- 钢号
AND A.ORD_NO LIKE ?||'%' -- 合同号
AND A.ORD_SEQ LIKE ?||'%' -- 订单号
AND A.RCVORD_CLF||'&' LIKE ?||'%' -- 订单区分
AND A.DEL_TO_DATE BETWEEN ? AND ? -- 交货日期(到达)
AND A.ORD_USEAGE_CD||'&' LIKE ?||'%' -- 订单用途
AND A.SPEC_ABBSYM||'&' LIKE ?||'%' -- 标准号
AND A.ORD_THK BETWEEN ? AND ? -- 订单厚度
AND A.ORD_WTH BETWEEN ? AND ? -- 订单宽度
ORDER BY A.DEL_TO_DATE,A.ORD_NO ASC, A.ORD_SEQ ASC
]]>
B.ORD_NO||B.ORD_SEQ)
OR (A.SLAB_NO NOT IN (
SELECT SLAB_NO FROM TBG02_SLAB_COMM_D
WHERE ORD_NO = B.ORD_NO AND ORD_SEQ = B.ORD_SEQ)))
AND ('Y' <> NVL(?, 'N') OR A.STL_GRD = B.STL_GRD) -- 同牌号
AND ('Y' <> NVL(?, 'N') OR GF_NIB028720(A.SLAB_NO, B.ORD_NO, B.ORD_SEQ) = 'YY') -- 检查成分项目
UNION ALL
SELECT 2 LVL, D.ORD_NO, D.ORD_SEQ, '', '', '',
D.SLAB_NO, D.ORD_THK, D.ORD_WTH, D.ORD_LEN, D.ORD_WGT, D.COIL_INDIA, D.COIL_OUTDIA,
'', '', '', '', '', SLAB_CUT_SEQ, NULL
FROM TBG02_SLAB_COMM A, TBE02_ORD_PRC B, (
SELECT PROC_RATE FROM TBE01_PROC_RATE WHERE PROC_CD = 'R') C, TBG02_SLAB_COMM_D D
WHERE A.CUR_PROG_CD = 'RBA'
AND A.SLAB_STAT = '2'
AND A.ORD_FL = '1'
AND B.ORD_NO = ?
AND B.ORD_SEQ = ?
AND A.ORD_USE_CD = B.ORD_USEAGE_CD -- 相同订单用途
AND A.SPEC_ABBSYM = B.SPEC_ABBSYM -- 相同标准
AND A.SLAB_WTH BETWEEN B.ORD_WTH AND B.ORD_WTH + 100
AND (A.SLAB_WGT * C.PROC_RATE / 100) BETWEEN B.ORD_UNIT_WGT_MIN AND B.ORD_UNIT_WGT_MAX
AND A.SLAB_NO = D.SLAB_NO
AND ((A.ORD_NO||A.ORD_SEQ <> B.ORD_NO||B.ORD_SEQ)
OR (A.SLAB_NO NOT IN (
SELECT SLAB_NO FROM TBG02_SLAB_COMM_D
WHERE ORD_NO = B.ORD_NO AND ORD_SEQ = B.ORD_SEQ)))
AND ('Y' <> NVL(?, 'N') OR A.STL_GRD = B.STL_GRD) -- 同牌号
AND ('Y' <> NVL(?, 'N') OR GF_NIB028720(A.SLAB_NO, B.ORD_NO, B.ORD_SEQ) = 'YY')) -- 检查成分项目
ORDER BY SLAB_NO, SLAB_CUT_SEQ
]]>
B.ORD_NO||B.ORD_SEQ)
OR (A.COIL_NO NOT IN (
SELECT COIL_NO FROM TBH02_COIL_COMM_D
WHERE ORD_NO = B.ORD_NO AND ORD_SEQ = B.ORD_SEQ)))
--AND ('Y' <> NVL(?, 'N') OR A.STL_GRD = B.STL_GRD)
------------------------------------------------------------------------------------------
--MODIFY BY SJW 091010
--DESC: 成品同牌号更改为spec_stl_grd
AND ('Y' <> NVL(?, 'N') OR A.SPEC_STL_GRD = C.SPEC_STL_GRD) -- 同牌号
------------------------------------------------------------------------------------------ -- 同牌号
AND GF_NIB028770(A.COIL_NO, B.ORD_NO, B.ORD_SEQ) = 'YY' -- 检查尺寸通过
AND ('Y' <> NVL(?, 'N') OR GF_NIB028720(A.SLAB_NO, B.ORD_NO, B.ORD_SEQ) = 'YY') -- 检查成分项目
AND ('Y' <> NVL(?, 'N') OR GF_NIB028750(A.COIL_NO, B.ORD_NO, B.ORD_SEQ) = 'YY') -- 检查材质项目
UNION ALL
SELECT 2 LVL, C.ORD_NO, C.ORD_SEQ, '', '', '', '',
C.COIL_NO, C.ORD_THK, C.ORD_WTH, C.ORD_LEN, C.ORD_WGT, C.ORD_INDIA, C.ORD_OUTDIA,
'', '', '', '', '', CUT_SEQ
FROM TBH02_COIL_COMM A, TBE02_ORD_PRC B, TBH02_COIL_COMM_D C
-------------------------------------------
--MODIFY BY SJW 091010
--DESC: 成品同牌号更改为spec_stl_grd
,TBA01_ORD_LINE D
-------------------------------------------
WHERE A.CUR_PROG_CD = 'SFA'
AND A.COIL_STAT = '2'
AND A.ORD_FL = '1'
-----------------------------------------------------------
--MODIFY BY SJW 091010
--DESC: 成品同牌号更改为spec_stl_grd
AND B.ORD_NO = D.ORD_NO -- 合同号
AND B.ORD_SEQ = D.ORD_SEQ -- 订单号
-----------------------------------------------------------
AND B.ORD_NO = ?
AND B.ORD_SEQ = ?
AND A.COIL_NO = C.COIL_NO
AND ((A.ORD_NO||A.ORD_SEQ <> B.ORD_NO||B.ORD_SEQ)
OR (A.COIL_NO NOT IN (
SELECT COIL_NO FROM TBH02_COIL_COMM_D
WHERE ORD_NO = B.ORD_NO AND ORD_SEQ = B.ORD_SEQ)))
--AND ('Y' <> NVL(?, 'N') OR A.STL_GRD = B.STL_GRD)
------------------------------------------------------------------------------------------
--MODIFY BY SJW 091010
--DESC: 成品同牌号更改为spec_stl_grd
AND ('Y' <> NVL(?, 'N') OR A.SPEC_STL_GRD = D.SPEC_STL_GRD) -- 同牌号
------------------------------------------------------------------------------------------ -- 同牌号
AND GF_NIB028770(A.COIL_NO, B.ORD_NO, B.ORD_SEQ) = 'YY' -- 检查尺寸通过
AND ('Y' <> NVL(?, 'N') OR GF_NIB028720(A.SLAB_NO, B.ORD_NO, B.ORD_SEQ) = 'YY') -- 检查成分项目
AND ('Y' <> NVL(?, 'N') OR GF_NIB028750(A.COIL_NO, B.ORD_NO, B.ORD_SEQ) = 'YY')) -- 检查材质项目
ORDER BY COIL_NO, CUT_SEQ
]]>