$save nolist /* *============================================================================ * This program is distributed in the hope that it will be useful, but * WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE * * Permission to use for any purpose, modify, copy, and make enhancements * and derivative works of the software is granted if attribution is given to * R.M. Gillmore, dba the ACME Software Deli, as the author * * While the ACME Software Deli does not work for money, there is nonetheless * a significant amount of work involved. The ACME Software Deli maintains the * rights to all code written, though it may be used and distributed as long as * the following conditions are maintained. * * 1. The copyright statement at the top of each code block is maintained in * your distribution. * 2. You do not identify yourself as the ACME Software Deli * 3. Any changes made to the software are sent to the ACME Software Deli *============================================================================ */ /* * $Id: errCode.ext 1157 2025-05-05 00:35:39Z rmgillmore $ */ $if not ERRCODE_EXT_INCLUDED $set (ERRCODE_EXT_INCLUDED) declare errorType_t literally 'word', OS_ERROR literally '1', APP_ERROR literally '0'; /* * application exit codes */ declare EXIT_SUCCESS literally '0', EXIT_FAILURE literally '1', NORMAL_EXIT literally 'EXIT_SUCCESS', WARN_MSG_ISSUED literally 'EXIT_FAILURE', ERROR_DETECTED literally '2', ERROR_FATAL literally '4', JOB_ABORT literally '5', INVALID_NUMBER_ARGUMENTS literally '6', INSUFFICIENT_NUMBER_ARGUMENTS literally 'INVALID_NUMBER_ARGUMENTS', INVALID_ARGUMENTS literally '7', INSUFFICIENT_MEMORY literally '8', PROGRAM_DOES_NOT_EXIST literally '9', INPUT_FILE_NOT_SPECIFIED literally '10', FILE_NOT_SPECIFIED literally '11', OUTPUT_FILE_NOT_SPECIFIED literally '12', INVALID_ENVIRONMENT literally '13', DATA_FILE_DOES_NOT_EXIST literally '14', CASE_ERROR literally '17', UNABLE_TO_OPEN_INPUT literally '18', UNABLE_TO_OPEN_OUTPUT literally '19', DATA_FILE_CORRUPT literally '20'; /* * DOS function error codes */ declare DOS_NO_ERROR literally '00h', DOS_FUNCTION_NUMBER_INVALID literally '01h', DOS_FILE_NOT_FOUND literally '02h', DOS_PATH_NOT_FOUND literally '03h', DOS_TOO_MANY_OPEN_FILES literally '04h', DOS_ACCESS_DENIED literally '05h', DOS_INVALID_HANDLE literally '06h', DOS_MEM_CTRL_BLOCK_DESTROYED literally '07h', DOS_INSUFFICIENT_MEMORY literally '08h', DOS_MEM_BLOCK_ADDRESS_INVALID literally '09h', DOS_ENVIRONMENT_INVALID literally '0ah', DOS_FORMAT_INVALID literally '0bh', DOS_ACCESS_CODE_INVALID literally '0ch', DOS_DATA_INVALID literally '0dh', DOS_INVALID_DRIVE literally '0fh', DOS_CANNOT_REMOVE_CURRENT_DIR literally '10h', DOS_NOT_SAME_DEVICE literally '11h', DOS_NO_MORE_FILES literally '12h', DOS_DISK_WRITE_PROTECTED literally '13h', DOS_UNKNOWN_UNIT literally '14h', DOS_DRIVE_NOT_READY literally '15h', DOS_UNKNOWN_COMMAND literally '16h', DOS_DATA_ERROR_CRC literally '17h', DOS_BAD_REQUEST_STRUCT_LENGTH literally '18h', DOS_SEEK_ERROR literally '19h', DOS_UNKNOWN_MEDIA_TYPE literally '1ah', DOS_SECTOR_NOT_FOUND literally '1bh', DOS_PRINTER_OUT_OF_PAPER literally '1ch', DOS_WRITE_FAULT literally '1dh', DOS_READ_FAULT literally '1eh', DOS_GENERAL_FAILURE literally '1fh', DOS_SHARING_VIOLATION literally '20h', DOS_LOCK_VIOLATION literally '21h', DOS_DISK_CHANGE_INVALID literally '22h', DOS_FCB_UNAVAILABLE literally '23h', DOS_SHARING_BUFFER_OVERFLOW literally '24h', /* * 25h-31h reserved */ DOS_UNSUPPORTED_NETWORK_REQUEST literally '32h', DOS_RMT_COMPUTER_NOT_LISTENING literally '33h', DOS_DUPLICATE_NAME_ON_NETWORK literally '34h', DOS_NETWORK_NAME_NOT_FOUND literally '35h', DOS_NETWORK_BUSY literally '36h', DOS_NET_DEVICE_DOES_NOT_EXIST literally '37h', DOS_NET_CMD_LIMIT_EXCEEDED literally '38h', DOS_NET_ADAPTER_HARDWARE_ERROR literally '39h', DOS_INCORRECT_NET_RESPONSE literally '3Ah', DOS_UNEXPECTED_NETWORK_ERROR literally '3Bh', DOS_INCOMPATIBLE_REMOTE_ADAPTER literally '3Ch', DOS_PRINT_QUEUE_FULL literally '3Dh', DOS_QUEUE_NOT_FULL literally '3Eh', DOS_NOT_ENOUGH_SPACE_TO_PRINT literally '3Fh', DOS_NET_NAME_WAS_DELETED literally '40h', DOS_NET_ACCESS_DENIED literally '41h', DOS_NET_DEVICE_TYPE_INCORRECT literally '42h', DOS_NET_NAME_NOT_FOUND literally '43h', DOS_NET_NAME_LIMIT_EXCEEDED literally '44h', DOS_NET_SESSION_LIMIT_EXCEEDED literally '45h', DOS_TEMPORARILY_PAUSED literally '46h', DOS_NET_REQUEST_NOT_ACCEPTED literally '47h', DOS_PRINT_DISK_REDIRECT_PAUSED literally '48h', /* * 49h-4Fh reserved */ DOS_FILE_EXISTS literally '50h', /* * 51h reserved */ DOS_CANNOT_MAKE_DIRECTORY literally '52h', DOS_FAIL_ON_INT_24H literally '53h', DOS_TOO_MANY_REDIRECTIONS literally '54h', DOS_DUPLICATE_REDIRECTION literally '55h', DOS_INVALID_PASSWORD literally '56h', DOS_INVALID_PARAMETER literally '57h', DOS_NETWORK_WRITE_FAULT literally '58h'; $if not ERRCODE_IMPLEMENTATION decodeError: procedure ( errorType, errorNumber, stringPtr ) external; declare errorType errorType_t, errorNumber integer, stringPtr pointer; end decodeError; extendedErrorCode: procedure word external; end extendedErrorCode; $endif $endif $restore