起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 549|回复: 17

【结】文档关联报错

[复制链接]
发表于 2010-3-29 15:33:43 | 显示全部楼层 |阅读模式
我编译文档关联信息  
报错,错误如下:
[错误]Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO2.INFO.PAS(342, 27): Undeclared identifier "InOperator"
[错误]Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO2.INFO.PAS(273, 18): Assertion failure (E:\DEVELOP\BUILD_MOSTNEW\TIB3\SRC_PROTECTED\COMMONLANGUAGE\ILCode\ILCode.pas, line 1209)
[错误]Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO2.INFO.PAS(847, 21): Undeclared identifier "InOperator"
[错误]Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO2.INFO.PAS(841, 11): Assertion failure (E:\DEVELOP\BUILD_MOSTNEW\TIB3\SRC_PROTECTED\COMMONLANGUAGE\ILCode\ILCode.pas, line 1209)
[错误]Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO2.INFO.PAS(55, 15): 'TDOCRELEVANCYINFO2.DataSetDocRelevancyBeforePost' 过程声明了,但没有实现
[错误]Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO2.INFO.PAS(88, 22): 'TDOCRELEVANCYINFO2.FillRelevancyDataSet' 过程声明了,但没有实现
[错误]Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO2.INFO.DIR\RELEVANCYGRID.FORMDOC.PAS(2163, 23): Undeclared identifier "InOperator"



但是在别人的平台下编译没有任何问题
我是从别人那里直接拷过来的
回复

使用道具 举报

发表于 2010-3-29 16:31:36 | 显示全部楼层
你们是连接的一个系统数据库吗?
如果不是,是否是一个版本呢?应该是资源不一致造成的
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-3-29 16:38:35 | 显示全部楼层
不是同一个数据库
我最开始用自己的报错  然后把别人的导过来  
还是报错  错误一样
回复 支持 反对

使用道具 举报

发表于 2010-3-29 16:48:48 | 显示全部楼层
版本一致吗?怀疑资源部一致,
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-3-29 17:05:31 | 显示全部楼层
版本一致
都是3002
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-3-30 09:19:55 | 显示全部楼层
服务器错误是在 342行
     // TS 为了兼容
        lCloneDataSet.FieldByName('FDOCURL').AsString := FileSys.cDocFilePrefix + lQuery.FieldByName('FPATH').AsString
          + lQuery.FieldByName('FID').AsString + lQuery.FieldByName('FKIND').AsString;

        if lCloneDataSet.FieldByName('FCUREDITORURL').AsString = '' then
          lCloneDataSet.FieldByName('FEDITSTATE').AsString := TDocConst.EditState_None
        else if TOrgUtils.InOperator(TSystemCore.Operator, lCloneDataSet.FieldByName('FCUREDITORURL').AsString) then
          lCloneDataSet.FieldByName('FEDITSTATE').AsString := TDocConst.EditState_OperatorEditing
        else
          lCloneDataSet.FieldByName('FEDITSTATE').AsString := TDocConst.EditState_NotOperatorEditing;

        if lCloneDataSet.FieldByName('FCUREDITORURL').AsString = '' then
        begin
          lCloneDataSet.FieldByName('FCONTENTCHANGED').AsInteger := 0;
          lCloneDataSet.FieldByName('FFILESTATE').AsInteger := FileState_None;
        end;
        lCloneDataSet.Post;
        lCloneDataSet.Next;
      end
回复 支持 反对

使用道具 举报

发表于 2010-3-30 09:46:14 | 显示全部楼层
由出错的URL找到出错的资源,从正常的库里把资源导过来就行了!
Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO2
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-3-30 09:50:14 | 显示全部楼层
??
怎么解决?
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-3-30 09:56:04 | 显示全部楼层
怎么解决?
回复 支持 反对

使用道具 举报

发表于 2010-3-30 09:59:14 | 显示全部楼层
由出错的URL找到出错的资源,从正常的库里把资源导过来就行了!
Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO2
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-11 03:23 , Processed in 0.047689 second(s), 16 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表