速达3000XP V8.13 POS销售日结出现完全相同的凭证？

雨霖萱

2、  POS日结后，系统生成两张完全相同的记账凭证。
产品信息：3000XP、3000.NET
版本信息：V8.13
模块名称：POS销售
解决方法：
DECLARE @credid varchar(32),
       @relevantbillid int,
       @relevantbillid_old int/*定义变量*/  
DECLARE authors_cursor CURSOR for
       select credid,relevantbillid from credence where relevantbillid in (
              select relevantbillid  from credence where credtype = 34 group by
relevantbillid having count(*) >1) and credtype = 34 order by
relevantbillid /*credtype=34,该凭证类别为POS日结单*/
set @relevantbillid_old = 1
OPEN authors_cursor
FETCH NEXT FROM authors_cursor into @credid,@relevantbillid
WHILE @@FETCH_STATUS = 0
BEGIN
if (@relevantbillid_old = @relevantbillid)
begin
    delete from creditem where credid = @credid/*删除凭证从表相同的记录*/
    delete from credence where credid = @credid/*删除凭证主表相同的记录*/
end
set @relevantbillid_old = @relevantbillid
FETCH NEXT FROM authors_cursor into @credid,@relevantbillid
END
close authors_cursor
DEALLOCATE authors_cursor

tiantian110

看不懂什么意思，最好能够详细的说明一下。