刷库解决特别的单据编号规则问题原创
金蝶云社区-htv
htv
32人赞赏了该文章 129次浏览 未经作者许可,禁止转载编辑于2024年07月17日 14:23:07

上代码吧,注:sfx为单据编码的编码元素,可空

def AfterSave(e):
    obj=this.Model.DataObject;
    if obj is not None:
        fid=obj["Id"];
        sfx=this.View.Model.GetValue("F_Combo_ca9");
        if sfx is None or sfx=="" or sfx==" ":return;
        fno=obj["BillNo"];
        if sfx in fno:return;
        fno=fno+sfx;        
        sql="update F_t_Cust100004 set FBILLNO='"+fno+"' where fid="+str(fid);
        DBUtils.Execute(this.Context,sql);
        this.View.InvokeFormOperation("Refresh");


赞 32