Python版上 单据体上移下移功能
import clr clr.AddReference('System') clr.AddReference('System.Data') clr.AddReference('Kingdee.BOS') clr.AddReference('Kingdee.BOS.Core') clr.AddReference('Kingdee.BOS.App') clr.AddReference('Kingdee.BOS.ServiceHelper') clr.AddReference('Newtonsoft.Json') from Kingdee.BOS import * from Kingdee.BOS.Core import * from Kingdee.BOS.Core.Bill import * from Kingdee.BOS.Util import * from Kingdee.BOS.Core.DynamicForm.PlugIn import * from Kingdee.BOS.Core.DynamicForm.PlugIn.ControlModel import * from System import * from System.Data import * from System.Net import * from System.Text import * from System.IO import * from Kingdee.BOS.Core.Bill.PlugIn import * from Kingdee.BOS.App.Data import * from System.Collections.Generic import List from Kingdee.BOS.ServiceHelper import * def EntryBarItemClick(e): entityKey="FEntity"; if e.BarItemKey=='u_up': index = this.View.Model.GetEntryCurrentRowIndex(entityKey); if index == 0: return; currRowData = this.View.Model.GetEntityDataObject(this.View.BusinessInfo.GetEntity(entityKey), index);#当前行数据 lastRowData = this.View.Model.GetEntityDataObject(this.View.BusinessInfo.GetEntity(entityKey), index - 1);#上一行数据 #objstr=JsonUtil.Serialize(currRowData); #this.View.ShowMessage(objstr); currRowData["Seq"] = index; lastRowData["Seq"] = index + 1; this.View.UpdateView(entityKey); this.View.GetControl(entityKey).SetFocusRowIndex(index - 1); if e.BarItemKey=='u_down': index=this.View.Model.GetEntryCurrentRowIndex(entityKey); if index == this.View.Model.GetEntryRowCount(entityKey) - 1: return; currRowData = this.View.Model.GetEntityDataObject(this.View.BusinessInfo.GetEntity(entityKey), index);#当前行数据 nextRowData = this.View.Model.GetEntityDataObject(this.View.BusinessInfo.GetEntity(entityKey), index + 1);#下一行数据 currRowData["SEQ"] = index + 2; nextRowData["SEQ"] = index + 1; this.View.UpdateView(entityKey); this.View.GetControl(entityKey).SetFocusRowIndex(index + 1);
相关信息来源于此贴。
Python版上 单据体上移下移功能
import clrclr.AddReference('System')clr.AddReference('System.Data')clr.AddReference('Kingdee.BOS')clr.AddReference('Kingdee.BOS.Co...
点击下载文档
上一篇:科目余额表核算维度名称显示优化下一篇:两个方式实现字符串拼接
本文2024-09-16 18:06:32发表“云星空知识”栏目。
本文链接:https://wenku.my7c.com/article/kingdee-k3cloud-20001.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
热门文章