SELECT SM_CFNM LABEL ,SM_CD VALUE FROM TBZ00_COMMCD WHERE LG_CD = 'B01108' SELECT 'N' CHK ,C.COIL_NO --钢卷号 ,C.SMP_DIR_PIC_YN ,C.SAMPL_NO SMP_NO ,C.SAMPL_CUT_LOC SMP_CUT_LOC ,C.ORD_NO ,C.ORD_SEQ ,C.DCS_THK ,PKG_QUALITY_COMM.FIB020203(C.ORD_USE_CD ) ORD_USE_CD --订单用途 ,C.SPEC_ABBSYM --标准号 ,C.SPEC_STL_GRD ,C.SLAB_NO --板坯号 ,C.MATLQLTY_DEC_GRD --材质判定等级 ,C.OLD_SAMPL_NO ,DECODE(L.OVER_SMP_TP , NULL , NULL , L.OVER_SMP_TP ) OVER_SMP_TP FROM TBH02_COIL_COMM C , TBB02_LOT_COM L WHERE C.TOT_DEC_GRD IS NULL AND C.MATLQLTY_DEC_GRD = '2' --AND C.COIL_STAT = '2' AND C.SAMPL_NO = L.SMP_NO AND (L.OVER_SMP_TP IS NULL OR L.OVER_SMP_TP != '9') AND L.SMP_PROG_CD = 'E' AND DECODE(? , '1' , '1' , SUBSTR(C.OLD_SAMPL_NO , 1,10)) BETWEEN ? AND ? ORDER BY C.OLD_SAMPL_NO SELECT 'Y' CHK ,CCM.COIL_NO ,CCM.OLD_SAMPL_NO ,CCM.DCS_THK ,CCM.SPEC_ABBSYM ,CCM.SPEC_STL_GRD ,PKG_QUALITY_COMM.FIB020203(CCM.ORD_USE_CD ) ORD_USE_CD --订单用途 ,CCM.SLAB_NO ,CCM.SAMPL_NO SMP_NO ,CCM.SAMPL_CUT_LOC SMP_CUT_LOC ,CCM.SMP_DIR_PIC_YN ,DECODE(CCM.COIL_NO , ? , 'Y' , NULL) QUYANGJUAN FROM TBH02_COIL_COMM CCM WHERE CCM.SAMPL_NO = ? AND CCM.MATLQLTY_DEC_GRD = '2' -- AND CCM.COIL_STAT = '2' AND CCM.TOT_DEC_GRD IS NULL ORDER BY CCM.OLD_SAMPL_NO SELECT 1 FROM TBB02_LOT_COIL WHERE SMP_TIP_YN ='Y' UPDATE TBB02_LOT_COM T SET T.OVER_SMP_TP = '9' WHERE T.SMP_NO = ? {call NIB027060(? , ? , ? , ? )}