USE F90_IOSTAT
or
USE,INTRINSIC :: F90_IOSTAT
Integer,Parameter :: IOERR_EOR = -2End of record
Integer,Parameter :: IOERR_EOF = -1End of file
Integer,Parameter :: IOERR_OK = 0Successful operation
Integer,Parameter :: IOERR_BUFFER_OVERFLOW = 100Buffer overflow on output
Integer,Parameter :: IOERR_INTERNAL_FILE_OVERFLOW = 101Internal file overflow
Integer,Parameter :: IOERR_BAD_SCALE = 102Scale factor out of range
Integer,Parameter :: IOERR_BAD_EXPONENT = 103Exponent too large for w.d format
Integer,Parameter :: IOERR_INPUT_BUFFER_OVERFLOW = 104Record too long for input buffer
Integer,Parameter :: IOERR_ZERO_REPEAT = 105Zero repeat factor in list-directed input
Integer,Parameter :: IOERR_BAD_INTEGER = 106Invalid input for integer editing
Integer,Parameter :: IOERR_INTEGER1_TOO_BIG = 107Input value too large for INTEGER(KIND=1)
Integer,Parameter :: IOERR_INTEGER2_TOO_BIG = 108Input value too large for INTEGER(KIND=2)
Integer,Parameter :: IOERR_INTEGER_OVERFLOW_REPEAT = 109Repeat factor in list-directed input larger than HUGE(0)
Integer,Parameter :: IOERR_INTEGER_TOO_BIG = 110Input value too large for default INTEGER type
Integer,Parameter :: IOERR_BAD_REAL = 111Invalid input for real editing
Integer,Parameter :: IOERR_BAD_LOGICAL = 112Invalid input for logical editing
Integer,Parameter :: IOERR_BAD_COMPLEX = 113Invalid input for complex editing
Integer,Parameter :: IOERR_BAD_CHAR = 114Invalid input for character editing
Integer,Parameter :: IOERR_FORMAT_NO_LPAREN = 115Format specification does not begin with a left parenthesis
Integer,Parameter :: IOERR_FORMAT_NO_ENDING_RPAREN = 116Format specification does not end with a right parenthesis
Integer,Parameter :: IOERR_NO_DATA_EDIT_IN_REVERSION = 117No data edit descriptor in tail of format specification after reversion
Integer,Parameter :: IOERR_SUBFMT_TOO_DEEP = 118Sub-format groups nested too deeply
Integer,Parameter :: IOERR_UNEXPECTED_FORMAT_END = 119Unexpected end of format specification
Integer,Parameter :: IOERR_EXPECTED_INTEGER_VALUE = 120Expected integer literal constant in format specification
Integer,Parameter :: IOERR_FORMAT_MBNZ = 121Field/exponent width or repeat in format specification must be non-zero
Integer,Parameter :: IOERR_EXPECTED_PERIOD = 122Expected decimal point in format specification
Integer,Parameter :: IOERR_EXPECTED_P = 123Expected P following signed integer constant in format specification
Integer,Parameter :: IOERR_BAD_BNBZ = 124Expected N or Z following B in format specification
Integer,Parameter :: IOERR_BAD_EDIT = 125Invalid edit descriptor
Integer,Parameter :: IOERR_NO_EDIT_FOR_REPEAT = 126No edit descriptor following repeat factor
Integer,Parameter :: IOERR_REPEAT_FOR_SIGN = 127Repeat factor given for sign edit descriptor
Integer,Parameter :: IOERR_REPEAT_FOR_BLANK_INTERP = 128Repeat factor given for blank-interpretation edit descriptor
Integer,Parameter :: IOERR_MISSING_HOLLERITH_LENGTH = 129Missing length of H edit descriptor
Integer,Parameter :: IOERR_REPEAT_FOR_CHAR_EDIT = 130Repeat factor given for character string edit descriptor
Integer,Parameter :: IOERR_NO_SPACING_FOR_X = 131No spacing specified for X edit descriptor
Integer,Parameter :: IOERR_REPEAT_FOR_POSITION = 132Repeat factor given for position edit descriptor
Integer,Parameter :: IOERR_CHAR_EDIT_IN_READ = 133Character string edit descriptor used on input
Integer,Parameter :: IOERR_BAD_EDIT_FOR_REAL = 134Invalid edit descriptor for real i/o-list item
Integer,Parameter :: IOERR_BAD_EDIT_FOR_INTEGER = 135Invalid edit descriptor for integer i/o-list item
Integer,Parameter :: IOERR_BAD_EDIT_FOR_LOGICAL = 136Invalid edit descriptor for logical i/o-list item
Integer,Parameter :: IOERR_CHAR_OVERLAPS_END = 137Character string edit descriptor does not terminate before format end
Integer,Parameter :: IOERR_ONLY_SIGN_FOUND = 138Sign in a numeric input field not followed by any digits
Integer,Parameter :: IOERR_BAD_INPUT_EXPONENT = 139Invalid exponent in real input field
Integer,Parameter :: IOERR_BAD_INPUT_REAL = 140Invalid character in real input field
Integer,Parameter :: IOERR_BAD_INPUT_INTEGER = 141Invalid character in integer input field
Integer,Parameter :: IOERR_BAD_BINARY = 142Invalid character in binary integer input field
Integer,Parameter :: IOERR_BAD_OCTAL = 143Invalid character in octal integer input field
Integer,Parameter :: IOERR_BAD_HEX = 144Invalid character in hexadecimal integer input field
Integer,Parameter :: IOERR_BAD_EDIT_FOR_CHARACTER = 145Invalid edit descriptor for character i/o-list item
Integer,Parameter :: IOERR_READ_AFTER_WRITE = 146READ after WRITE with no intervening file positioning
Integer,Parameter :: IOERR_BAD_UNIT = 147Unit number out of range
Integer,Parameter :: IOERR_NOT_CONNECTED = 148Unit is not connected
Integer,Parameter :: IOERR_CANNOT_BACKSPACE = 149File connected to unit is not capable of BACKSPACE
Integer,Parameter :: IOERR_NOT_SEQUENTIAL = 150Unit is not connected for SEQUENTIAL i/o
Integer,Parameter :: IOERR_NOT_READ = 151Unit is not connected for READ action
Integer,Parameter :: IOERR_NOT_FORMATTED = 152Unit is not connected for FORMATTED i/o
Integer,Parameter :: IOERR_NOT_WRITE = 153Unit is not connected for WRITE action
Integer,Parameter :: IOERR_NOT_UNFORMATTED = 154Unit is not connected for UNFORMATTED i/o
Integer,Parameter :: IOERR_NOT_CONNECTED_NO_FILENAME = 155Unit is not connected and no FILE= specifier on OPEN
Integer,Parameter :: IOERR_SCRATCH_NAMED = 156FILE= specifier on OPEN with STATUS='SCRATCH'
Integer,Parameter :: IOERR_DIFFERENT_STATUS = 157OPEN on connected unit has different STATUS= specifier
Integer,Parameter :: IOERR_DIFFERENT_ACCESS = 158OPEN on connected unit has different ACCESS= specifier
Integer,Parameter :: IOERR_DIFFERENT_FORM = 159OPEN on connected unit has different FORM= specifier
Integer,Parameter :: IOERR_DIFFERENT_RECL = 160OPEN on connected unit has different RECL= specifier
Integer,Parameter :: IOERR_DIFFERENT_ACTION = 161OPEN on connected unit has different ACTION= specifier
Integer,Parameter :: IOERR_DIFFERENT_POSITION = 162OPEN on connected unit has different POSITION= specifier
Integer,Parameter :: IOERR_BAD_STATUS = 163Invalid value for STATUS= specifier
Integer,Parameter :: IOERR_BAD_ACCESS = 164Invalid value for ACCESS= specifier
Integer,Parameter :: IOERR_BAD_FORM = 165Invalid value for FORM= specifier
Integer,Parameter :: IOERR_BAD_BLANKS = 166Invalid value for BLANKS= specifier
Integer,Parameter :: IOERR_BAD_POSITION = 167Invalid value for POSITION= specifier
Integer,Parameter :: IOERR_BAD_ACTION = 168Invalid value for ACTION= specifier
Integer,Parameter :: IOERR_BAD_DELIM = 169Invalid value for DELIM= specifier
Integer,Parameter :: IOERR_BAD_PAD = 170Invalid value for PAD= specifier
Integer,Parameter :: IOERR_NO_RECL = 171The RECL= specifier must be given for DIRECT access OPEN
Integer,Parameter :: IOERR_CANNOT_KEEP = 172STATUS='KEEP' is invalid for a SCRATCH file
Integer,Parameter :: IOERR_ENDFILE_TWICE = 173ENDFILE applied twice to unit with no intervening file positioning
Integer,Parameter :: IOERR_NAME_TOO_LONG = 174File name too long
Integer,Parameter :: IOERR_NO_OLD_FILE = 175Cannot find OLD file
Integer,Parameter :: IOERR_NEW_FILE_EXISTS = 176New file already exists
Integer,Parameter :: IOERR_CANNOT_REWIND = 177File connected to unit is not capable of REWIND
Integer,Parameter :: IOERR_BACKSPACE_FAILED = 178BACKSPACE failed to find the beginning of the previous record
Integer,Parameter :: IOERR_NOT_DIRECT = 179Unit is not connected for DIRECT i/o
Integer,Parameter :: IOERR_BAD_REC = 180Record number out of range
Integer,Parameter :: IOERR_BAD_INPUT_LOGICAL = 181Illegal character in LOGICAL input field
Integer,Parameter :: IOERR_NO_INPUT_LOGICAL = 182No value found in LOGICAL input field
Integer,Parameter :: IOERR_CANNOT_OPEN = 183Unknown OPEN failure on unit
Integer,Parameter :: IOERR_NO_AMPERSAND = 184Expected '&' but found C in NAMELIST input
(C is replaced by the erroneous character).
Integer,Parameter :: IOERR_GROUP_NAME_TOO_LONG = 185NAMELIST group name in input is too long
Integer,Parameter :: IOERR_WRONG_NAMELIST = 186Expected NAMELIST group /N1/ but found /N2/
(N1 and N2 are replaced by the relevant NAMELIST group names).
Integer,Parameter :: IOERR_NAMELIST_BAD_CHAR = 187Invalid character C in NAMELIST input
(C is replaced by the erroneous character).
Integer,Parameter :: IOERR_OBJECT_NAME_TOO_LONG = 188NAMELIST group name in input of NAMELIST/N/ is too long
(N is replaced by the erroneous namelist group name).
Integer,Parameter :: IOERR_EXPECTED_EQUALS = 189Expected '=' but found C in NAMELIST input
(C is replaced by the erroneous character).
Integer,Parameter :: IOERR_UNKNOWN_OBJECT_NAME = 190Unknown group object V in input for NAMELIST/N/
(V is replaced by the erroneous group object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_UNEXPECTED_SUBSCRIPT = 191Unexpected subscript for object V of NAMELIST/N/
(V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_UNEXPECTED_COMPONENT = 192Unexpected component specifier for object V of NAMELIST/N/
(V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_COMPONENT_NAME_TOO_LONG = 193Component name too long in input for object V of NAMELIST/N/
(V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_UNKNOWN_COMPONENT = 194Unknown component C in input for object V of NAMELIST/N/
(C is replaced by the erroneous component name, V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_ARRAY_OF_ARRAY = 195Array component of array parent in input for object V of NAMELIST/N/
(V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_BAD_INTEGER_LITERAL = 196Invalid integer literal in input for object V of NAMELIST/N/
(V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_EXPECTED_COLON = 197Expected ':' but found 'C' in input for object V of NAMELIST/N/
(C is replaced by the erroneous character, V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_ZERO_LENGTH_INPUT = 198Substring has zero length in input for object V of NAMELIST/N/
(V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_SUBSTRING_OUT_OF_BOUNDS = 199Substring (I:I) out of bounds in input for object V of NAMELIST/N/
(I and J are replaced by the substring bounds, V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_EXPECTED_COMMA = 200Expected ',' but found 'C' in input for object V of NAMELIST/N/
(C is replaced by the erroneous character, V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_EXPECTED_RPAREN = 201Expected ')' but found 'C' in input for object V of NAMELIST/N/
(C is replaced by the erroneous character, V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_SUBSCRIPT_OUT_OF_RANGE = 202Subscript (I) out of range in input for object V of NAMELIST/N/
(I is replaced by the erroneous subscript value, V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_ZERO_SIZE_INPUT = 203Array section has zero size in input for object V of NAMELIST/N/
(V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_ZERO_STRIDE = 204Section stride has value zero in input for object V of NAMELIST/N/
(V is replaced by the object name, N is replaced by the namelist group name).
Integer,Parameter :: IOERR_NO_NAMELIST_GROUP_NAME = 205Missing namelist group name in input of NAMELIST/N/
(N is replaced by the namelist group name).
Integer,Parameter :: IOERR_INPUT_LIST_TOO_BIG = 206Input list bigger than record length in unformatted READ on unit N
(N is replaced by the unit number).
Integer,Parameter :: IOERR_RECORD_TOO_SHORT = 207Record too short for format requirement and PAD='NO' on unit N
(N is replaced by the unit number).
Integer,Parameter :: IOERR_CORRUPT_UNFORMATTED_FILE = 208Unformatted data file open on unit N is corrupt
(N is replaced by the unit number).
Integer,Parameter :: IOERR_TRUNCATE_FAILED = 209File truncation on unit N failed
(N is replaced by the unit number).
Integer,Parameter :: IOERR_RW_AFTER_ENDFILE = 210READ/WRITE attempted after ENDFILE on unit N
(N is replaced by the unit number).
Integer,Parameter :: IOERR_INTEGER64_TOO_BIG = 211Input value too large for 64-bit integer
Integer,Parameter :: IOERR_NO_FILE_WITH_REPLACE = 212No FILE= specifier with STATUS='REPLACE
Integer,Parameter :: IOERR_RECL_LE_ZERO = 213Invalid value for RECL= specifier (must be positive)
Integer,Parameter :: IOERR_END_OF_DIRECT_ACCESS = 214READ beyond end of direct access file on unit N
(N is replaced by the unit number).
Integer,Parameter :: IOERR_REAL_INPUT_OVERFLOW = 215Floating overflow on real number input
Integer,Parameter :: IOERR_DIRECT_POSITION_INCOMPAT = 216Direct access is incompatible with the POSITION= specifier.
Integer,Parameter :: IOERR_SCALE_FOLLOWED_BY_REPEAT = 217Scale factors cannot be followed by repeat count in format specification.
Integer,Parameter :: IOERR_RECL_WITH_STREAM_ACCESS = 218RECL= specifier with ACCESS='STREAM'.
Integer,Parameter :: IOERR_BACKSPACE_OF_UNF_STREAM = 219Cannot BACKSPACE unformatted ACCESS='STREAM' unit N
(N is replaced by the unit number).
Integer,Parameter :: IOERR_BAD_ADVANCE = 220ADVANCE= specifier must be 'YES' or 'NO'.
Integer,Parameter :: IOERR_SIZE_WITHOUT_NONADVANCING = 221SIZE= is not valid without ADVANCE='NO'.
Integer,Parameter :: IOERR_BAD_DECIMAL = 222DECIMAL= specifier must be 'POINT' or 'COMMA'.
Integer,Parameter :: IOERR_BAD_ROUND = 223Invalid value for ROUND= specifier.
Integer,Parameter :: IOERR_BAD_SIGN = 224SIGN= specifier must be 'PROCESSOR_DEFINED', 'PLUS' or 'SUPPRESS'.
Integer,Parameter :: IOERR_BAD_ASYNCHRONOUS = 225ASYNCHRONOUS= specifier must be 'NO' or 'YES'.
Integer,Parameter :: IOERR_BAD_ENCODING = 226Invalid value for ENCODING= specifier.
Integer,Parameter :: IOERR_PENDING_BUT_NOT_ASYNC = 227PENDING= specifier but unit N is not open for ASYNCHRONOUS i/o
(N is replaced by the unit number).
Integer,Parameter :: IOERR_POS_BUT_NOT_STREAM = 228POS= specifier but unit N is not open for STREAM i/o
(N is replaced by the unit number).
Integer,Parameter :: IOERR_BAD_POS = 229Invalid value for POS= specifier.
Integer,Parameter :: IOERR_DIFFERENT_ASYNCHRONOUS = 230OPEN on connected unit N has different ASYNCHRONOUS= specifier
(N is replaced by the unit number).
Integer,Parameter :: IOERR_DELIM_on_unformatted_OPEN = 231DELIM= specifier in OPEN for an UNFORMATTED file.
Integer,Parameter :: IOERR_PAD_on_unformatted_OPEN = 232PAD= specifier in OPEN for an UNFORMATTED file.
Integer,Parameter :: IOERR_WAIT_WITH_ID_BUT_FILE_IS_NOT_ASYNC = 233WAIT with ID= but unit is open with ASYNCHRONOUS='NO'
Integer,Parameter :: IOERR_WAIT_WITH_ID_BUT_NO_CONNECTION = 234WAIT with ID= but unit is not connected to a file.
Integer,Parameter :: IOERR_INVALID_VALUE_FOR_ID_SPECIFIER = 235Invalid value N for ID= specifier
(N is replaced by the bad value).
Integer,Parameter :: IOERR_BAD_CONVERT_SPECIFIER = 236Invalid value for CONVERT= specifier.
Integer,Parameter :: IOERR_CONVERT_on_formatted_OPEN = 237CONVERT= specifier in OPEN for a FORMATTED file.
Integer,Parameter :: IOERR_CONVERT_SPECIFIER_MODE_NOT_SUPPORTED = 238Specified CONVERT= mode is not supported.
Integer,Parameter :: IOERR_ENCODING_ERROR = 239Contents of formatted file are not valid for the current ENCODING.
Integer,Parameter :: IOERR_NO_NEWUNIT_AVAILABLE = 240No unit available for NEWUNIT= specifier.
Integer,Parameter :: IOERR_NEWUNIT_BUT_NO_FILE_AND_NOT_STATUS_SCRATCH = 241NEWUNIT= specifier but no FILE= and STATUS= value is not 'SCRATCH'.
Integer,Parameter :: IOERR_INQUIRE_INTERNAL_UNIT = 242
INQUIRE on a unit number that identifies an internal file.
Integer,Parameter :: IOERR_NESTED_FORMAT_ITEM_LIST_IS_EMPTY = 243
Nested format-item-list is empty.
Integer,Parameter :: IOERR_NO_LPAREN_AFTER_UNLIMITED_STAR = 244
No left parenthesis after unlimited repeat factor '*'.
Integer,Parameter :: IOERR_NO_DATA_EDIT_IN_UNLIMITED_FORMAT_ITEM = 245
No data edit descriptor in unlimited format item.
Integer,Parameter :: IOERR_UNLIMITED_FORMAT_ITEM_IS_NOT_THE_LAST = 246
Unlimited format item is not the last item.
Integer,Parameter :: IOERR_UNLIMITED_FORMAT_ITEM_APPEARS_IN_NESTED = 247
Unlimited format item appears in nested format item.
Integer,Parameter :: IOERR_BAD_EDIT_1C_FOR_2C_ITEM = 248
Invalid edit descriptor fmt-field for type input/output item.
Integer,Parameter :: IOERR_UNEXPECTED_EXPONENT_FOR_G0 = 249
Unexpected exponent for G0 edit descriptor.
Integer,Parameter :: IOERR_REPEAT_FOR_ROUNDING = 250
Repeat factor given for rounding edit descriptor.
Integer,Parameter :: IOERR_OPERATING_SYSTEM_ERROR = 251
Operating System reported error.
Integer,Parameter :: IOERR_WRITE_FAILED_MYSTERIOUSLY = 252
WRITE operation failed mysteriously.
Integer,Parameter :: IOERR_MISSING_COMPONENT_NAME_AFTER_PERCENT = 253
Missing component name after %.
Integer,Parameter :: IOERR_ASYNC_NOT_PERMITTED = 254
ASYNCHRONOUS='YES' is not permitted for this unit.
Integer,Parameter :: IOERR_ASYNCHRONOUS_DEFINED_INPUT_OUTPUT = 256
ASYNCHRONOUS='YES' cannot be used for defined input/output.
Integer,Parameter :: IOERR_POS_IN_CHILD_DATA_TRANSFER = 257
POS= specifier in child data transfer statement.
Integer,Parameter :: IOERR_REC_IN_CHILD_DATA_TRANSFER = 258
REC= specifier in child data transfer statement.
Integer,Parameter :: IOERR_UNTERMINATED_DT_STRING = 259
Unterminated DT edit descriptor string.
Integer,Parameter :: IOERR_INVALID_CHAR_IN_DT_V_LIST = 260
Invalid non-digit character in DT v_list (not a digit, comma, or right parenthesis).
Integer,Parameter :: IOERR_UNTERMINATED_DT_V_LIST = 261
Unterminated DT v_list (missing right parenthesis).
Integer,Parameter :: IOERR_BACKSPACE_OF_DEFINED_IO_UNIT = 262
BACKSPACE of defined input/output unit.
Integer,Parameter :: IOERR_CLOSE_OF_DEFINED_IO_UNIT = 263
CLOSE of defined input/output unit.
Integer,Parameter :: IOERR_ENDFILE_OF_DEFINED_IO_UNIT = 264
ENDFILE of defined input/output unit.
Integer,Parameter :: IOERR_OPEN_OF_DEFINED_IO_UNIT = 265
OPEN of defined input/output unit.
Integer,Parameter :: IOERR_REWIND_OF_DEFINED_IO_UNIT = 266
REWIND of defined input/output unit.
The source code for this module may be found in the NAG Fortran runtime library directory (usually /usr/local/lib/NAG_Fortran).
nagfor(1), nag_modules(3).
Please report any bugs found to ‘support@nag.co.uk’ or ‘support@nag.com’, along with any suggestions for improvements.