【结】文档关联报错

weirongjia · 发表于 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"

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

atiger · 发表于 2010-3-29 16:31:36

你们是连接的一个系统数据库吗？
如果不是，是否是一个版本呢？应该是资源不一致造成的

weirongjia · 发表于 2010-3-29 16:38:35

不是同一个数据库
我最开始用自己的报错然后把别人的导过来
还是报错错误一样

atiger · 发表于 2010-3-29 16:48:48

版本一致吗？怀疑资源部一致，

weirongjia · 发表于 2010-3-29 17:05:31

版本一致
都是3002

weirongjia · 发表于 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

SMP · 发表于 2010-3-30 09:46:14

由出错的URL找到出错的资源，从正常的库里把资源导过来就行了！
Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO2

weirongjia · 发表于 2010-3-30 09:50:14

？？
怎么解决？

weirongjia · 发表于 2010-3-30 09:56:04

怎么解决？

SMP · 发表于 2010-3-30 09:59:14

由出错的URL找到出错的资源，从正常的库里把资源导过来就行了！
Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO2

		自动登录	找回密码
密码			立即注册