Index: /trunk/psLib/utils/psParseErrorCodes
===================================================================
--- /trunk/psLib/utils/psParseErrorCodes	(revision 23693)
+++ /trunk/psLib/utils/psParseErrorCodes	(revision 23694)
@@ -4,20 +4,19 @@
 use Getopt::Long;
 
-my @ErrorCodes        = ();
-my @ErrorDescriptions = ();
-
-my $data = "psErrorCodes.dat";
-my $outdir = ".";
+my $data;                       # Input data
+my $outdir;                     # Output directory
 
 # Assign variables based on the presence of command line options to the script
 GetOptions(
-    "data=s"  => \$data,
-    "outdir=s" => \$outdir,
-    "verbose" => \$verbose,
-    "help"    => \$help
-);
+           "data=s"   => \$data,
+           "outdir=s" => \$outdir,
+           "verbose"  => \$verbose,
+           "help"     => \$help
+           );
 
-if ($help) {
-    print "Usage: parseErrorCodes ", "[--data=dataFile] ", "[--help] ",
+if ($help
+    or not defined $data
+    or not defined $outdir) {
+    print "Usage: parseErrorCodes ", "[--data=dataFile] ", "[--outdir=directory] ", "[--help] ",
         "[--verbose] filename\n\n";
     exit(0);
@@ -28,4 +27,7 @@
     die "Can not open data file $data.";
 }
+
+my @ErrorCodes        = ();
+my @ErrorDescriptions = ();
 
 print "Datafile:\n" if $verbose;