在线等解决通升u851普及版过程提示这东西

sds2yaya

数据库名: UFDATA_002_2007
应收应付数据, DATA2_AP
错误信息:
-2147217873
违反了 PRIMARY KEY 约束 'PK_VoucherNumber'。不能在对象 'VoucherNumber' 中插入重复键。
执行如下语句时出错:
--预置单据编号
DECLARE @bRemote VARCHAR(10)
DECLARE @RemoteID Varchar(2)
DECLARE @ID int
Set @bRemote=(SELECT Upper(cValue) FROM Accinformation Where cName='bRemote')
IF @bRemote ='TRUE'
Set @RemoteID=(SELECT Isnull(cValue,'') FROM Accinformation Where cName='cID')
ELSE
Set @RemoteID=''
IF NOT EXISTS (Select CardNumber From VoucherNumber Where AppName='应收' and CardNumber='R0')
BEGIN
  insert into VoucherNumber (AppName,CardNumber,CardName) values('应收','R0','其他应收单')
  set @ID=(select Max(iCancelNo) From Ap_CancelNo Where cFlag='AR' and cType='R0')
  IF @ID is not null insert into VoucherHistory (CardNumber,cNumber) values('R0',@ID)
END
IF NOT EXISTS (Select CardNumber From VoucherNumber Where AppName='应付' and CardNumber='P0')
BEGIN
  insert into VoucherNumber (AppName,CardNumber,CardName) values('应付','P0','其他应付单')
  set @ID=(select Max(iCancelNo) From Ap_CancelNo Where cFlag='AP' and cType='P0')
  IF @ID is not null insert into VoucherHistory (CardNumber,cNumber) values('P0',@ID)
END
IF NOT EXISTS (Select CardNumber From VoucherNumber Where AppName='应收' and CardNumber='RR')
IF @bRemote='TRUE'
  BEGIN
   insert into VoucherNumber (AppName,CardNumber,CardName,iSize,dStartDate,Prefix1,Prefix1Len)
   values('应收','RR','收款单',10,getdate(),'远程号',2)
   set @ID=(select Max(iCancelNo) From Ap_CancelNo Where cFlag='AR' and cType='R')
   IF @ID is not null insert into VoucherHistory (CardNumber,cNumber) values('RR',@ID)
  END
ELSE
  BEGIN
   insert into VoucherNumber (AppName,CardNumber,CardName) values('应收','RR','收款单')
   set @ID=(select Max(iCancelNo) From Ap_CancelNo Where cFlag='AR' and cType='R')
   IF @ID is not null insert into VoucherHistory (CardNumber,cNumber) values('RR',@ID)
  END
IF NOT EXISTS (Select CardNumber From VoucherNumber Where AppName='应收' and CardNumber='RP')
IF @bRemote='TRUE'
  BEGIN
   insert into VoucherNumber (AppName,CardNumber,CardName,iSize,dStartDate,Prefix1,Prefix1Len)
   values('应收','RP','付款单',10,getdate(),'远程号',2)
   set @ID=(select Max(iCancelNo) From Ap_CancelNo Where cFlag='AR' and cType='P')
   IF @ID is not null insert into VoucherHistory (CardNumber,cNumber) values('RP',@ID)
  END
ELSE
  BEGIN
   insert into VoucherNumber (AppName,CardNumber,CardName) values('应收','RP','付款单')
   set @ID=(select Max(iCancelNo) From Ap_CancelNo Where cFlag='AR' and cType='P')
   IF @ID is not null insert into VoucherHistory (CardNumber,cNumber) values('RP',@ID)
  END
IF NOT EXISTS (Select CardNumber From VoucherNumber Where AppName='应付' and CardNumber='PP')
IF @bRemote='TRUE'
  BEGIN
   insert into VoucherNumber (AppName,CardNumber,CardName,iSize,dStartDate,Prefix1,Prefix1Len)
   values('应付','PP','付款单',10,getdate(),'远程号',2)
   set @ID=(select Max(iCancelNo) From Ap_CancelNo Where cFlag='AP' and cType='P')
   IF @ID is not null insert into VoucherHistory (CardNumber,cNumber) values('PP',@ID)
  END
ELSE
  BEGIN
   insert into VoucherNumber (AppName,CardNumber,CardName) values('应付','PP','付款单')
   set @ID=(select Max(iCancelNo) From Ap_CancelNo Where cFlag='AP' and cType='P')
   IF @ID is not null insert into VoucherHistory (CardNumber,cNumber) values('PP',@ID)
  END
IF NOT EXISTS (Select CardNumber From VoucherNumber Where AppName='应付' and CardNumber='PR')
IF @bRemote='TRUE'
  BEGIN
   insert into VoucherNumber (AppName,CardNumber,CardName,iSize,dStartDate,Prefix1,Prefix1Len)
   values('应付','PR','收款单',10,getdate(),'远程号',2)
   set @ID=(select Max(iCancelNo) From Ap_CancelNo Where cFlag='AP' and cType='R')
   IF @ID is not null insert into VoucherHistory (CardNumber,cNumber) values('PR',@ID)
  END
ELSE
  BEGIN
   insert into VoucherNumber (AppName,CardNumber,CardName) values('应付','PR','收款单')
   set @ID=(select Max(iCancelNo) From Ap_CancelNo Where cFlag='AP' and cType='R')
   IF @ID is not null insert into VoucherHistory (CardNumber,cNumber) values('PR',@ID)
  END

sds2yaya

救命啊来帮助下嘛我晕了啊

sds2yaya

自己顶下快来人帮看看啊

sds2yaya

自己顶下快来人帮看看啊

yuzhang0

今天也碰到这个问题了，baidu到了这个帖子，不发新贴了，只顶一下

icanfly_up

在当前年度库执行以下脚本即可
delete From VoucherNumber Where CardName in  ('其他应收单','其他应付单','付款单','收款单')

升级交流：15098071459