如何获取本地列表并将其设置在选项列表中？ （VB，Infor PM）

Question

亲爱的用户好日子，

我必须在Infor PM Application Studio中编辑报告，我在使用我的选择列表中的超级块中的列表时遇到问题。 Picklist用于在我的报告中打印不同的产品，并且必须具有与Hyperblock相同的列表成员。以下vb代码不起作用。我无法获得本地名单。

Sub  btnPrintCenter_Click () 
    Dim sList,newMembers(0)
    lvScale.SetCurSel 0, true
    newMembers(0) = Application.GetlocalListDefinition as String
    Application.SetPickListMembers "hpProduct\Objektliste",newMembers
    'sList = "PickListManager[lvRayon\Objektliste][PickListRayon]" 
    'sReturn = Spreadsheet.PickListManager (sList, false)
    lvRayon.List = "ProductsSumaPrintTdBEPF"
End sub

Infor PM中的帮助文件使用以下内容提及：

返回附加到HyperBlock对象的本地列表的XML定义。 命名空间：电子表格

语法 Visual Basic（声明）

Public Function GetLocalListDefinition As String

我希望我已经清楚地表达了自己，请问是否有些不清楚。提前致谢

Answer 1

经过大量的反复试验，我找到了问题的答案。我使用的脚本如下：

Sub  btnPrintCenter_Click () 
Dim sList,newMembers(0)
lvScale.SetCurSel 0, true
newMembers(0) = Application.GetPickListMembers ("hpProduct\Local list")
Application.SetPickListMembers "PickListRayon\Objektliste",newMembers
sList = "PickListManager[hpProduct\Local list]"
sReturn = Spreadsheet.PickListManager (sList, false) 
End sub

使用GetPickListMembers我将Hyperblock本地列表归因于newMember。 也许有人会在未来的某个时候找到这个有用的东西。