ビューのページ選択を編集します。
Function EditPagePrompts(
objID As String,
pageSelections() As String
) As Boolean
objID: 編集するビューのID。空のIDが渡されると、選択したビューが使用されます。
pageSelections: 文字列配列に格納される選択ページの順序は、「ページ・セレクタ」ダイアログ・ボックスの選択ページの順序と同じにする必要があります。たとえば、図2に示されるページ選択肢を指定するには、図の後のサンプル・コードを使用します。
Dim pageSelections(0 To 1) As String
pageSelections (0) = "CENTRAL REGION"
pageSelections (1) = "2000"
操作が成功したかどうかを示します。
Sub EditPagePromptTest()
Dim obiee As IBIReport
Set obiee = New SmartViewOBIEEAutomation
Dim pages(0 To 1) As String
pages(0) = "CENTRAL REGION"
pages(1) = "2000"
obiee.EditPagePrompts Empty, pages
End Sub