Index: /trunk/tools/makedistdest
===================================================================
--- /trunk/tools/makedistdest	(revision 30004)
+++ /trunk/tools/makedistdest	(revision 30005)
@@ -13,13 +13,16 @@
 
 my $prod_name;
+my $dbhost;
 
 GetOptions(
            'prod_name=s'     => \$prod_name,
+           'dbhost=s'        => \$dbhost,
 ) or pod2usage( 2 );
 
 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV;
-pod2usage( -msg => "Required options: --prod_name",
+pod2usage( -msg => "Required options: --prod_name --dbhost",
            -exitval => 3)
-    unless defined $prod_name;  
+    unless defined $prod_name
+    and defined $dbhost;  
 
 my $cmd = "dsprodtool --add $prod_name --type ipp-dist --description $prod_name";
@@ -31,5 +34,5 @@
 die "dsprodtool failed: $rc" if $rc;
 
-$cmd = "disttool -dbname gpc1 -definedestination -ds_dbname ippRequestServer -ds_dbhost ippdb02 -name $prod_name";
+$cmd = "disttool -dbname gpc1 -definedestination -ds_dbname ippRequestServer -ds_dbhost $dbhost -name $prod_name";
 
 $rc = system $cmd;