1 Reply Latest reply on Jun 5, 2017 1:06 PM by Patrick.Cashman

    Automation Manager malfunction

    wilfried.bauer

      I frequently loose my whole CustomTools menu when I try to change something using Automation Manager.

      What I did so far:

       

      I created a CustomTools menu for xDxDesigner with a few script entries. With some try&error it finally worked well.

      To edit existing entries (e.g. renaming) I do as follows:

      • open Automation Manager
      • load DxDesigner scheme
      • select the script to be edited
      • click "Edit" button
      • change entry in "Name to display"
      • click "OK"
      • save changes by "Options - Save"

      This results in

      • an empty CustomTools menu, no entries in this menu any more
      • all "...OnAction" rows in DxDStartup.vbs are gone
      • all "Path=..." entries in AM_DxDesigner.xml are missing

       

      Maybe I did something wrong with the setup of pathes or environment variable (?).

      These look as follows:

       

      scripts.ini:

      [Viewdraw]

      Script#0=%SDD_Automation_Utilities%\DxDStartup.vbs

       

      AM_DxDesigner.xml:

      <?xml version="1.0" encoding="utf-8"?>

      <Head>

        <MenuItem Name="CustomTools">

        <Script Name="Scout Page Order - Log hierarchical paths to file in Project dir." Enabled="True" Expanded="False" Path="Y:\Wilfried_Bauer\CentralLibrary_VX\CorporateConfig\CustomTools\DxDesigner\scoutpageorder\scoutpageorder.vbs" />

        <Script Name="AutoAdd Cluster Properties through hierarchy" Enabled="True" Expanded="False" Path="Y:\Wilfried_Bauer\CentralLibrary_VX\CorporateConfig\CustomTools\DxDesigner\add_cluster_gproperties\add_cluster_core.vbs" />

        </MenuItem>

      </Head>

       

      DxDStartup.vbs:

      'This startup script was auto generated by Automation Manager - v1.5.7.1117

      Option Explicit

       

      Dim MenuBar

      Set MenuBar = CommandBars("Sheet Menu Bar")

       

      Dim SDDAU_env

      SDDAU_env = Scripting.GetEnvVariable("SDD_Automation_Utilities")

      Dim CustomToolsMenu, CustomToolsMenuCtrls

      Set CustomToolsMenu = MenuBar.Controls.Add(cmdControlPopup,,,9)

      CustomToolsMenu.Caption = "CustomTools"

       

      'Script:DxDesigner\CustomTools\scoutpageorder.vbs

      Dim scoutpageorder

      Set scoutpageorder = CustomToolsMenu.Controls.Add

      scoutpageorder.Caption = "Scout Page Order - Log hierarchical paths to file in Project dir."

      scoutpageorder.OnAction = "run """ & SDDAU_env & "\DxDesigner\scoutpageorder\scoutpageorder.vbs"""

      scoutpageorder.Enabled = True

       

      'Script:DxDesigner\CustomTools\add_cluster_gui.vbs

      Dim add_cluster_gui

      Set add_cluster_gui = CustomToolsMenu.Controls.Add

      add_cluster_gui.Caption = "AutoAdd Cluster Properties through hierarchy"

      add_cluster_gui.OnAction = "run """ & SDDAU_env & "\DxDesigner\add_cluster_properties\add_cluster_core.vbs"""

      add_cluster_gui.Enabled = True

       

      SDD_Automation_Utilities environment variable

      Y:\Wilfried_Bauer\CentralLibrary_VX\CorporateConfig\CustomTools

       

      Would be helpful for me to get a hint on what I'm doing wrong.

      Thanks for help and best regards

      Wilfried