'M' AND E.ORD_USEAGE_CD = I.SM_CD(+) AND A.DSN_PROC_STAT LIKE NVL(:5,'1')||'%' AND A.ORD_NO LIKE :6||'%' AND A.ORD_SEQ LIKE :7||'%' AND J.ORD_CMT_DTIME BETWEEN NVL(:8,'00000000') AND NVL(:9,'99999999') AND E.ORD_WTH BETWEEN NVL(:10,0) AND NVL(:11,99999999) AND B.DLIV_TP LIKE NVL(:12,'%') --AND H.SM_CD LIKE NVL(:13,'%') AND ( :13 IS NULL OR E.RCVORD_CLF IN ( SELECT COLUMN_VALUE FROM TABLE(CAST(XB_PACKAGE.GF_TABSTR(:14) AS TABSTR_T)))) ----------------------------------------------------------------- --MODFIY BY SJW 091029 -- ADD THE SELECT STATEMENT OF ORD_PLAN_DATA AND NVL(B.ORD_PLAN_DATA,B.ORD_DEVLMT_DATE) BETWEEN NVL(:15,'00000000') AND NVL(:16,'99999999') --AND E.PRODNM_CD LIKE :16||'%' -- AND INSTR(NVL(:17 , E.PRODNM_CD) , E.PRODNM_CD) > 0 AND E.PRODNM_CD IN ( select regexp_substr(:17, '[^,]+', 1, rownum) pz from dual connect by rownum <= 12) AND E.PROD_LINE||'&' LIKE :18||'%') X ----------------------------------------------------------------- , TBD00_SLABDN_WGTSTD Y WHERE X.SLAB_THK = Y.SLAB_THK(+) AND X.SLAB_WTH = Y.SLAB_WTH(+) ORDER BY X.ORD_NO, X.ORD_SEQ ]]> 1550) THEN 1550 ELSE B.ORD_WTH + D.ADD_VALUE END AS SLAB_WTH , D.SLAB_LEN , DECODE(D.SLAB_LEN, 0, B.PROD_WGT_MAX * (1 + (1 - C.PROC_RATE / 100)) , CEIL( (D.SLAB_LEN * (B.ORD_WTH + D.ADD_VALUE) * D.SLAB_THK * D.GRAVITY * 1000) / 1000000000 )) AS SLAB_WGT , D.GRAVITY , B.EMGMTR_MNG_YN AS EMGMTR_YN , B.SCARFING_PROC_YN , B.GRIND_PROC_YN , A.HCR_CLF , B.EDGE_PROC_YN , B.SPM_PROC_YN , B.SHL_PROC_YN , B.SFC_PROC_YN , B.BTWSHT_INS_YN , B.KEEPWARM_YN , B.EACHLOT_YN , C.PROC_RATE AS PROC_RATE , H.SM_CFNM AS RCVORD_TP , E.PRODNM_CD , I.SM_CFNM AS ORD_USE_TP , B.ORD_REG_DTIME FROM TBD01_SLABDN_OBJ A, TBA01_ORD_LINE B ,(SELECT PROC_RATE FROM TBE01_PROC_RATE WHERE PROC_CD = 'R') C ,(SELECT MAX(DECODE(X.LG_CD,'D01002',TO_NUMBER(X.SM_CD))) AS SLAB_THK , MAX(DECODE(X.LG_CD,'D01006',TO_NUMBER(X.SM_CD))) AS GRAVITY , NVL(:1, 0) AS SLAB_LEN , NVL(:2, 50) AS ADD_VALUE FROM TBZ00_COMMCD X WHERE X.LG_CD IN ('D01002','D01006') AND X.CD_SEQ = 1) D ,(SELECT * FROM TBE02_ORD_PRC WHERE ORD_PROG_CD IN ('D','E') AND STL_GRD LIKE '%'||:3||'%') E , TBB01_ORD_PROD F , TBD00_STLGRD G ,(SELECT SM_CD, SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD = 'A01001') H ,(SELECT SM_CD, SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD = 'A01007') I WHERE A.ORD_NO = B.ORD_NO(+) AND A.ORD_SEQ = B.ORD_SEQ(+) AND B.ORD_NO = E.ORD_NO(+) AND B.ORD_SEQ = E.ORD_SEQ(+) AND E.ORD_NO = F.ORD_NO AND E.ORD_SEQ = F.ORD_SEQ AND E.STL_GRD = G.FAC_STL_GRD(+) AND E.RCVORD_CLF = H.SM_CD(+) AND E.ORD_USEAGE_CD = I.SM_CD(+) AND A.DSN_PROC_STAT LIKE NVL(:4,'1')||'%' AND A.ORD_NO LIKE :5||'%' AND A.ORD_SEQ LIKE :6||'%' AND B.ORD_REG_DTIME BETWEEN :7 AND :8) X , TBD00_SLABDN_WGTSTD Y WHERE X.SLAB_THK = Y.SLAB_THK(+) AND X.SLAB_WTH = Y.SLAB_WTH(+) ]]> 1450) THEN 1450 ELSE B.ORD_WTH + D.ADD_VALUE END AS SLAB_WTH , D.SLAB_LEN , CEIL( (D.SLAB_LEN * (B.ORD_WTH + D.ADD_VALUE) * D.SLAB_THK * D.GRAVITY * 1000) / 1000000000 ) AS SLAB_WGT , D.GRAVITY , B.EMGMTR_MNG_YN AS EMGMTR_YN , B.SCARFING_PROC_YN , B.GRIND_PROC_YN , A.HCR_CLF , B.EDGE_PROC_YN , B.SPM_PROC_YN , B.SHL_PROC_YN , B.SFC_PROC_YN , B.BTWSHT_INS_YN , B.KEEPWARM_YN , B.EACHLOT_YN , C.PROC_RATE AS PROC_RATE , H.SM_CFNM AS RCVORD_TP , E.PRODNM_CD , I.SM_CFNM AS ORD_USE_TP FROM TBD01_SLABDN_OBJ A, TBA01_ORD_LINE B ,(SELECT PROC_RATE FROM TBE01_PROC_RATE WHERE PROC_CD = 'R') C ,(SELECT MAX(DECODE(X.LG_CD,'D01002',TO_NUMBER(X.SM_CD))) AS SLAB_THK , MAX(DECODE(X.LG_CD,'D01006',TO_NUMBER(X.SM_CD))) AS GRAVITY , NVL(:1,11000) AS SLAB_LEN , NVL(:2, 50) AS ADD_VALUE FROM TBZ00_COMMCD X WHERE X.LG_CD IN ('D01002','D01006') AND X.CD_SEQ = 1) D ,(SELECT * FROM TBE02_ORD_PRC WHERE ORD_PROG_CD IN ('D','E')) E , TBB01_ORD_PROD F , TBD00_STLGRD G ,(SELECT SM_CD, SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD = 'A01001') H ,(SELECT SM_CD, SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD = 'A01007') I WHERE A.ORD_NO = B.ORD_NO(+) AND A.ORD_SEQ = B.ORD_SEQ(+) AND B.ORD_NO = E.ORD_NO(+) AND B.ORD_SEQ = E.ORD_SEQ(+) AND E.ORD_NO = F.ORD_NO AND E.ORD_SEQ = F.ORD_SEQ AND E.STL_GRD = G.FAC_STL_GRD(+) AND E.RCVORD_CLF = H.SM_CD(+) AND E.ORD_USEAGE_CD = I.SM_CD(+) AND A.DSN_PROC_STAT LIKE NVL(:3,'1')||'%' AND A.ORD_NO LIKE :4||'%' AND A.ORD_SEQ LIKE :5||'%') X , TBD00_SLABDN_WGTSTD Y WHERE X.SLAB_THK = Y.SLAB_THK(+) AND X.SLAB_WTH = Y.SLAB_WTH(+) /************************************************ [1] SLAB_LEN : 11000 (Default:11000) [2] ADDED_COIL_WTH : 50 (Default:50 ) [3] DSN_PROC_STAT :'1' (Default:'1' ) [4] ORD_NO : 412009011202 (Default:NULL ) [5] ORD_SEQ : 540 (Default:NULL ) *************************************************/ ]]> 1450) THEN 1450 ELSE B.ORD_WTH + D.ADD_VALUE END AS SLAB_WTH , D.SLAB_LEN , B.PROD_WGT_MAX * (1 + (1 - C.PROC_RATE / 100)) AS SLAB_WGT , D.GRAVITY , B.EMGMTR_MNG_YN AS EMGMTR_YN , B.SCARFING_PROC_YN , B.GRIND_PROC_YN , A.HCR_CLF , B.EDGE_PROC_YN , B.SPM_PROC_YN , B.SHL_PROC_YN , B.SFC_PROC_YN , B.BTWSHT_INS_YN , B.KEEPWARM_YN , B.EACHLOT_YN , C.PROC_RATE AS PROC_RATE , H.SM_CFNM AS RCVORD_TP , E.PRODNM_CD , I.SM_CFNM AS ORD_USE_TP FROM TBD01_SLABDN_OBJ A, TBA01_ORD_LINE B ,(SELECT PROC_RATE FROM TBE01_PROC_RATE WHERE PROC_CD = 'R') C ,(SELECT MAX(DECODE(X.LG_CD,'D01002',TO_NUMBER(X.SM_CD))) AS SLAB_THK , MAX(DECODE(X.LG_CD,'D01006',TO_NUMBER(X.SM_CD))) AS GRAVITY , NVL(:1,11000) AS SLAB_LEN , NVL(:2, 50) AS ADD_VALUE FROM TBZ00_COMMCD X WHERE X.LG_CD IN ('D01002','D01006') AND X.CD_SEQ = 1) D ,(SELECT * FROM TBE02_ORD_PRC WHERE ORD_PROG_CD IN ('D','E')) E , TBB01_ORD_PROD F , TBD00_STLGRD G ,(SELECT SM_CD, SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD = 'A01001') H ,(SELECT SM_CD, SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD = 'A01007') I WHERE A.ORD_NO = B.ORD_NO(+) AND A.ORD_SEQ = B.ORD_SEQ(+) AND B.ORD_NO = E.ORD_NO(+) AND B.ORD_SEQ = E.ORD_SEQ(+) AND E.ORD_NO = F.ORD_NO AND E.ORD_SEQ = F.ORD_SEQ AND E.STL_GRD = G.FAC_STL_GRD(+) AND E.RCVORD_CLF = H.SM_CD(+) AND E.ORD_USEAGE_CD = I.SM_CD(+) AND A.DSN_PROC_STAT LIKE NVL(:3,'1')||'%' AND A.ORD_NO LIKE :4||'%' AND A.ORD_SEQ LIKE :5||'%') X , TBD00_SLABDN_WGTSTD Y WHERE X.SLAB_THK = Y.SLAB_THK(+) AND X.SLAB_WTH = Y.SLAB_WTH(+) ]]>