BusinessObjects Board

Document universe connection details

The Designer SDK can retrieve the connection details. Give the attached utility a try. Usage is pretty simple. Open the Excel file and click the button. You’ll be asked to log in to Designer, and it’s on its way. The second tab of the workbook will list the connection information.
Universe connections - XI.xls (39.0 KB)
Universe connections - v5.xls (39.0 KB)


Dwayne Hoffpauir :us: (BOB member since 2002-09-19)

Hi,
Is there a way we can change to code to get Universe name in addition to the other connection info ?.Please advice.


karen (BOB member since 2003-06-18)

Possible, yes, but that would be pretty much a separate utility. This one is not concerned about which universes use which connections, only the details of the connections themselves.


Dwayne Hoffpauir :us: (BOB member since 2002-09-19)

Thanks for your prompt response.What i’m trying here was to get Universe Name,Connection Name and Data source info.

Do you know where i can find this tool info.

Thanks


karen (BOB member since 2003-06-18)

Hi All

Even I am having the same issue. Is there any way to get the Universe name as well. Is there something that we could change the code?

Thanks


ety.vty (BOB member since 2008-09-23)

Hi,

In order to clean up a lot of probably unused connections it would really be nice if this tool could have a new update. So I want the universe names that use the connection. Then I have more information for my decision to delete unwanted connections.
Of course I mean this is only for mass environments and when the one who is going to clean up this mess is an external consultant. :wink:


TurningPointHolland :netherlands: (BOB member since 2006-09-06)

This is really good utility.

Do we have anything similar which captures connections used for free-hand-sql connections in Deski and dsns in Crystal reports?

Thanks,
Swapnil.


swap_bo (BOB member since 2009-05-01)

Hi Swapnil,

Details of connections of free-hand SQL DeskI reports are not exposed in VBA. So I doubt this can be achieved.


Marek Chladny :slovakia: (BOB member since 2003-11-27)

Thanks Marek.

Seems like will have to do this manually. :wave:


swap_bo (BOB member since 2009-05-01)

Good sample, but…

it only works on PCs with a BO-Installation.
Is there a way to get this infos with the Query-Builder?


dpetri (BOB member since 2008-03-11)

Ok, here we go:


Imports System.Xml

Public iStore As New CrystalInfoStoreLib.InfoStore
Public Connections As CrystalInfoStoreLib.InfoObjects
Public ConnectItem As CrystalInfoStoreLib.InfoObject
Public ConnectObject As New CrystalConnectionPluginLib.Connection

Dim QueryStr As String = ""
Dim ElementStr As String = ""
Dim NWLayer As String = ""
Dim RDMS As String = ""

QueryStr = "select SI_ID, SI_CREATION_TIME, SI_UPDATE_TS, SI_REVISIONNUM,SI_OWNER, SI_DESCRIPTION, SI_NAME, SI_CONNUNIVERSE, SI_METADATA_PROPERTIES from CI_APPOBJECTS where SI_KIND = 'MetaData.DataConnection' and SI_PARENTID=123 order by SI_NAME"

Connections = iStore.Query(QueryStr)

For Each ConnectItem In Connections

  Dim sr As New System.IO.StringReader(ConnectItem.Properties("SI_METADATA_PROPERTIES").Properties("SI_METADATA_BVCONN_ATTRIBUTES").Value)
  Dim doc As New Xml.XmlDocument

  doc.Load(sr)

  Dim reader As New Xml.XmlNodeReader(doc)

  While reader.Read()
    Select Case reader.NodeType
      Case Xml.XmlNodeType.Element
        If reader.Name = "Name" Then
          ElementStr = reader.ReadElementContentAsString
            If ElementStr = "NetworkLayer" Then
              NWLayer = reader.ReadElementContentAsString
            End If
            If ElementStr = "RdmsName" Then
              RDMS = reader.ReadElementContentAsString
            End If
        End If
    End Select
  End While
Next

MsgBox(ConnectItem.Title & vbCrLf & NWLayer & vbCrLf & RDMS)

A little bit of “ugly code”… but it works! :wink:


dpetri (BOB member since 2008-03-11)

@dpetri - do you not require a BO installation for the code above to work?

if not where do you get the objects CrystalInfoStoreLib and CrystalConnectionPluginLib from?

Also how are you able to run the query without a valid logon?

Thanks

HRS


Sushir Patel :uk: (BOB member since 2006-04-19)

Hi

@dpetri - Will your code work in VBA (Excel Macro)? If yes , could you please let me know the references to include. I tried few, but no luck.
Thanks in Advance!


stvel (BOB member since 2007-10-04)

Awsome… Stuff…

Goodone

thanks


pavan.au143 (BOB member since 2011-12-29)

Hi,

Awsum work.

I need Service name (TNS entry/where connections are pointing) also as a column
Can you please help me with Above VBA code to get desired result for BOXI 3.1 ?


sadwi :india: (BOB member since 2012-09-07)

This document does not extract the Datasource name where network layer is Oracle

For rest others works fine

Any idea whats wrong


sadwi :india: (BOB member since 2012-09-07)

Hi,

Has anyone got this to work in version 4.

The excel file exactly what I need but doesn’t seem to work, I tried the repository documenter but this doesn’t give user names and service the connection is using.

Thanks


drew32 (BOB member since 2015-12-18)