= 0 AND A.SLAB_WTH <= 1550 THEN 1550 WHEN A.SLAB_WTH > 1550 AND A.SLAB_WTH <= 1650 THEN 1650 WHEN A.SLAB_WTH > 1650 AND A.SLAB_WTH <= 2400 THEN 2400 END SLAB_WTH ,DECODE(B.PROG_CD,'JBA',1,0) JBA_CNT ,DECODE(B.PROG_CD,'JBB',1,0) JBB_CNT ,DECODE(B.PROG_CD,'JJB',1, 'JBF',1, 'JCF',1, 'JRF',1, 'JLF',1, 0) JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBF01_SPEC_SLAB A, TBF01_SPEC_CHARGE B WHERE A.SLAB_WTH >=0 AND A.SLAB_WTH <=2400 AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CHARGE_EDT_SEQ = B.CHARGE_EDT_SEQ AND B.STATUS_CD IN ('A','B') AND B.PROG_CD IN ('JBA','JBB','JJB','JBF','JCF','JRF','JLF') UNION ALL SELECT A.SLAB_THK ,CASE WHEN A.SLAB_WTH >= 0 AND A.SLAB_WTH <= 1550 THEN 1550 WHEN A.SLAB_WTH > 1550 AND A.SLAB_WTH <= 1650 THEN 1650 WHEN A.SLAB_WTH > 1650 AND A.SLAB_WTH <= 2400 THEN 2400 END SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,DECODE(A.CUR_PROG_CD,'RGA',1,0) RGA_CNT ,DECODE(A.CUR_PROG_CD,'RGB',1,0) RGB_CNT FROM TBG02_SLAB_COMM A WHERE A.SLAB_WTH >=0 AND A.SLAB_WTH <=2400 AND A.SLAB_STAT = '2' AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CUR_PROG_CD IN ('RGA','RGB') ) UNION ALL (SELECT A.SLAB_THK ,1550 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBF01_SPEC_SLAB A, TBF01_SPEC_CHARGE B WHERE A.SLAB_WTH >=0 AND A.SLAB_WTH <=1550 AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CHARGE_EDT_SEQ = B.CHARGE_EDT_SEQ AND B.STATUS_CD IN ('A','B') AND B.PROG_CD IN ('JBA','JBB','JJB','JBF','JCF','JRF','JLF') UNION ALL SELECT A.SLAB_THK ,1550 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBG02_SLAB_COMM A WHERE A.SLAB_WTH >=0 AND A.SLAB_WTH <=1550 AND A.SLAB_STAT = '2' AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CUR_PROG_CD IN ('RGA','RGB') ) UNION ALL (SELECT A.SLAB_THK ,1650 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBF01_SPEC_SLAB A, TBF01_SPEC_CHARGE B WHERE A.SLAB_WTH >1550 AND A.SLAB_WTH <=1650 AND A.SLAB_RT IN ('P','Z') AND A.SLAB_RT LIKE ? || '%' AND A.CHARGE_EDT_SEQ = B.CHARGE_EDT_SEQ AND B.STATUS_CD IN ('A','B') AND B.PROG_CD IN ('JBA','JBB','JJB','JBF','JCF','JRF','JLF') UNION ALL SELECT A.SLAB_THK ,1650 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBG02_SLAB_COMM A WHERE A.SLAB_WTH >1550 AND A.SLAB_WTH <=1650 AND A.SLAB_STAT = '2' AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CUR_PROG_CD IN ('RGA','RGB') ) UNION ALL (SELECT A.SLAB_THK ,2400 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBF01_SPEC_SLAB A, TBF01_SPEC_CHARGE B WHERE A.SLAB_WTH >1650 AND A.SLAB_WTH <=2400 AND A.SLAB_RT IN ('P','Z') AND A.SLAB_RT LIKE ? || '%' AND A.CHARGE_EDT_SEQ = B.CHARGE_EDT_SEQ AND B.STATUS_CD IN ('A','B') AND B.PROG_CD IN ('JBA','JBB','JJB','JBF','JCF','JRF','JLF') UNION ALL SELECT A.SLAB_THK ,2400 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBG02_SLAB_COMM A WHERE A.SLAB_WTH >1650 AND A.SLAB_WTH <=2400 AND A.SLAB_STAT = '2' AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CUR_PROG_CD IN ('RGA','RGB') ) )M GROUP BY (SLAB_THK, SLAB_WTH) ) GROUP BY ROLLUP (SLAB_THK, SLAB_WTH) /**************************************根据数量统计板坯进程***************************************/ ]]> = 0 AND A.SLAB_WTH <= 1550 THEN 1550 WHEN A.SLAB_WTH > 1550 AND A.SLAB_WTH <= 1650 THEN 1650 WHEN A.SLAB_WTH > 1650 AND A.SLAB_WTH <= 2400 THEN 2400 END SLAB_WTH ,DECODE(B.PROG_CD,'JBA',A.SLAB_WGT,0) JBA_CNT ,DECODE(B.PROG_CD,'JBB',A.SLAB_WGT,0) JBB_CNT ,DECODE(B.PROG_CD,'JJB',A.SLAB_WGT, 'JBF',A.SLAB_WGT, 'JCF',A.SLAB_WGT, 'JRF',A.SLAB_WGT, 'JLF',A.SLAB_WGT,0) JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBF01_SPEC_SLAB A, TBF01_SPEC_CHARGE B WHERE A.SLAB_WTH >=0 AND A.SLAB_WTH <=2400 AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CHARGE_EDT_SEQ = B.CHARGE_EDT_SEQ AND B.STATUS_CD IN ('A','B') AND B.PROG_CD IN ('JBA','JBB','JJB','JBF','JCF','JRF','JLF') UNION ALL SELECT A.SLAB_THK ,CASE WHEN A.SLAB_WTH >= 0 AND A.SLAB_WTH <= 1550 THEN 1550 WHEN A.SLAB_WTH > 1550 AND A.SLAB_WTH <= 1650 THEN 1650 WHEN A.SLAB_WTH > 1650 AND A.SLAB_WTH <= 2400 THEN 2400 END SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,DECODE(A.CUR_PROG_CD,'RGA',A.SLAB_WGT,0) RGA_CNT ,DECODE(A.CUR_PROG_CD,'RGB',A.SLAB_WGT,0) RGB_CNT FROM TBG02_SLAB_COMM A WHERE A.SLAB_WTH >=0 AND A.SLAB_WTH <=2400 AND A.SLAB_STAT = '2' AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CUR_PROG_CD IN ('RGA','RGB') ) UNION ALL (SELECT A.SLAB_THK ,1550 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBF01_SPEC_SLAB A, TBF01_SPEC_CHARGE B WHERE A.SLAB_WTH >=0 AND A.SLAB_WTH <=1550 AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CHARGE_EDT_SEQ = B.CHARGE_EDT_SEQ AND B.STATUS_CD IN ('A','B') AND B.PROG_CD IN ('JBA','JBB','JJB','JBF','JCF','JRF','JLF') UNION ALL SELECT A.SLAB_THK ,1550 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBG02_SLAB_COMM A WHERE A.SLAB_WTH >=0 AND A.SLAB_WTH <=1550 AND A.SLAB_STAT = '2' AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CUR_PROG_CD IN ('RGA','RGB') ) UNION ALL (SELECT A.SLAB_THK ,1650 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBF01_SPEC_SLAB A, TBF01_SPEC_CHARGE B WHERE A.SLAB_WTH >1550 AND A.SLAB_WTH <=1650 AND A.SLAB_RT IN ('P','Z') AND A.SLAB_RT LIKE ? || '%' AND A.CHARGE_EDT_SEQ = B.CHARGE_EDT_SEQ AND B.STATUS_CD IN ('A','B') AND B.PROG_CD IN ('JBA','JBB','JJB','JBF','JCF','JRF','JLF') UNION ALL SELECT A.SLAB_THK ,1650 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBG02_SLAB_COMM A WHERE A.SLAB_WTH >1550 AND A.SLAB_WTH <=1650 AND A.SLAB_STAT = '2' AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CUR_PROG_CD IN ('RGA','RGB') ) UNION ALL (SELECT A.SLAB_THK ,2400 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBF01_SPEC_SLAB A, TBF01_SPEC_CHARGE B WHERE A.SLAB_WTH >1550 AND A.SLAB_WTH <=1650 AND A.SLAB_RT IN ('P','Z') AND A.SLAB_RT LIKE ? || '%' AND A.CHARGE_EDT_SEQ = B.CHARGE_EDT_SEQ AND B.STATUS_CD IN ('A','B') AND B.PROG_CD IN ('JBA','JBB','JJB','JBF','JCF','JRF','JLF') UNION ALL SELECT A.SLAB_THK ,2400 SLAB_WTH ,0 JBA_CNT ,0 JBB_CNT ,0 JJB_CNT ,0 RGA_CNT ,0 RGB_CNT FROM TBG02_SLAB_COMM A WHERE A.SLAB_WTH >1650 AND A.SLAB_WTH <=2400 AND A.SLAB_STAT = '2' AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE ? || '%' AND A.CUR_PROG_CD IN ('RGA','RGB') ) )M GROUP BY (SLAB_THK, SLAB_WTH) ) GROUP BY ROLLUP (SLAB_THK, SLAB_WTH) /**************************************根据重量统计板坯进程***************************************/ ]]> = 0 AND A.SLAB_WTH <= 1550 THEN 1550 WHEN A.SLAB_WTH > 1550 AND A.SLAB_WTH <= 1650 THEN 1650 WHEN A.SLAB_WTH > 1650 AND A.SLAB_WTH <= 2400 THEN 2400 END SLAB_WTH_FL FROM TBF01_SPEC_SLAB A, TBF01_SPEC_CHARGE B, TBF01_CHARGE_IDX C WHERE A.CHARGE_EDT_SEQ = B.CHARGE_EDT_SEQ AND B.CHARGE_EDT_SEQ = C.CHARGE_EDT_SEQ AND A.SLAB_WTH >=0 AND A.SLAB_WTH <=2400 AND A.SLAB_RT IN ('Z','P') AND A.SLAB_RT LIKE '' || '%' AND B.STATUS_CD IN ('A','B') AND B.PROG_CD IN ('JBA','JBB','JJB','JBF','JCF','JRF','JLF') UNION ALL SELECT A.SLAB_NO, A.STL_GRD, A.SLAB_THK, A.SLAB_WTH, A.SLAB_LEN, A.SLAB_WGT, A.CUR_PROG_CD PROG_CD, DECODE (CUR_PROG_CD,'RGA','出库待机', 'RGB','出库指示','') PROG_CD_FL, A.SLAB_RT, B.DSN_SLAB_NO, 'Y' L2_SEND ,CASE WHEN A.SLAB_WTH >= 0 AND A.SLAB_WTH <= 1550 THEN 1550 WHEN A.SLAB_WTH > 1550 AND A.SLAB_WTH <= 1650 THEN 1650 WHEN A.SLAB_WTH > 1650 AND A.SLAB_WTH <= 2400 THEN 2400 END SLAB_WTH_FL FROM TBG02_SLAB_COMM A, TBF01_SPEC_SLAB B WHERE A.PLAN_SLAB_NO = B.SLAB_MANA_NO(+) AND A.SLAB_WTH >=0 AND A.SLAB_WTH <=2400 AND A.SLAB_STAT = '2' AND A.SLAB_RT IN ('Z','P') AND A.CUR_PROG_CD IN ('RGA','RGB') ) SELECT C.SLAB_MANA_NO, C.STL_GRD, C.SLAB_THK, C.SLAB_WTH, C.SLAB_LEN, C.SLAB_WGT, T1.SM_CFNM PROG_CD, T2.SM_CFNM SLAB_RT, C.DSN_SLAB_NO, C.L2_SEND FROM C, (SELECT T.SM_CD, T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'E01002') T1, (SELECT T.SM_CD, T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'B01004') T2 WHERE T1.SM_CD = C.PROG_CD AND T2.SM_CD = C.SLAB_RT AND C.SLAB_THK LIKE decode(?,'合计','',?) || '%' AND C.SLAB_WTH_FL LIKE decode(?,'合计','','小计','',?) || '%' AND C.PROG_CD_FL LIKE decode(?,'合计','',?) || '%' AND C.SLAB_RT LIKE ? || '%' ORDER BY C.SLAB_MANA_NO /*******************************根据块数求各炉次所接受的热轧板坯参数***********************************/ ]]>