电脑桌面
添加蚂蚁七词文库到电脑桌面
安装后可以在桌面快捷访问

升级8.6报 ORA-38301: 无法对回收站中的对象执行 DDL/DML

来源:金蝶云社区作者:金蝶2024-09-229

升级8.6报 ORA-38301: 无法对回收站中的对象执行 DDL/DML


[Execute provider[./eas/8_5_0to8_6_0/./8_6_0_feature/./eas/./fi/./gl/./bydb/./oracle/.\PT134978_datadeal-oracle.sql], sql[DECLARE
VSQL VARCHAR2(2000);
CNT PLS_INTEGER;
BEGIN
SELECT COUNT(*) FCOUNT INTO CNT FROM USER_OBJECTS WHERE OBJECT_TYPE='TABLE' AND OBJECT_NAME = 'T_GL_ACCTCUSSENT';
IF CNT = 1 THEN
SELECT COUNT(*) FCOUNT INTO CNT FROM USER_TAB_COLUMNS WHERE (TABLE_NAME = 'T_GL_ACCTCUSSENT' AND COLUMN_NAME = 'FVOUCHERTYPEID');
IF CNT = 0 THEN
VSQL := 'T.FID ,T.FCOMPANYID, T.FACCOUNTID, T.FPERIODID, T.FCURRENCYID, T.FVOUCHERID, T.FENTRYID, T.FVCHASSISTRECORDID, T.FASSGRPID';
VSQL := VSQL || ', T.FVARBIZDATE, T.FENDDATE, T.FBIZNUMBER, T.FISVIERIFIED, T.FISINIT, T.FISINITCLOSED, T.FUNVERIFIEDAMTFOR, T.FORIGINALAMOUNT,T.FLASTUPDATETIME';
VSQL := VSQL || ',V.FVOUCHERTYPEID,V.FNUMBER FVCHNUMBER';
VSQL := VSQL || ',CASE WHEN V.FBOOKEDDATE IS NULL THEN TO_DATE(''1970-01-01'',''YYYY-MM-DD'') ELSE V.FBOOKEDDATE END FBOOKEDDATE';
VSQL := VSQL || ',CASE WHEN V.FBIZSTATUS = 2 THEN -1 WHEN V.FBIZSTATUS = 5  THEN 1 ELSE 0 END FISPOST';
FOR VROWS IN (
SELECT COLUMN_NAME FROM USER_TAB_COLUMNS WHERE TABLE_NAME = 'T_GL_ACCTCUSSENT'
AND COLUMN_NAME NOT IN ('FID','FCOMPANYID', 'FACCOUNTID', 'FPERIODID', 'FCURRENCYID', 'FVOUCHERID', 'FENTRYID', 'FVCHASSISTRECORDID', 'FASSGRPID'
, 'FVARBIZDATE', 'FENDDATE', 'FBIZNUMBER', 'FISVIERIFIED', 'FISINIT', 'FISINITCLOSED', 'FUNVERIFIEDAMTFOR', 'FORIGINALAMOUNT','FLASTUPDATETIME'
, 'FVOUCHERTYPEID', 'FVCHNUMBER', 'FBOOKEDDATE', 'FISPOST')
)
LOOP
VSQL := VSQL || ',T.' || VROWS.COLUMN_NAME;
END LOOP;
EXECUTE IMMEDIATE 'CREATE TABLE T_GL_ACCTCUSSENT_TMP NOLOGGING PARALLEL AS SELECT ' || VSQL || ' FROM T_GL_ACCTCUSSENT T LEFT JOIN T_GL_VOUCHER V ON T.FVOUCHERID = V.FID';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT RENAME TO T_GL_ACCTCUSSENT_85BAK';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT_TMP RENAME TO T_GL_ACCTCUSSENT';
EXECUTE IMMEDIATE 'CREATE UNIQUE INDEX PK_GL_ACCTCUSSENT_V001 ON T_GL_ACCTCUSSENT (FID) PARALLEL NOLOGGING';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT ADD CONSTRAINT PK_GL_ACCTCUSSENT_V001 PRIMARY KEY (FID)';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FSEQ DEFAULT 1';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FENTRYDC DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FREPORTINGAMOUNT DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FLOCALAMOUNT DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FORIGINALAMOUNT DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FISINITCLOSED DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FISINIT DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FISPOST DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FUNVERIFIEDAMTFOR DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FUNVERIFIEDAMTLOCAL DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FUNVERIFIEDAMTRPT DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FUNVERIFIEDQTY DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FUNVERIFIEDSTDQTY DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FUNHOLDEDAMTFOR DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FUNHOLDEDAMTLOCAL DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FUNHOLDEDAMTRPT DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FUNHOLDEDQTY DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FUNHOLDEDSTDQTY DEFAULT 0';
EXECUTE IMMEDIATE 'ALTER TABLE T_GL_ACCTCUSSENT MODIFY FBOOKEDDATE DEFAULT TO_DATE(''1970-01-01'',''YYYY-MM-DD'')';
END IF;
END IF;
SELECT COUNT(*) FCOUNT INTO CNT FROM USER_INDEXES WHERE INDEX_NAME =

升级8.6报 ORA-38301: 无法对回收站中的对象执行 DDL/DML

[Execute provider[./eas/8_5_0to8_6_0/./8_6_0_feature/./eas/./fi/./gl/./bydb/./oracle/.\PT134978_datadeal-oracle.sql], sql[DECLAR...
点击下载文档文档为doc格式

声明:除非特别标注,否则均为本站原创文章,转载时请以链接形式注明文章出处。如若本站内容侵犯了原著者的合法权益,可联系本站删除。

已经是第一篇
确认删除?
回到顶部
客服QQ
  • 客服QQ点击这里给我发消息
QQ群
  • 答案:my7c点击这里加入QQ群
支持邮箱
微信
  • 微信