The .CatalogName property will return the file name. The easiest way to change the catalog in a report is to open it with another compatible catalog already open and save it. This can be done easily via a macro.
Regards,
Dave Griffin
The Decision Support Group
Reporting Consulting with Cognos BI Tools
"Magic with Data" Want good answers? Read FAQ401-2487 first!
Sub Main()
Dim objImpApp As Object
Dim strCatName As String
Set objImpApp = getObject("CognosImpromptu.Application"
strCatName = objImpApp.CatalogName
If strCatName <> "" Then
Msgbox "The currently open catalog is:" & strCatName
Else
Msgbox "No catalog is currently open."
End If
Set objImpApp = Nothing
End Sub
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.