SAP B1系统表单修改

2020-09-01 21:53发布

公共静态无效createSystemFormStudio（string fileName） { System.Xml.XmlDocument oXMLDoc; oXMLDoc =新的System.Xml.XmlDocument（）; oXMLDoc.Load（" ../../" + fileName +" .srf"）; SAPbouiCOM.Framework.Application.SBO_Application.LoadBatchActions（oXMLDoc.InnerXml）; }

4条回答

何必丶何苦呢

1楼 · 2020-09-01 22:30.采纳回答

嗨艾哈迈德，

您可以执行以下操作：

在B1 Studio中编辑系统表单。

然后将您的更改导出为更新部件。

此后，您可以在加载项中使用此新的xml部分，其代码如下：（仅作为示例）

 private void SBO_Application_ItemEvent（字符串FormUID，请参阅SAPbouiCOM.ItemEvent pVal，请参见bool BubbleEvent）
 {
 BubbleEvent = true;
            
         如果（pVal.FormType == 60100＆pVal.EventType！= SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD && pVal.Before_Action == true）
         {
         oOrderForm = SBO_Application.Forms.GetFormByTypeAndCount（pVal.FormType，pVal.FormTypeCount）;
 
                 如果（pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_LOAD && pVal.Before_Action == true）
                 {
                     UpdateFormByXML（" yourPartXml.xml"，pVal.FormUID）;
                 }
 }
 }
 
 私有无效UpdateFormByXML（字符串sFileName，字符串sFormUID）
 {
 尝试
 {
                 字符串sXPath =" Application//forms//action//form//@ uid";
                 字符串sPath = System.Environment.CurrentDirectory +" \\";
 
                 XmlDocument xDoc =新的XmlDocument（）;
 
                 xDoc.Load（sPath + sFileName）;
 
                 XmlNode xNode = xDoc.SelectSingleNode（sXPath）;
                 xNode.InnerText = sFormUID;
 
                 字符串sXML = xDoc.InnerXml.ToString（）;
 
                 SBO_Application.LoadBatchActions（ref sXML）;
 }
 抓住（前例外）
 {
 SBO_Application.SetStatusBarMessage（ex.Message，SAPbouiCOM.BoMessageTime.bmt_Short，true）;
 }
 }

PS：以上代码由Owen Slater在以下主题中提供： https：//archive。 sap.com/discussions/thread/827583

希望有帮助。

亲切的问候，

迭戈兄弟