根据供应商等级限定使用次数
场景:公司会对供应商进行评级,临时供应商定为D级,D级供应商限定只能用一次。
def BeforeDoOperation(e): opCode=e.Operation.FormOperation.Operation.ToUpperInvariant(); if(opCode=="SAVE"): billObj = this.View.Model.DataObject; billNo = billObj["BillNo"]; Supplier = billObj["SupplierId"]; SupplierId = Supplier["ID"]; if Supplier["SupplierBase"][0]["SupplierGrade"] <> None: SupplierDJ = Supplier["SupplierBase"][0]["SupplierGrade"]["Number"]; if SupplierDJ == "D": sql = "select FBILLNO from t_PUR_POOrder where FCANCELSTATUS <> 'B' and FDOCUMENTSTATUS <> 'Z' and FSUPPLIERID=" + str(SupplierId) + "order by FCREATEDATE"; a = DBUtils.ExecuteScalar(this.Context, sql, None); if a <> None and a<>billNo: e.Cancel = True; this.View.ShowWarnningMessage("供应商等级为D且被单据"+str(a)+"使用过,单据保存失败!");
效果:
根据供应商等级限定使用次数
场景:公司会对供应商进行评级,临时供应商定为D级,D级供应商限定只能用一次。def BeforeDoOperation(e): opCode=e.Operation.FormOper...
点击下载文档
本文2024-09-16 19:04:16发表“云星空知识”栏目。
本文链接:https://wenku.my7c.com/article/kingdee-k3cloud-26206.html
您需要登录后才可以发表评论, 登录登录 或者 注册
最新文档
- 鼎捷EAI整合規範文件V3.1.07 (集團).pdf
- 鼎捷OpenAPI應用場景說明_基礎資料.pdf
- 鼎捷OpenAPI應用場景說明_財務管理.pdf
- 鼎捷T100 API設計器使用手冊T100 APIDesigner(V1.0).docx
- 鼎新e-GoB2雲端ERP B2 線上課程E6-2應付票據整批郵寄 領取.pdf
- 鼎新e-GoB2雲端ERP B2 線上課程A4使用者建立權限設定.pdf
- 鼎新e-GoB2雲端ERP B2 線上課程C3會計開帳與會計傳票.pdf
- 鼎新e-GoB2雲端ERP B2 線上課程E6-1應付票據.pdf
- 鼎新e-GoB2雲端ERP B2 線上課程A5-1進銷存參數設定(初階篇).pdf
- 鼎新e-GoB2雲端ERP B2 線上課程D2帳款開帳與票據開帳.pdf
热门文章