Fetch From Options Cache

'Tips for developers working within the Sysgem Enterprise Manager (SEM) environment'.

Fetching Data from the Central Options cache using API calls to the SEM Authorization Server

Fetching Central Options Cache Data into a script running on the SEM user's workstation

Perl scripts running on the SEM user's workstation can fetch data from a file held in the "Central Options Cache" on the SEM Authorization Server by using the following SEM API command:

   my $directory  = "TestFolder";             # name of the subdirectory in the options cache
   my $file       = "TestFile.txt";           # name of the file to read
   my $tempfile   = "";                       # for path to local temporary file
   my $path = $directory . "\\" . $file;
   #
   #   retrieve the file
   #
   my $retval = Sysgem::SEMAuthSvrOptionsCacheFetch($path, $tempfile, $error);

The Central Options cache folder is located:

   \Program Files\Sysgem\SEM OptionsCache

An Example Task Script

You can create a test SEM Task using this API by copying the script shown below and pasting it into the "Agent - Windows NT" script of a new SEM Task.

Run the SEM Task after first creating a test folder and a test file under the Central Options Cache on the Authorization Server.

The test folder and file to be created is:

   \Program Files\Sysgem\SEM OptionsCache\TestFolder\TestFile.txt.

The content of this test file will be printed by the following example SEM Task:

   #++++++++++++++++++++++++++++++++++
   #                                 |
   #   Windows NT script (PERL).     |
   #                                 |
   #++++++++++++++++++++++++++++++++++
   #
   #
   #
   #   fetch the content of file directly from the Central AuthServer to a local file
   #   - out of a sub-folder in the Central Options Cache 
   #
   use Sysgem;
   #
   #   the file path from the Options cache
   #
   my $directory  = "TestFolder";             # name of the subdirectory in the options cache
   my $file       = "TestFile.txt";           # name of the file to read
   my $tempfile   = "";                       # for path to local temporary file
   my $path = $directory . "\\" . $file;
   #
   #   retrieve the file
   #
   my $retval = Sysgem::SEMAuthSvrOptionsCacheFetch($path, $tempfile, $error);
   #
   #   show the path to the local temporary file created
   #
   print "Path to temporary file : [$tempfile]\n\n";
   #
   #   print the content of the file
   #
   if (open TEMPFILE, "< $tempfile")
   {
       my @lines = <TEMPFILE>;
       close TEMPFILE;
       print "-- <Start of temporary file> --\n";
       foreach my $item (@lines) 
       { 
           print "$item"; 
       }
       print "-- <End of temporary file> --\n\n";
   }
   else
   {
       print "can't open temp file [$tempfile]\n";
   }
   #
   #   tidy up
   #
       unlink($tempfile);
       print "Temporary file removed\n";

SEM Task Output:

The output from the above example task script is shown below: