SELECT CCM.COIL_NO ,CCM.OLD_SAMPL_NO ,SP.ROLL_MANA_NO ,CCM.SAMPL_NO ,DECODE(CCM.ORD_NO , NULL , CCM.ORG_ORD_NO , CCM.ORD_NO) ORD_NO ,DECODE(CCM.ORD_SEQ , NULL , CCM.ORG_ORD_SEQ , CCM.ORD_SEQ) ORD_SEQ ,PKG_QUALITY_COMM.FIB010200(DECODE(CCM.ORD_NO , NULL , CCM.ORG_ORD_NO , CCM.ORD_NO) ,DECODE(CCM.ORD_SEQ , NULL , CCM.ORG_ORD_SEQ , CCM.ORD_SEQ) ) CUST_SPEC_NO ,CCM.SPEC_ABBSYM ,CCM.SPEC_STL_GRD ,CCM.INGR_DEC_GRD ,CCM.MATLQLTY_DEC_GRD ,CCM.SIZE_DEC_RST ,CCM.WGT_DEC_RST ,CCM.PROC_DEC_RST ,CCM.EXTSHAPE_DEC_GRD ,CCM.SLAB_NO ,CCM.TOT_DEC_GRD ,CCM.TOT_DEC_DTIME ,CCM.TOT_DEC_EMP_ID ,CCM.CUR_PROG_CD ,'N' TOT_OVER FROM TBH02_COIL_COMM CCM , TBF02_SPEC_MILL SP WHERE CCM.TOT_DEC_GRD IS NOT NULL AND CCM.COIL_NO = SP.COIL_NO(+) AND CCM.SPEC_STL_GRD LIKE ?||'%' AND CCM.TOT_DEC_DTIME BETWEEN ? AND ? ORDER BY CCM.OLD_SAMPL_NO SELECT CCM.COIL_NO ,CCM.OLD_SAMPL_NO ,SP.ROLL_MANA_NO ,CCM.SAMPL_NO ,DECODE(CCM.ORD_NO , NULL , CCM.ORG_ORD_NO , CCM.ORD_NO) ORD_NO ,DECODE(CCM.ORD_SEQ , NULL , CCM.ORG_ORD_SEQ , CCM.ORD_SEQ) ORD_SEQ ,PKG_QUALITY_COMM.FIB010200(DECODE(CCM.ORD_NO , NULL , CCM.ORG_ORD_NO , CCM.ORD_NO) ,DECODE(CCM.ORD_SEQ , NULL , CCM.ORG_ORD_SEQ , CCM.ORD_SEQ) ) CUST_SPEC_NO ,CCM.SPEC_ABBSYM ,CCM.SPEC_STL_GRD ,CCM.INGR_DEC_GRD ,CCM.MATLQLTY_DEC_GRD ,CCM.SIZE_DEC_RST ,CCM.WGT_DEC_RST ,CCM.PROC_DEC_RST ,CCM.EXTSHAPE_DEC_GRD ,CCM.SLAB_NO ,CCM.TOT_DEC_GRD ,CCM.TOT_DEC_DTIME ,CCM.TOT_DEC_EMP_ID ,CCM.CUR_PROG_CD ,'N' TOT_OVER FROM TBH02_COIL_COMM CCM , TBF02_SPEC_MILL SP WHERE CCM.TOT_DEC_GRD IS NOT NULL AND CCM.COIL_NO = SP.COIL_NO(+) AND CCM.SPEC_STL_GRD LIKE ?||'%' AND SUBSTR(CCM.OLD_SAMPL_NO , 1 , 10) BETWEEN ? AND ? ORDER BY CCM.OLD_SAMPL_NO SELECT CCM.COIL_NO ,CCM.OLD_SAMPL_NO ,CCM.SAMPL_NO ,CCM.ORD_NO ,CCM.ORD_SEQ ,CCM.SPEC_ABBSYM ,CCM.SPEC_STL_GRD ,CCM.INGR_DEC_GRD ,CCM.MATLQLTY_DEC_GRD ,CCM.SIZE_DEC_RST ,CCM.WGT_DEC_RST ,CCM.PROC_DEC_RST ,CCM.EXTSHAPE_DEC_GRD ,CCM.SLAB_NO ,CCM.CUR_PROG_CD ,DECODE(CCM.ORD_FL , 1 , '订单材' , '余材')||DECODE(CCM.MISSNO_CLF_CD , NULL ,'' , ' 轧废') MISSNO_CLF_CD ,LCM.SMP_PROG_CD ,CCM.MILL_DTIME ,LINE.ORD_DEVLMT_DATE ,SYSDATE - TO_DATE(CCM.MILL_DTIME , 'YYYYMMDDHH24MISS') WXXX FROM TBH02_COIL_COMM CCM , TBB02_LOT_COM LCM ,TBA01_ORD_LINE LINE WHERE CCM.TOT_DEC_GRD IS NULL AND CCM.COIL_STAT = '2' AND CCM.SAMPL_NO = LCM.SMP_NO(+) AND CCM.ORD_NO = LINE.ORD_NO(+) AND CCM.ORD_SEQ = LINE.ORD_SEQ(+) ORDER BY CCM.OLD_SAMPL_NO SELECT CCM.COIL_NO ,CCM.OLD_SAMPL_NO ,SP.ROLL_MANA_NO ,CCM.SAMPL_NO ,DECODE(CCM.ORD_NO , NULL , CCM.ORG_ORD_NO , CCM.ORD_NO) ORD_NO ,DECODE(CCM.ORD_SEQ , NULL , CCM.ORG_ORD_SEQ , CCM.ORD_SEQ) ORD_SEQ ,PKG_QUALITY_COMM.FIB010200(DECODE(CCM.ORD_NO , NULL , CCM.ORG_ORD_NO , CCM.ORD_NO) ,DECODE(CCM.ORD_SEQ , NULL , CCM.ORG_ORD_SEQ , CCM.ORD_SEQ) ) CUST_SPEC_NO ,CCM.SPEC_ABBSYM ,CCM.SPEC_STL_GRD ,CCM.INGR_DEC_GRD ,CCM.MATLQLTY_DEC_GRD ,CCM.SIZE_DEC_RST ,CCM.WGT_DEC_RST ,CCM.PROC_DEC_RST ,CCM.EXTSHAPE_DEC_GRD ,CCM.SLAB_NO ,CCM.TOT_DEC_GRD ,CCM.TOT_DEC_DTIME ,CCM.TOT_DEC_EMP_ID ,CCM.CUR_PROG_CD ,'N' TOT_OVER FROM TBH02_COIL_COMM CCM , TBF02_SPEC_MILL SP WHERE CCM.TOT_DEC_GRD IS NOT NULL AND CCM.COIL_NO = SP.COIL_NO(+) AND CCM.ORD_NO||CCM.ORD_SEQ LIKE ?||'%' AND CCM.SPEC_STL_GRD LIKE ?||'%' ORDER BY CCM.OLD_SAMPL_NO {call ZL_HOST_DCS03.TOTL_DCS_CANCEL(?,?,?) } {call PKG_QUALITY_COMM.PIB020236(?) }