获取最近采购订单供应商
获取已审核最近采购订单供应商,写入采购申请单。(非按业务日期排序,按制单顺序)
需要在单据体增加按钮触发表单插件。
脚本语言为python
import clr
clr.AddReference('Kingdee.BOS')
clr.AddReference('Kingdee.BOS.Core')
clr.AddReference('Kingdee.BOS.App')
from Kingdee.BOS.Core import *
from Kingdee.BOS.App.Data import *
#def EntryButtonCellClick(e):
def EntryBarItemClick(e):
if e.BarItemKey=="SZXY_tbButton":
rows=this.Model.GetEntryRowCount("FEntity");
for i in range(0,rows,1):
FMID=str(this.Model.GetValue("FMaterialId",i)["Id"]) if (this.Model.GetValue("FMaterialId",i) <>None)else "0";
sql="/*dialect*/select a.FSUPPLIERID from t_PUR_POOrder a join t_PUR_POOrderEntry b on a.fid=b.fid where b.FMATERIALID="+FMID+" and a.fid in (SELECT MAX(l.FID) FROM t_PUR_POOrder m join t_PUR_POOrderEntry l on m.fid=l.fid where m.FDOCUMENTSTATUS='C' and l.FMATERIALID ="+FMID+" GROUP BY l.FMATERIALID)";
FSsupp=DBUtils.ExecuteScalar(this.Context,sql,None);
#this.View.ShowMessage(sql);
this.Model.SetValue("FSuggestSupplierId",FSsupp,i);
this.View.UpdateView("FEntity");
需要在单据体增加按钮触发表单插件。
脚本语言为python
import clr
clr.AddReference('Kingdee.BOS')
clr.AddReference('Kingdee.BOS.Core')
clr.AddReference('Kingdee.BOS.App')
from Kingdee.BOS.Core import *
from Kingdee.BOS.App.Data import *
#def EntryButtonCellClick(e):
def EntryBarItemClick(e):
if e.BarItemKey=="SZXY_tbButton":
rows=this.Model.GetEntryRowCount("FEntity");
for i in range(0,rows,1):
FMID=str(this.Model.GetValue("FMaterialId",i)["Id"]) if (this.Model.GetValue("FMaterialId",i) <>None)else "0";
sql="/*dialect*/select a.FSUPPLIERID from t_PUR_POOrder a join t_PUR_POOrderEntry b on a.fid=b.fid where b.FMATERIALID="+FMID+" and a.fid in (SELECT MAX(l.FID) FROM t_PUR_POOrder m join t_PUR_POOrderEntry l on m.fid=l.fid where m.FDOCUMENTSTATUS='C' and l.FMATERIALID ="+FMID+" GROUP BY l.FMATERIALID)";
FSsupp=DBUtils.ExecuteScalar(this.Context,sql,None);
#this.View.ShowMessage(sql);
this.Model.SetValue("FSuggestSupplierId",FSsupp,i);
this.View.UpdateView("FEntity");
能说一下具体操作步骤吗
获取最近采购订单供应商
获取已审核最近采购订单供应商,写入采购申请单。(非按业务日期排序,按制单顺序)需要在单据体增加按钮触发表单插件。脚本语言为pythonim...
点击下载文档
本文2024-09-16 19:03:20发表“云星空知识”栏目。
本文链接:https://wenku.my7c.com/article/kingdee-k3cloud-26103.html
您需要登录后才可以发表评论, 登录登录 或者 注册
最新文档
热门文章