SELECT '冷轧' PROD_LINE ,B.OLD_SAMPL_NO --钢卷号 ,A.SMP_NO --试样号 ,A.SMP_CUT_LOC --位置 ,A.SPEC_ABBSYM --标准号 ,A.SPEC_STL_GRD ,B.INSTR_COIL_THK COIL_THK --钢卷厚度 ,A.SMP_WORK_DTIME --检验时间 ,decode(A.OVER_SMP_TP , NULL , NULL , 'Y') OVER_SMP_TP --是否为复样 ,A.SMP_DETAIL FROM TBB02_LOT_COM A , C_TBC02_COIL_COMM B WHERE SMP_PROG_CD = 'D' AND A.SMP_NO = B.SMP_NO AND B.SMP_DIR_PIC_YN = 'Y' --取样的钢卷号 AND A.QLTY_DCS_TP IS NULL --非‘Y’,表未进入可判定状态 AND (B.SMP_STATS IS NULL OR (B.SMP_STATS IS NOT NULL AND B.ORD_FL != '2')) --排除改判的钢卷，改判钢卷在改判确定界面判定 ORDER BY B.OLD_SAMPL_NO SELECT '冷轧' PROD_LINE ,B.OLD_SAMPL_NO --钢卷号 ,A.SMP_NO --试样号 ,A.SMP_CUT_LOC --位置 ,A.SPEC_ABBSYM --标准号 ,A.SPEC_STL_GRD ,B.INSTR_COIL_THK COIL_THK --钢卷厚度 ,A.SMP_WORK_DTIME --检验时间 ,decode(A.OVER_SMP_TP , NULL , NULL , 'Y') OVER_SMP_TP --是否为复样 ,A.SMP_DETAIL FROM TBB02_LOT_COM A , C_TBL02_COIL_COMM B WHERE SMP_PROG_CD = 'D' AND A.SMP_NO = B.SMP_NO AND B.SMP_DIR_PIC_YN = 'Y' --取样的钢卷号 AND A.QLTY_DCS_TP IS NULL --非‘Y’,表未进入可判定状态 AND (B.SMP_STATS IS NULL OR (B.SMP_STATS IS NOT NULL AND B.ORD_FL != '2')) --排除改判的钢卷，改判钢卷在改判确定界面判定 ORDER BY B.OLD_SAMPL_NO UPDATE TBB02_LOT_COM T SET T.QLTY_DCS_TP = 'C' --C表示冷轧 WHERE T.SMP_NO = ? AND T.SMP_CUT_LOC = ? {call ZL_LIANT_DCS01.DCS_COIL_QLTY(?,?)} {call ZL_SUAN_DCS01.DCS_COIL_QLTY(?,?)}