如何在SAP Business One UDO中动态更改网格中的ObjType?

2020-09-21 13:22发布

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


大家好,

问候!!!

我正在开发一个在折叠级别为1的网格的单列中包含ItemCode/CardCode的加载项。我想动态地更改该列的ObjectType。ieForItem Code我要将ObjType设置为" 4",并且 卡代码" 2"。

加载表格时有可能吗?

感谢和问候,

Mahendrakumar

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


大家好,

问候!!!

我正在开发一个在折叠级别为1的网格的单列中包含ItemCode/CardCode的加载项。我想动态地更改该列的ObjectType。ieForItem Code我要将ObjType设置为" 4",并且 卡代码" 2"。

加载表格时有可能吗?

感谢和问候,

Mahendrakumar

付费偷看设置
发送
2条回答
Baoming ROSE
1楼-- · 2020-09-21 14:07

您好 Mahendrakumar Phadtare

我不确定在加载表单时是否可以完成此操作。 但是,您可以尝试选择以下选项:

1。 当用户单击链接的按钮时,在BeforeAction = true中将Bubble事件设置为False。 在此处,根据物料主数据/业务伙伴主数据设置LinkedObjectType。

2。 稍后,在BeforeAction = false中,将Bubble Event设置为True,并允许用户打开主数据表单。

希望有帮助!

亲切的问候,

ANKIT CHAUHAN

SAP SME支持

SAP砖家
2楼-- · 2020-09-21 14:06

大家好,

使用另一个选项与SAP R/3正向导航相同,我得到了如下的临时解决方案-它可以工作。但是我想给他们链接功能。 任何建议将不胜感激。

如果pVal.BeforeAction然后
           其他
             选择案例pVal.EventType
                 案例SAPbouiCOM.BoEventTypes.et_DOUBLE_CLICK
                     Dim Objtype As String =""
                     Dim strCode As String =""
                     GOD_Form = GOD_Main.GOD_Application.Forms.GetForm(" frmCSSer",pVal.FormTypeCount)
                     GOD_Grid = GOD_Form.Items.Item(" GrdCSS")。特定
                     尝试
                         如果pVal.ItemUID =" GrdCSS"和pVal.ColUID =" Code",则
                             GOD_EditColumn = GOD_Grid.Columns.Item(3)
                             对象类型=修剪(GOD_EditColumn.GetText(pVal.Row))
                             GOD_EditColumn = GOD_Grid.Columns.Item(1)
                             strCode =修剪(GOD_EditColumn.GetText(pVal.Row))
                             如果Objtype =" 2",则
                                 GOD_Main.GOD_Application.ActivateMenuItem(" 2561")
                                 GOD_LinkedMasterForm = GOD_Main.GOD_Application.Forms.ActiveForm
                                 GOD_LinkedMasterForm.Items.Item(" 5")。Specific.Value = strCode
                                 GOD_LinkedMasterForm.Items.Item(" 1")。Click(SAPbouiCOM.BoCellClickType.ct_Regular)
                             ElseIf Objtype =" 4"然后
                                 GOD_Main.GOD_Application.ActivateMenuItem(" 3073")
                                 GOD_LinkedMasterForm = GOD_Main.GOD_Application.Forms.ActiveForm
                                 GOD_LinkedMasterForm.Items.Item(" 5")。Specific.Value = strCode
                                 GOD_LinkedMasterForm.Items.Item(" 1")。Click(SAPbouiCOM.BoCellClickType.ct_Regular)
                             万一
                         万一
                     异常捕获
                         GOD_Main.GOD_Application.MessageBox(例如消息)
                     结束尝试
 结束选择
 Endif 

一周热门 更多>