用友U8档案编码批量更新工具1004(2011年度不再免费，将分级收费注册）

yifeng651

出处:
本工具主要解决用友Ｕ８管理软件实施及维护过程中针对档案编码批量
修改的处理．

包括:
      由于用友Ｕ８基础档案表和各业务单据数据表之间存在数据约束
及校验，导致档案一但使用将无法进行档案编码的修改维护．其一方面
维系了用友数据的引用完整性，另一方面对一些关键档案的维护增加了
一定的难度．

对于目前已经使用过的档案编码，本工具采用暂时关闭各表间关键约束
先进行原编码合法性校验，将原编码替换到过渡编码，再进行新编码合
法性校验．档案编码更新后，再利用过渡编码更新关键约束表的对应编
码，最后恢复关键表间约束．

参数及编码对应关系请参照配置文件［FC_CodeUpdate.xml］修改完成

1004版本:
增加数据库SA登陆选择数据库对象. 理论上可适用于任何用友版本数据库处理.
修改了用友客户端登陆, 增加U8.2x/U8.5x/U8.6x/U8.7x自动登陆.
通版本及普及版本未经过测试, 暂时不支持!
1003版本:
处理了无约束同名字段的内容更新.
修改了密码校验的类型错误.
修改窗口最小化恢复后自动刷新表格的错误.
授权许可: 2009-03-30


[ 本帖最后由 yifeng651 于 2008-10-14 15:30 编辑 ]

yifeng651

说明一下:

右边表格里数据分两部份, 上面是对应数据表间存在约束键值的, 下面是无约束但存在关键字段名相同的数据表.

范例:
针对U86X, 现存量表CurrentStock 和存货档案表Inventory 是存在外键约束的.
所以前一版本1002可以自动更新现存量表对应的存货编码.

但到了U87X, 用友数据库结构调整, 取消了该外键约束, 为什么取消, 我不知道.
但存货档案编码如果进行了调整, 那也必须同步调整现存量表里面的存货编码.
现在除了存在约束的数据自动更新, 同时增加非约束数据表间同名字段同步更新.
那样才不会出现现存量表存货编码因未调整倒致报表数据错误.

需要注意的是, 更新操作前千万记住数据账套备份. 免得因设置或者操作不当倒致损失.

针对问题"此工具进行存货档案编码更新后，物料清单中不能查询新编码了；"
刚才查了一下数据结构.
物料清单主表: bom_bom
物料清单母件: bom_cbom -> ParentId 母件物料ID  
物料清单子件: bom_opcomponent -> ComponentId 子件物料Id  
对应: bas_part物料表 -> PartId 编号
关联到:  InvCode 存货编码
可惜就是这个字段与默认存货编码cInvCode不相同, 而且又不存在编码约束.
只能想办法增加约束,更新完编码后, 再删除该约束了.

所以可以先通过SQL查询分析器, 手工加上一个外键约束:
Alter TABLE [bas_part]
Add FOREIGN KEY
(
  [InvCode]
) REFERENCES [Inventory] (
  [cInvCode]
)
更新完编码后, 再删除该约束:
ALTER TABLE dbo.bas_part
DROP CONSTRAINT FK__bas_part__InvCod__639A063E
注意该约束名,不尽相同.所以得通过系统表找到约束名,才能删除:  或者通过企业管理器直接找到数据表的字段设计,直接删除外键也可.
下面是通过系统表, 找约束的脚本.
--找出外键约束关系
select b.name As ConstName, c.name As ConstTable, d.name As ConstFkTable,e.name As ConstField,f.name As ConstFkField, a.keyno As ConstSpace
From sysforeignkeys a
Left Join sysobjects b On a.constid = b.id
Left Join sysobjects c On a.fkeyid = c.id
Left Join sysobjects d On a.rkeyid = d.id
Left Join syscolumns e On a.fkeyid = e.id And e.colid = a.fkey
Left Join syscolumns f On a.rkeyid = f.id And f.colid = a.rkey
--主表的系统ID
Where a.rkeyid=(select Id From sysobjects Where name='Inventory')
--主表字段的系统ID
And a.rkey=(select colid From syscolumns Where name='cInvCode'
            And ID=(select Id From sysobjects Where name='Inventory'))
--外键约束表名
And c.name='bas_part'
Order By c.name

[ 本帖最后由 yifeng651 于 2008-10-21 21:19 编辑 ]

泓漱

我的u8问题也很多啊

angelflying

这个工具太好了，再也不用为了更正一个编码错误的存货大费周折了～

jerry9699

多谢楼主分享，顶..................

roclily

我看看 是否能用

renjinlong

多谢楼主分享，顶..................

584131420114

正需要呢，感谢....
楼主BOM也能改过来吧?

风帆刘工

收藏了，该工具应该非常有用处。

renjinlong

我安装了，出现了“429错误”，如何解决？

xiaobb1984

我很郁闷，我的魁力不够啊，怎么办呢

xiaobb1984

我回复了一次还不行，TNND

yqzasd

不错的好工具，值得一顶了

msnqqasd

好工具，可惜偶的威望不够了，无法下载。郁闷~~~~~

msnqqasd

回复了几个帖子，现在看看能不能下载了