Hi,
I am having trouble getting the prompts of any given report. I can connect and iterate down to display a list of all report - however the code below shows my efforts at iterating on each report entry and getting its prompts. But - the prompts are always empty? I have confirmed that the reports do have prompts. I have read the SDK documentation but prompt Retrieval goes into detals about Beans. Any help would be great! Thank you
...
code ommitted but oItem below is a reference to
"PUBLIC OBJECTS" folder
...
Dim oReports As DSSCOMMasterLib.IDSSFolder
Dim oReport As DSSCOMMasterLib.IDSSReportDefinition
Dim oPrompts As DSSCOMMasterLib.IDSSPrompts
Dim oPrompt As DSSCOMMasterLib.IDSSPrompt
oReports = oItem.FindTypedObjects _(DSSCOMMasterLib.EnumDSSObjectType.DssTypeReportDefinition)
If oReports.Count <> 0 Then
For Each oReport In oReports
lstReports.Items.Add(oReport.Info.Name)
oPrompts = oReport.Info.Prompts
For Each oPrompt In oPrompts
lstPrompts.Items.Add(oPrompt.Title)
Next
Next
End If
I am having trouble getting the prompts of any given report. I can connect and iterate down to display a list of all report - however the code below shows my efforts at iterating on each report entry and getting its prompts. But - the prompts are always empty? I have confirmed that the reports do have prompts. I have read the SDK documentation but prompt Retrieval goes into detals about Beans. Any help would be great! Thank you
...
code ommitted but oItem below is a reference to
"PUBLIC OBJECTS" folder
...
Dim oReports As DSSCOMMasterLib.IDSSFolder
Dim oReport As DSSCOMMasterLib.IDSSReportDefinition
Dim oPrompts As DSSCOMMasterLib.IDSSPrompts
Dim oPrompt As DSSCOMMasterLib.IDSSPrompt
oReports = oItem.FindTypedObjects _(DSSCOMMasterLib.EnumDSSObjectType.DssTypeReportDefinition)
If oReports.Count <> 0 Then
For Each oReport In oReports
lstReports.Items.Add(oReport.Info.Name)
oPrompts = oReport.Info.Prompts
For Each oPrompt In oPrompts
lstPrompts.Items.Add(oPrompt.Title)
Next
Next
End If