SmartView Tipp 20:  Automatisiert SmartView Verbindungen anpassen

Beim Umstellen eines Servers wurde auch der Servername angepasst. Dieser Kunde hatte auf ein DNS verzichtet, daher mussten die Verbindungsparameter im SmartView manuell angepasst werden. Die vorherige URL musste durch die neue ersetzt werden. Dies stellte natĂŒrlich eine erhebliche Herausforderung dar, die wir unseren Benutzern nicht zumuten wollten. Aus diesem Grund haben wir eine Lösung mit einem Makro implementiert. In diesem Artikel wird beschrieben, wie wir dies umgesetzt haben.

SmartView und Makro‘s

Smart View hat seine eigene Makro Bibliothek welche sehr gut beschrieben ist in der Dokumentation „Oracle Smart View of Office Developer‘s Guide“. Hier sind alle verfĂŒgbaren Funktionen gelistet und beschrieben.

Wir benötigten die Funktion „HypModifyConnection“, um die Verbindungsparameter anzupassen. Daher haben wir ein Makro in einer neuen Excel-Datei erstellt, das diese Parameter enthĂ€lt. In diesem Makro haben wir außerdem eine Option hinzugefĂŒgt, mit der der Dateiname der Excel-Datei eingegeben werden kann, die angepasst werden soll. Diese Datei haben wir „URL_CONN_CHANGE.xlsm“ genannt.

Das Makro ist wie folgt:

Private Declare PtrSafe Function HypModifyConnection Lib „HsAddin“ (vtDocumentName, vtSheetName, vtGridName As Variant, vtServer, vtURL, vtApp, vtDB, vtConnParam) As Long

Dim strFileName, strNewConnection As Variant

Sub ModifyConnection()

   Application.ScreenUpdating = False

   strFileName = InputBox(„Name of the File you want to change“)

   ‚modify url in a particular workbook for all SV sheets#

    s = HypModifyConnection(strFileName, „“, „“, „“, https://epm-new.my.com/aps/SmartView, „“, „“, „“)

End Sub

Dieses Makro Àndert im Handumdrehen alle Verbindungen auf den Servernamen https://epm-new.my.com/aps/SmartView, unabhÀngig davon, wie viele Registerkarten Verbindungen enthalten.

Anwenden des Makro’s

Die Datei sollte in dasselbe oder ĂŒbergeordnete Verzeichnis abgelegt werden, in der sich die Excel’s befinden, deren Verbindungsparameter geĂ€ndert werden mĂŒssen.

Die Datei sollte dann geöffnet werden.

Mit der Tastenkombination „Alt“ und „F8“ wird das Makrofenster geöffnet

Abbildung 1: Makrofenster

Danach sollte der Eintrag „ModifyConnection“ and ‚“AusfĂŒhren“ („Execute“) selektiert werden.

Abbildung 2: Starten des Makro‘s

Abbildung 3: Eingabe eines Dateinamens.

Danach kann man in der Datei kontrollieren, ob diese Verbindung richtig angepasst wurde.

Interessanterweise hatten die Benutzer herausgefunden, dass sie alle Verbindungen in der gesamten Arbeitsmappe auf einmal Àndern konnten, indem sie keinen Namen eingegeben haben.

Ihr Philip Hulsebosch

philip.hulsebosch@hyperionimklartext.de

Veröffentlicht in Bewirtschaftung & Automatisierung Verwendete Schlagwörter: , ,