【VIP专享】用友数据库一些技巧

合集下载
相关主题
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

用友数据库一些技巧1.使用SQL语句备份数据库

BACKUP DATABASE [pubs]

TO DISK = N'C:\pubs.bak'

WITH NOINIT, NOUNLOAD,

NAME = N'pubs 备份', NOSKIP, STATS = 10, NOFORMAT

(用跟踪器,跟踪企业管理器的备份数据库动作得到的)

2.数据库损坏

重装SQL2000,连接UFSYSTEM和UFDATA.

exec sp_attach_db "ufsystem" "d:\u8soft\admin\ufsystem.ldf","d:\u8soft\admin\ufsystem.mdf" exec sp_attach_single_file_db "ufdata_001_2004" "d:\u8soft\admin\zt001\2004\ufdata.mdf"

3.SQL2000不能启动。

手工备份库文件。删除SQL2000,删除U8,并且删除注册表中SQL2000信息,重新安装SQL2000,安装U8,用以前备份数据恢复帐套信息,停止SQL服务,用手工备份的库文件覆盖恢复的数据库,重新启动SQL服务,数据至此完全无损恢复。

4.解除Admin密码

打开数据库,找到UFSYSTEM数据库中的UA_User 清空cPassword即可,清空用ctrl+0

5.数据库启动要求输‘SA’口令

在开始,运行“ regsvr32.exe "C:\Program Files\Common Files\System\ado\msado15.dll" ”

用友数据库月末结转标志

以修改001账套存货核算5月份的结账为例:

1、

use ufdata_001_2009

update GL_mend set bflag_ia=1 where iperiod=5

2、

use ufsystem

update ua_account_sub set imodiperi=5 where cacc_id='001' and iyear='2009' and csub_id='IA'

各模块对应的简称如下:

应付-AP

应收-AR

固定资产-FA

总账-GL

存货核算-IA

网上银行-NB

委外管理-OM

生产管理-PP

采购管理-PU

销售管理-SA

库存管理-ST

工资管理-WA

发几条常用的维护用sql语句

分享到:0812Sql总帐清除期初语句

UPDATE GL_accass

SET mb = 0, md = 0, mc = 0 ,mb_f=0,md_f=0,mc_f=0,me_f=0,cendd_c='ƽ',cbegind_c='ƽ' WHERE (ccode LIKE '102%')

delete from gl_accvouch

WHERE (ccode LIKE '102%')

UPDATE GL_accsum

SET mb = 0, md = 0, mc = 0, mb_f = 0, md_f = 0, mc_f = 0, me_f = 0, cendd_c = 'ƽ', cbegind_c = 'ƽ'

WHERE (ccode LIKE '102%')

Accsum空值语句

SELECT * into gl_accsum1

FROM GL_accsum where not isnull(iperiod);

更新存货明细帐负数问题的SQL语句

UPDATE IA_Subsidiary

SET iAInQuantity = ABS(iAInQuantity)

WHERE cvoutype = 30

UPDATE IA_Subsidiary

SET iInCost = ABS(iInCost)

WHERE cvoutype = 30

解决Sql总帐与明细帐不平的语句

update gl_accass set me=mb where md=0 and mc=0

解决应收明细帐翻倍的语句

Option Compare Database

Option Explicit

Sub main()

Dim Db As Database

Dim Rec As Recordset

Dim Sql As String

Dim str As Long

Dim str1 As String

Set Db = OpenDatabase("c:\ufsoft80\zt400\2000\ufdata.mdb")

Set Rec = Db.OpenRecordset("select * from ap_detail order by ibvid,cVouchType")

While Not Rec.EOF

str = Rec("iBVid")

str1 = Rec("cVouchType")

Rec.MoveNext

If Not Rec.EOF Then

If Rec("iBVid") = str And Rec("cVouchType") = str1 Then

Rec.Delete

Rec.MoveNext

End If

End If

Wend

MsgBox "OK!"

End Sub

连接mdf文件

sp_detach_db 'ufdata_436_2000'

sp_attach_db @dbname='ufdata_436_2000','f:\数据\珠海光盘\2T003\2000\UFDATA.MDF','f:\数据\珠海光盘\2T003\2000\UFDATA.lDF'

应收付翻倍语句

update gl_accvouch set coutno_id=null where doutbilldate <#2000-1-1# and coutno_id like 'A*'

用友数据库与SQL使用

数据库中重要表

1、.ufysftem库

此库是系统参数数据库,其中主要存放各个帐套的共用信息,意义很大,日常应用的也很多。

A.ua_account:是帐套信息表,其中系统帐套存放路径、帐套启用年度、帐套启用月份、企业类型、行业性质等字段特别重要。

B.ua_account_sub:帐套各模块启用月度及最大结帐月表,其中子系统id字段、最大结帐

相关文档
最新文档