Index: /trunk/pstamp/scripts/pstamp_parser_run.pl
===================================================================
--- /trunk/pstamp/scripts/pstamp_parser_run.pl	(revision 29575)
+++ /trunk/pstamp/scripts/pstamp_parser_run.pl	(revision 29576)
@@ -23,4 +23,5 @@
 
 use PS::IPP::Config qw( :standard );
+use PS::IPP::PStamp::RequestFile qw( :standard );
 
 my $req_id;
@@ -146,4 +147,6 @@
 my $reqType;    # for the database
 
+my $request_fault = $PSTAMP_INVALID_REQUEST;
+
 if (-r $uri) {
     # run the appropriate parse command to parse the queue the jobs for this request
@@ -157,8 +160,10 @@
             $parse_cmd = "$pstampparse";
             $parse_cmd .= " --label $label" if $label;
+            $request_fault = 0;
         } elsif ($request_type eq "MOPS_DETECTABILITY_QUERY") {
             $reqType = 'dquery';
             $parse_cmd = "$dqueryparse";
 	    $parse_cmd .= " --label $label" if $label;
+            $request_fault = 0;
         } else {
             print STDERR "Unknown request type $request_type found in $uri";
@@ -182,5 +187,5 @@
     my $command = "$pstamptool -updatereq -req_id $req_id -set_state run";
     $command   .= " -set_reqType unknown";
-    $command   .= " -set_fault $PS_EXIT_DATA_ERROR";
+    $command   .= " -set_fault $request_fault";
     $command   .= " -dbname $dbname" if $dbname;
     $command   .= " -dbserver $dbserver" if $dbserver;
@@ -190,5 +195,5 @@
         die("Unable to perform $command error code: $error_code");
     }
-    exit $PS_EXIT_DATA_ERROR;
+    exit $request_fault;
 }
 
