home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-386-Vol-2of3.iso / a / autogets.zip / GETSNO.ENV < prev    next >
Text File  |  1990-01-03  |  2KB  |  46 lines

  1. echo off
  2. rem rename THIS FILE TO GETS.BAT OR WHATEVER IF YOU GET REPORTS OF
  3. REM OUT OF ENVIRONMENT SPACE OR RESET THE SHELL OPTION IN CONFIG.SYS
  4. REM YOU CAN SAFELY RENAME THE FILE AUTOGETS TO WHATEVER YOU WISH
  5. autogets %1 %2 %3
  6. IF ERRORLEVEL 7 GOTO ERRORS7
  7. IF ERRORLEVEL 6 GOTO ERRORS6
  8. IF ERRORLEVEL 5 GOTO ERRORS5
  9. IF ERRORLEVEL 4 GOTO ERRORS4
  10. IF ERRORLEVEL 3 GOTO ERRORS3
  11. IF ERRORLEVEL 2 GOTO ERRORS2
  12. IF ERRORLEVEL 1 GOTO ERRORS1
  13. IF ERRORLEVEL 0 GOTO ERRORS0
  14. :ERRORS0
  15.     ECHO  EXECUTION COMPLETED NORMALLY.
  16.     PAUSE > NUL
  17.     GOTO THEEND
  18. :ERRORS1
  19.     ECHO  * AUTOGETS REPORTED AN ERROR WITH .DBF FILE >> ERRORS.LST
  20.     ECHO  * CHECK FOR A COMPLETE PATH TO THE .DBF FILE >>ERRORS.LST
  21.     GOTO THEEND
  22. :ERRORS2
  23.     ECHO  * AUTOGETS REPORTED AN ERROR WITH THE OUTPUT FILE >> ERRORS.LST
  24.     ECHO  * CHECK THE FILENAME IS VALID, DOESN'T EXIST, OR TRY WITH A DIFFERENT FILE >> ERRORS.LST
  25.     GOTO THEEND
  26. :ERRORS3
  27.     ECHO  * AUTOGETS REPORTED THAT THE SPECIFIED FILE WAS AN INVALID .DBF >>ERRORS.LST
  28.     ECHO  * CHECK THE FIRST BYTE OF THE FILE - ascii 03 () && ascii 83 (S) ARE VALID VALUES>> ERRORS.LST
  29.     GOTO THEEND
  30. :ERRORS4
  31.     ECHO  * AUTOGETS REPORTED THAT YOU ATTEMPTED TO WORK ON MULTIPLE FILES >> ERRORS.LST
  32.     ECHO  * AUTOGETS CAN CURRENTLY ONLY WORK ON ONE FILE AT A TIME, BUT >> ERRORS.LST
  33.     ECHO  * YOU CAN DO AS MANY IN A ROW AS YOU WISH >> ERRORS.LST
  34.     GOTO THEEND
  35. :ERRORS5
  36.     ECHO  * AUTOGETS REPORTED THAT USER WAS SEEKING HELP >> ERRORS.LST
  37.     GOTO THEEND
  38. :ERRORS6
  39.     ECHO  * AUTOGETS REPORTED THAT YOU DECIDED NOT TO OVERWRITE AN EXISTING FILE >> ERRORS.LST
  40.     ECHO  * WITH THE OUTPUT FROM IT'S CLEVER WORK >> ERRORS.LST
  41.     GOTO THEEND
  42. :ERRORS7
  43.     ECHO  * AUTOGETS REPORTED THAT THERE WAS INSUFFICIENT MEMORY >> ERRORS.LST
  44.     ECHO  * TRY TO REDUCE THE NUMBER OF TSR'S OR OPEN FILES BEFORE RERUNNING >> ERRORS.LST
  45. :THEEND
  46.