XL Fortran Enterprise Edition for AIX : User's Guide - IBM

Default Record Lengths
File Permissions
If a pseudo-device, pipe, or character special file is connected for formatted or
unformatted sequential access with no RECL= specifier, or for formatted stream
access, the default record length is 32 768 rather than 2 147 483 647, which is the
default for sequential-access files connected to random-access devices. (See the
default_recl run-time option.)
In certain cases, the default maximum record length for formatted files is larger, to
accommodate programs that write long records to standard output. If a unit is
connected to a terminal for formatted sequential access and there is no explicit
RECL= qualifier in the OPEN statement, the program uses a maximum record
length of 2 147 483 646 (2**31-2) bytes, rather than the usual default of 32 768 bytes.
When the maximum record length is larger, formatted I/O has one restriction:
WRITE statements that use the T or TL edit descriptors must not write more than
32 768 bytes. This is because the unit’s internal buffer is flushed each 32 768 bytes,
and the T or TL edit descriptors will not be able to move back past this boundary.
A file must have the appropriate permissions (read, write, or both) for the
corresponding operation being performed on it.
When a file is created, the default permissions (if the umask setting is 000) are
both read and write for user, group, and other. You can turn off individual
permission bits by changing the umask setting before you run the program.
Selecting Error Messages and Recovery Actions
By default, an XLF-compiled program continues after encountering many kinds of
errors, even if the statements have no ERR= or IOSTAT= specifiers. The program
performs some action that might allow it to recover successfully from the bad data
or other problem.
To control the behavior of a program that encounters errors, set the XLFRTEOPTS
environment variable, which is described in “Setting Run-Time Options” on page
51, before running the program:
v To make the program stop when it encounters an error instead of performing a
recovery action, include err_recovery=no in the XLFRTEOPTS setting.
v To make the program stop issuing messages each time it encounters an error,
include xrf_messages=no.
v To disallow XL Fortran extensions to Fortran 90 at run time, include
langlvl=90std. To disallow XL Fortran extensions to Fortran 95 at run time,
include langlvl=95std. To disallow XL Fortran extensions to Fortran 2003
behaviour at run time, include langlvl=2003std. These settings, in conjunction
with the -qlanglvl compiler option, can help you locate extensions when
preparing to port a program to another platform.
For example:
# Switch defaults for some run-time settings.
XLFRTEOPTS="err_recovery=no:cnverr=no"
export XLFRTEOPTS
If you want a program always to work the same way, regardless of
environment-variable settings, or want to change the behavior in different parts of
the program, you can call the SETRTEOPTS procedure:
330 XL Fortran Enterprise Edition for AIX : User’s Guide