SELECT T.SM_CD VALUE , T.SM_CFNM LABEL FROM TBZ00_COMMCD T WHERE T.LG_CD = 'E01002' = NVL(?,'R0-000000A') AND SUBSTR(A.OLD_SAMPL_NO,1,10) <= NVL(?,'R9-999999A') AND AA.ORD_NO = A.ORD_NO AND AA.ORD_SEQ = A.ORD_SEQ ]]> SELECT C.OLD_SAMPL_NO, --钢卷号 AA.DSN_KIND, AA.PROD_CD, AA.PROD_CD_CFNM, AA.PROD_TYPE, AA.DCS_SYM, AA.PROD_VAL, AA.PROD_VAL_EXP1, AA.PROD_VAL_EXP2, AA.PROD_VAL_EXP3, AA.MEMO FROM (SELECT ORD.ORD_NO ORD_NO, ORD.ORD_SEQ ORD_SEQ, ORD.DSN_KIND DSN_KIND, ORD.PROD_CD PROD_CD, SP.PROD_CD_CFNM PROD_CD_CFNM, SP.DISPLAY_SEQ, SUBSTR(ORD.PROD_CD, 1, 4) PROD_CD_4, ORD.PROD_TYPE PROD_TYPE, ORD.DCS_SYM DCS_SYM, ORD.PROD_VAL PROD_VAL, ORD.PROD_VAL_EXP1 PROD_VAL_EXP1, ORD.PROD_VAL_EXP2 PROD_VAL_EXP2, ORD.PROD_VAL_EXP3 PROD_VAL_EXP3, ORD.MEMO MEMO FROM TBA01_ORD_LINE LIN, TBB01_ORD_TECH ORD, TBB01_ORD_HEAD OHD, TBB01_SEQ_PROD SP WHERE LIN.ORD_NO = ORD.ORD_NO AND LIN.ORD_SEQ = ORD.ORD_SEQ AND ORD.ORD_NO = OHD.ORD_NO AND ORD.ORD_SEQ = OHD.ORD_SEQ AND ORD.PROD_CD = SP.PROD_CD AND ORD.DSN_KIND = '2') AA, C_TBK02_COIL_COMM C WHERE AA.ORD_NO = C.ORD_NO AND AA.ORD_SEQ = C.ORD_SEQ AND C.OLD_SAMPL_NO = SELECT * FROM TBB02_DCS_TECH T WHERE T.COIL_NO = ? AND T.PROD_CD = ? INSERT INTO TBB02_DCS_TECH( COIL_NO, PROD_CD, PROD_DCS_RST, PROD_DCS_TP, PROD_DCS_DTIME, REG_ID, REG_DTIME ) VALUES(?,?,?,?,TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'),?,TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')) UPDATE TBB02_DCS_TECH SET PROD_DCS_RST = ? --判定结果 ,PROD_DCS_TP = ? --判定类型 ,PROD_DCS_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') --判定时间 ,REG_ID = ? --修改人 ,MOD_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS') --修改日期 WHERE COIL_NO = ? --钢卷号 AND PROD_CD = ? --规范代码 {call ZL_HOST_DCS01.NIB028010(?,?,?,?,?,?,?)}