Standard Libraries
siebsrvobj – This library simplifies the representation of the Siebel Server data that VA2 collects. Below are the methods included with the library.
$objenterprise->runningappservers() #returns a @ of appserversrunning
$objenterprise->isappsrvrunning($stringappservername) # returns 1 or 0 if appserver is running
$objenterprise->isentcomprunning($stringofmoncomp) #returns 1 or 0 if enterprise component is running
$objenterprise->isappsrvrcomprunning($stringofappname,$stingofcompname) #returns 1 or 0 if component for appserver specified is running
$objenterprise->isenttaskrunning($stringoftask) #returns 1 or 0 if task for enterprise is running
$objenterprise->isappsrvrtaskrunning($stringofappname,$stringoftaskname) #returns 1 or 0 if task for appserver specified is running
$objenterprise->entasks() returns an array (@) of hashes (%) of enterprisetasks
$objenterprise->entcomps() returns a @ of @ of enterprsisecomponents
$objenterprise->appsrvrtasks($stringappsrvrname) # returns an @ of % of enterprisetasks
$objenterprise->appsrvrcomps($stringappsrvrname) # returns an @ of appservercomponents
$objenterprise->hostprocesses($stringhost) #returns an @ of @ of processes?
To use a method a siebsrvobj must be initialized first. To initialize, one must pass in the $datasession, $debug, and string enterprise name.
Example:
my $entobj =
siebsrvobj->newobj($datasession,$debug,'siebel');
$retval = $objenterprise->isenttaskrunning(‘ReqProc’);
#this rule will fail
if there is no ReqProc task running in the enterprise.
sqlanalize – This library simplifies the process of executing SQL queries and analyzing the results.
The methods include:
sqlcount(‘sqlstring’,$datasessionvariable);
The datasource can be defined by using the $datasource construct. Pass in the Alias name of a datasource defined in VA2 and you will inherit a session to that datasource.
Example:
use sqlanalyze;
my $sql = "select count(*) from S_DOCK_TXN_LOG";
$retval = sqlanalyze->sqlcount($sql,
$datasource{siebeldata});