新增凭证时不同用户使用不同的凭证号范围

栏目:云星空知识作者:金蝶来源:金蝶云社区发布:2024-09-16浏览:1

新增凭证时不同用户使用不同的凭证号范围

集团内有多个财务人员需要生成凭证,如果每个人生成凭证能够在一定范围内顺序编号,在月底进行整理归纳负责的凭证及其附件时会更方便快速

思路是新增凭证时以最大凭证号加1作为新增的凭证号,故实操时,需要财务人员协商并安排好各自的凭证号范围,比如A用1-100号凭证、B用101-200号、C用201-300,那么A新增第一笔凭证时用1,B用101号,C用201号,往后新增凭证时,就会自动获取凭证号A的是2、B是102、C是202。

一、通过注册Python脚本的方法变通实现,操作步骤:通过BOS设计器扩展 “凭证”-- 表单插件 -- 注册Python脚本,脚本如下:

# 新增凭证时分用户生成凭证号

#引入clr运行库

import clr

#添加对cloud插件开发的常用组件的引用

clr.AddReference('Kingdee.BOS')

clr.AddReference('Kingdee.BOS.Core')

clr.AddReference('Kingdee.BOS.App')

#导入cloud基础库中的常用实体对象(分命名空间导入,不会递归导入)

from Kingdee.BOS import *

from Kingdee.BOS.Core import *

from Kingdee.BOS.Core.Bill import *

from Kingdee.BOS.Core.DynamicForm.PlugIn import *

from Kingdee.BOS.Core.DynamicForm.PlugIn.ControlModel import *

from System import *

from Kingdee.BOS.App.Data import *


def DataChanged(e): 

    if(e.Field.Key=="FDate" or e.Field.Key=="FACCOUNTBOOKID" or e.Field.Key=="FVOUCHERGROUPID"): 

SetVoucherNo()


def AfterBindData(e):

if this.View.OpenParameter.Status <> OperationStatus.EDIT:

SetVoucherNo()


def SetVoucherNo():

bookid = this.View.Model.GetValue("FACCOUNTBOOKID")["Id"]

pzz = this.View.Model.GetValue("FVOUCHERGROUPID")["Id"]

y0 = this.View.Model.GetValue("FYEAR")

p0 = this.View.Model.GetValue("FPERIOD")


sql = "SELECT max(FVOUCHERGROUPNO) FROM T_GL_VOUCHER WHERE FACCOUNTBOOKID="+str(bookid)

sql += " and FVOUCHERGROUPID="+str(pzz) + " and FYEAR="+str(y0) + " and FPERIOD="+str(p0)

sql += " and FCREATORID="+this.Context.UserId.ToString()

pzh = DBUtils.ExecuteScalar(this.Context,sql,0)

if pzh > 0:

pzh = pzh +1

sql = "SELECT count(1) FROM T_GL_VOUCHER WHERE FACCOUNTBOOKID="+str(bookid)

sql += " and FVOUCHERGROUPID="+str(pzz) + " and FYEAR="+str(y0) + " and FPERIOD="+str(p0)

sql += " and FVOUCHERGROUPNO="+str(pzh)

if DBUtils.ExecuteScalar(this.Context,sql,0) == 0:

this.View.Model.SetValue("FVOUCHERGROUPNO",pzh)

this.View.ShowMessage("已自动生成凭证号:"+str(pzh))

else:

this.View.Model.SetValue("FVOUCHERGROUPNO","")

this.View.ShowMessage("您的下一个凭证号("+str(pzh)+")已经被其他人使用,请输入新凭证号!")

else:

this.View.Model.SetValue("FVOUCHERGROUPNO","")

this.View.ShowMessage("您本月还没有录入过凭证,请输入凭证号!")


二、实现的效果:

1、对于在当前账簿当前期间未新增过凭证的用户,会提示“您本月还没有录入过凭证,请输入凭证号!”,如下图所示

image.webp


2、自动识别用户已生成凭证的最大凭证号,新增凭证时以最大凭证号加1作为新增的凭证号,并提示“已自动生成凭证号:××”,如下图所示

image.webp

image.webp

3、如果某用户的下个可用凭证号被别的用户占用了,会提示“您的下一个凭证号(××)已经被其他人使用,请输入新凭证号!”,如下图所示

image.webp

新增凭证时不同用户使用不同的凭证号范围

集团内有多个财务人员需要生成凭证,如果每个人生成凭证能够在一定范围内顺序编号,在月底进行整理归纳负责的凭证及其附件时会更方便快速。...
点击下载文档
确认删除?
回到顶部
客服QQ
  • 客服QQ点击这里给我发消息