SELECT 'N' CHK , SM_CFNM , SM_CD FROM TBZ00_COMMCD WHERE LG_CD='H02001' SELECT TO_NUMBER( ROUND(( nvl((select T.SLAB_WGT from tbg02_slab_comm T where T.SLAB_NO = (SELECT A.SLAB_NO FROM TBH02_COIL_COMM A WHERE A.OLD_SAMPL_NO = ?) ),0)*98)/100,1)) SQL_WGT from dual SELECT TO_NUMBER( ROUND(( nvl((select T.SLAB_WGT from tbg02_slab_comm T where T.SLAB_NO = (SELECT A.SLAB_NO FROM TBH02_COIL_COMM A WHERE A.OLD_SAMPL_NO = ?) ),0)*98.5)/100,3)) SQL_WGT from dual UPDATE TBH02_COIL_COMM A SET A.COIL_THK = ?, A.COIL_WTH = ?, A.COIL_LEN = ?, --记录修改前的钢卷重量 A.BEF_ACT_WGT = A.ACT_WGT, A.ACT_WGT = ?, A.CAL_WGT = ?, --A.CRK_CD1 = ?, --A.CRK_CD2 = ?, --A.CRK_CD3 = ?, --A.CRK_CD4 = ?, --A.CRK_CD5 = ?, A.YARD_XX_ENTRY_SHIFT = ?, A.YARD_XX_ENTRY_GROUP = ?, A.YARD_XX_ENTRY_REG = ?, A.YARD_XX_ENTRY_DTIME = ?, A.REM_YARD = ?, A.YARD_XX_ENTRY_USE_REG = ?, A.YARD_XX_ENTRY_USE_TIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MIDD') WHERE A.OLD_SAMPL_NO = ? UPDATE TBH02_COIL_COMM A SET A.ACT_WGT = ?, A.WGT_REG = ?, A.WGT_TIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MIDD'), A.SEND_WGT = '1' WHERE A.OLD_SAMPL_NO = ? UPDATE TBJ02_COIL_COMM A SET A.ACT_WGT = ?/1000 WHERE A.OLD_SAMPL_NO = ? UPDATE TBJ02_COIL_COMM A SET a.ISACEPT = '0', a.ISCHANGEWGT = '0' WHERE A.DLIV_DIRNO = ? UPDATE TBH02_COIL_COMM A SET A.REM_YARD = ? ,A.YARD_XX_ENTRY_REG = ?,A.YARD_XX_ENTRY_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MIDD') WHERE A.OLD_SAMPL_NO = ? {call ZL_HOST_DCS03.TOT_DCS_CANCEL(? ,?, ?)} UPDATE TBH02_COIL_COMM A SET A.YARD_XX_ENTRY_SHIFT = ?, A.YARD_XX_ENTRY_GROUP = ?, A.YARD_XX_ENTRY_REG = ?, A.YARD_XX_ENTRY_DTIME = ?, A.REM_YARD = ?, A.YARD_XX_ENTRY_USE_REG = ?, A.YARD_XX_ENTRY_USE_TIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MIDD') WHERE A.OLD_SAMPL_NO = ?