Index: trunk/ippScripts/scripts/ipp_serial_camera.pl
===================================================================
--- trunk/ippScripts/scripts/ipp_serial_camera.pl	(revision 16331)
+++ trunk/ippScripts/scripts/ipp_serial_camera.pl	(revision 16336)
@@ -13,11 +13,13 @@
 
 my ($dbname,			# Database name to use
-    $workdir,			# Working directory
+    $workdir_default,		# Default working directory
+    $verbose,			# Verbose operations?
     $no_op,			# No operations?
     $no_update,			# No updating?
     );
 GetOptions(
-	   'dbname|d=s' => \$dbname,
-	   'workdir|w=s' => \$workdir,
+	   'dbname=s' => \$dbname,
+	   'workdir=s' => \$workdir_default,
+	   'verbose' => \$verbose,
 	   'no-op' => \$no_op,
 	   'no-update' => \$no_update,
@@ -28,4 +30,6 @@
 	  -exitval => 3,
 	  ) unless defined $dbname;
+
+$workdir_default = `pwd` unless defined $workdir_default;
 
 my $mdcParser = PS::IPP::Metadata::Config->new;	# Metadata config parser
@@ -52,6 +56,11 @@
     my $exp_tag = $item->{exp_tag};
     my $camera = $item->{camera};
+    my $workdir = $item->{workdir};
     
+    $workdir = $workdir_default unless (defined $workdir or $workdir ne "NULL");
+    my $outroot = $workdir . '/' . ${exp_tag} . '/' . ${exp_tag} . '.cm.' . ${cam_id};
+
     my $command = "$camera_exp --cam_id $cam_id --exp_tag $exp_tag --camera $camera --dbname $dbname";
+    $command .= " --verbose" if defined $verbose;
     $command .= " --no-op" if defined $no_op;
     $command .= " --no-update" if defined $no_update;
Index: trunk/ippScripts/scripts/ipp_serial_chip.pl
===================================================================
--- trunk/ippScripts/scripts/ipp_serial_chip.pl	(revision 16331)
+++ trunk/ippScripts/scripts/ipp_serial_chip.pl	(revision 16336)
@@ -13,17 +13,23 @@
 
 my ($dbname,			# Database name to use
+    $workdir_default,		# Default working directory
+    $verbose,			# Verbose operations?
     $no_op,			# No operations?
     $no_update,			# No updating?
     );
 GetOptions(
-	   'dbname|d=s' => \$dbname,
+	   'dbname=s' => \$dbname,
+	   'workdir=s' => \$workdir_default,
+	   'verbose' => \$verbose,
 	   'no-op' => \$no_op,
 	   'no-update' => \$no_update,
 ) or pod2usage( 2 );
 
-pod2usage(
-	  -msg => "Required options: --dbname",
-	  -exitval => 3,
-	  ) unless defined $dbname;
+pod2usage( -msg => "Required options: --dbname --workdir",
+	   -exitval => 3,
+	   ) unless
+    defined $dbname;
+
+$workdir_default = `pwd` unless defined $workdir_default;
 
 my $mdcParser = PS::IPP::Metadata::Config->new;	# Metadata config parser
@@ -35,5 +41,5 @@
 die "Can't find required tools.\n" if $missing_tools;
 
-# Phase 2 imfile processing
+# Imfile processing
 my @whole;			# The whole list for processing
 {
@@ -65,10 +71,13 @@
 	    my $reduction = $item->{reduction};
 	    my $workdir = $item->{workdir};
-	    
-	    my $command = "$chip --chip_id $chip_id --exp_id $exp_id --exp_tag $exp_tag --class_id $class_id --uri $uri --dbname $dbname --camera $camera";
+	    $workdir = $workdir_default unless (defined $workdir or $workdir ne "NULL");
+
+	    my $outroot = $workdir . '/' . ${exp_tag} . '/' . ${exp_tag} . '.ch.' . ${chip_id};
+
+	    my $command = "$chip --chip_id $chip_id --exp_id $exp_id --exp_tag $exp_tag --class_id $class_id --uri $uri --dbname $dbname --camera $camera --outroot $outroot";
 	    $command .= " --reduction $reduction" if defined $reduction;
+	    $command .= " --verbose" if defined $verbose;
 	    $command .= " --no-op" if defined $no_op;
 	    $command .= " --no-update" if defined $no_update;
-	    $command .= " --workdir $workdir" if defined $workdir and $workdir ne "NULL";
 	    my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
 		run( command => $command, verbose => 1 );
Index: trunk/ippScripts/scripts/ipp_serial_diff.pl
===================================================================
--- trunk/ippScripts/scripts/ipp_serial_diff.pl	(revision 16331)
+++ trunk/ippScripts/scripts/ipp_serial_diff.pl	(revision 16336)
@@ -26,9 +26,11 @@
 
 my ($dbname,			# Database name to use
+    $verbose,			# Verbose operations?
     $no_op,			# No operations?
     $no_update,			# No updating?
     );
 GetOptions(
-	   'dbname|d=s' => \$dbname,
+	   'dbname=s' => \$dbname,
+	   'verbose' => \$verbose,
 	   'no-op' => \$no_op,
 	   'no-update' => \$no_update,
@@ -72,4 +74,5 @@
 	
 	my $command = "$diff_skycell --diff_id $diff_id --dbname $dbname";
+	$command .= " --verbose" if defined $verbose;
 	$command .= " --no-op" if defined $no_op;
 	$command .= " --no-update" if defined $no_update;
Index: trunk/ippScripts/scripts/ipp_serial_stack.pl
===================================================================
--- trunk/ippScripts/scripts/ipp_serial_stack.pl	(revision 16331)
+++ trunk/ippScripts/scripts/ipp_serial_stack.pl	(revision 16336)
@@ -26,4 +26,5 @@
 
 my ($dbname,			# Database name to use
+    $verbose,			# Verbose operations?
     $no_op,			# No operations?
     $no_update,			# No updating?
@@ -31,5 +32,6 @@
     );
 GetOptions(
-	   'dbname|d=s' => \$dbname,
+	   'dbname=s' => \$dbname,
+	   'verbose' => \$verbose,
 	   'no-op' => \$no_op,
 	   'no-update' => \$no_update,
@@ -74,4 +76,5 @@
 	
 	my $command = "$stack_skycell --stack_id $stack_id --dbname $dbname";
+	$command .= " --verbose" if defined $verbose;
 	$command .= " --no-op" if defined $no_op;
 	$command .= " --no-update" if defined $no_update;
Index: trunk/ippScripts/scripts/ipp_serial_warp.pl
===================================================================
--- trunk/ippScripts/scripts/ipp_serial_warp.pl	(revision 16331)
+++ trunk/ippScripts/scripts/ipp_serial_warp.pl	(revision 16336)
@@ -26,9 +26,11 @@
 
 my ($dbname,			# Database name to use
+    $verbose,			# Verbose operations?
     $no_op,			# No operations?
     $no_update,			# No updating?
     );
 GetOptions(
-	   'dbname|d=s' => \$dbname,
+	   'dbname=s' => \$dbname,
+	   'verbose' => \$verbose,
 	   'no-op' => \$no_op,
 	   'no-update' => \$no_update,
@@ -77,4 +79,5 @@
 	
 	my $command = "$warp_overlap --warp_id $warp_id --camera $camera --tess_id $tess_id --dbname $dbname";
+	$command .= " --verbose" if defined $verbose;
 	$command .= " --no-op" if defined $no_op;
 	$command .= " --no-update" if defined $no_update;
@@ -106,4 +109,5 @@
 	
 	my $command = "$warp_skycell --warp_id $warp_id --skycell_id $skycell_id --tess_id $tess_id --camera $camera --dbname $dbname";
+	$command .= " --verbose" if defined $verbose;
 	$command .= " --no-op" if defined $no_op;
 	$command .= " --no-update" if defined $no_update;
Index: trunk/ippScripts/scripts/warp_overlap.pl
===================================================================
--- trunk/ippScripts/scripts/warp_overlap.pl	(revision 16331)
+++ trunk/ippScripts/scripts/warp_overlap.pl	(revision 16336)
@@ -159,5 +159,5 @@
     # Extract the skycells to images, used as warp templates.
     my @skycells = keys %unique_skycells;
-    generate_skycells($ipprc, $tess_id, \@skycells, $workdir) or
+    generate_skycells($ipprc, $tess_id, \@skycells, $workdir, $verbose) or
 	&my_die("Unable to generate skycells for tessellation $tess_id", $warp_id, $PS_EXIT_SYS_ERROR);