Index: trunk/ippScripts/scripts/detrend_reject_imfile.pl
===================================================================
--- trunk/ippScripts/scripts/detrend_reject_imfile.pl	(revision 11394)
+++ trunk/ippScripts/scripts/detrend_reject_imfile.pl	(revision 11455)
@@ -75,5 +75,5 @@
 	run(command => $command, verbose => 1);
     unless ($success) {
-	$error_code = $error_code >> 8;
+	$error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
 	warn("Unable to perform dettool -residimfile: $error_code\n");
 	exit($error_code);
@@ -129,5 +129,5 @@
 	run(command => $command, verbose => 1);
     unless ($success) {
-	$error_code = $error_code >> 8;
+	$error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
 	&my_die("Unable to run ppImage: $error_code", $det_id, $iter, $exp_tag, $error_code);
     }
@@ -141,5 +141,5 @@
 	run(command => $command, verbose => 1);
     unless ($success) {
-	$error_code = $error_code >> 8;
+	$error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
 	&my_die("Unable to run ppImage: $error_code", $det_id, $iter, $exp_tag, $error_code);
     }
@@ -278,5 +278,5 @@
 	run(command => $command, verbose => 1);
     unless ($success) {
-	$error_code = $error_code >> 8;
+	$error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
 	warn("Unable to perform dettool -addresidexp: $error_code\n");
 	exit($error_code);