NAME: DosExitCode

     USE: Function Return a value relating to the exit status of a
          subprocess.

                Value       Comment

                  0          normal exit;
                  1          Ctrl-C pressed
                  2          Device Error
                  3          terminated by the Keep procedure

     DEPENDENCY:  The DOS unit must be used placed in the uses section.

     SYNTAX: ExitValue := DosExitCode;  { ExitValue is of type word }