Set up a user session with the
REPMServer#
Reference to SAP DB Perl Library# -------------------------------
use SAP::DBTECH::repman;
#
Parse the call arguments# --------------------------
$user = $ARGV[0];
$pwd = $ARGV[1];
$dbname = $ARGV[2];
$data_path = $ARGV[3];
$host = "localhost";
#
Start a user session with the REPMServer# -------------------------------------------
$session = repman::RepMan ($host, $dbname);
#
Log on to the database instance# --------------------------------
$session->cmd("use user $user $pwd;");
#
Log off# --------
undef $session