Index: /tags/ipp-20100701/pstamp/scripts/pstamp_job_run.pl
===================================================================
--- /tags/ipp-20100701/pstamp/scripts/pstamp_job_run.pl	(revision 28927)
+++ /tags/ipp-20100701/pstamp/scripts/pstamp_job_run.pl	(revision 28928)
@@ -359,5 +359,5 @@
     foreach my $f (@_) {
         if (!$ipprc->file_exists($f)) {
-            my_die( "file $f does not exist:", $job_id, $PS_EXIT_SYS_ERROR);
+            my_die( "file $f does not exist:", $job_id, $PSTAMP_GONE, 'stop');
         }
     }
@@ -369,6 +369,8 @@
     my $job_id = shift;         # job identifier
     my $exit_code = shift;      # Exit code to add
+    my $job_state = shift;      # new pstampJob.state
 
     $exit_code = $PS_EXIT_PROG_ERROR unless $exit_code;
+    $job_state = 'run' unless $job_state;
 
     carp($msg);
@@ -378,5 +380,5 @@
         $command .= " -set_fault $exit_code";
         # XXX: fix pstamptool to not require -state when -fault with nonzero value is provided
-        $command .= " -set_state run";
+        $command .= " -set_state $job_state";
         $command .= " -dbname $dbname" if defined $dbname;
         $command .= " -dbserver $dbserver" if defined $dbserver;