1.27 --DESC:板坯设计保存的是临时的结果，故在充当的时候检查改订单有无正在板坯设计中 , (SELECT DISTINCT ORD_NO, ORD_SEQ FROM TBD01_SLABDN_RST UNION ALL SELECT DISTINCT ORD_NO, ORD_SEQ FROM TBD01_MATDN_RST) C, (SELECT DISTINCT ORD_NO, ORD_SEQ, DSN_KIND FROM TBB01_ORD_INGR WHERE DSN_KIND = '1') K ------------------------------------------------------------------------------- WHERE A.ORD_NO = B.ORD_NO(+) AND A.ORD_SEQ = B.ORD_SEQ(+) --------------------------------------------------------------------------------- --MODIFY BY SJW 090902 VERSION 1.26-->1.27 --DESC:板坯设计保存的是临时的结果，故在充当的时候检查改订单有无正在板坯设计中 AND A.ORD_NO = C.ORD_NO(+) AND A.ORD_SEQ = C.ORD_SEQ(+) AND A.ORD_NO = K.ORD_NO(+) AND A.ORD_SEQ = K.ORD_SEQ(+) --------------------------------------------------------------------------------- AND A.ORD_PROG_CD IN ('D', 'E') --------------------------------------------------------------- --modify by sjw 090901 version 1.25->1.26 --desc: 订单关闭条件已由达到上限关闭修改为订单下限关闭，所以取消余量为负控制 --AND A.ORD_REM_WGT > 0 ---------------------------------------------------------------- --AND A.RCVORD_CLF <> 'M' AND ('R' IN (SELECT * FROM TABLE(XB_PACKAGE.GF_TABSTR(A.ORD_PRC_LOCK,'|')) ) or A.ORD_PRC_LOCK is null ) 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 ? -- 订单宽度 AND A.OVER_ORD IS NULL -- 订单关闭标志，上线初期使用，王黎添加 ORDER BY A.DEL_TO_DATE, A.ORD_NO, A.ORD_SEQ ]]> NVL(:3, 'N') OR (A.STL_GRD = B.STL_GRD /* AND A.SLAB_INGR_DEC_GRD = '1' */)) -- 同牌号 AND ('Y' <> NVL(:4, 'N') OR (GF_NIB028720(A.SLAB_NO, B.ORD_NO, B.ORD_SEQ) = 'YY')) -- 检查成分项目 AND ('Y' <> NVL(:5, 'N') OR (A.SLAB_WGT * PKG_UID.GET_PROC_RATE( B.ORD_NO, B.ORD_SEQ , '' )/100 ) BETWEEN B.ORD_UNIT_WGT_MIN*:6 AND B.ORD_UNIT_WGT_MAX*:7) --同单重 AND ('Y' <> NVL(:8, 'N') OR (A.SLAB_WTH BETWEEN B.ORD_WTH AND B.ORD_WTH + 100)) --同尺寸 ]]> 'Y' AND A.CUR_PROG_CD = 'SRC' AND A.ORD_FL = '2' AND A.COIL_STAT = '2' AND A.TOT_DEC_GRD NOT IN ('3', '4') -- 次废品不可充 AND NVL(A.FB_YN, 'N') = 'N' --封闭卷无法充当 20200720 ------------------------------------------------------------ --MODIFY BY WXY 091210 --DESC: 改判完成 或则没有改判的可以充当 AND (A.SMP_STATS IS NULL OR A.SMP_STATS = '3') ----------------------------------------------------------- --MODIFY BY SJW 091010 --DESC: 成品同牌号更改为spec_stl_grd AND B.ORD_NO = C.ORD_NO -- 合同号 AND B.ORD_SEQ = C.ORD_SEQ -- 订单号 ----------------------------------------------------------- AND B.ORD_NO = :1 -- 合同号 AND B.ORD_SEQ = :2 -- 订单号 ------------------------------------------------------------------------------------------ --MODIFY BY WXY 20101217 --DESC: 成品同牌号更改为H_spec_stl_grd and (case when substr(b.ORD_NO, 1, 1) in ('4', '5') and substr(a.CUR_LOAD_LOC, 1, 1) = '1' then '' else nvl(a.CUR_LOAD_LOC,'1') end) = nvl(a.CUR_LOAD_LOC,'1') AND ('Y' <> NVL(:3, 'N') OR A.SPEC_STL_GRD = B.H_SPEC_STL_GRD) -- 同牌号 AND ('Y' <> NVL(:4, 'N') OR GF_NIB028720(A.SLAB_NO, B.ORD_NO, B.ORD_SEQ) = 'YY') -- 检查成分项目 AND ('Y' <> NVL(:5, 'N') OR GF_NIB028750(A.COIL_NO, B.ORD_NO, B.ORD_SEQ) = 'YY') -- 检查材质项目 AND ('Y' <> NVL(:6, 'N') OR A.ACT_WGT *( PKG_UID.GET_PROC_RATE( B.ORD_NO, B.ORD_SEQ , '' )/100 ) BETWEEN B.ORD_UNIT_WGT_MIN*:7 AND B.ORD_UNIT_WGT_MAX*:8) AND ('Y' <> NVL(:9, 'N') OR GF_NIB028780(A.COIL_NO, B.ORD_NO, B.ORD_SEQ) = 'YY') -- 检查尺寸通过 ]]>