logical function ioinit ( cctl, bzro, apnd, prefix, vrbose ) logical cctl, bzro, apnd, vrbose character*(*) prefix
OBSOLETE 提供此手册页仅出于历史的原因。Fortran 95 f95 没有实现 ioinit 并且此功能不再可用。
--------------------------------------------------
此例程在运行时对 f77 I/O 系统中的多个全局参数进行初始化，并且将在外部定义的文件附加到逻辑单元。此连接只是在断开前存在，如果您关闭了单元，则连接将不再保留。标志参数的效果将应用于在调用 ioinit 后打开的逻辑单元。预先分配的单元 5 和 6 例外，cctl 和 bzro 在任何时候都可以应用于它们。ioinit 是以 FORTRAN 77 编写的。
回车控制－缺省情况下，并非任何逻辑单元中都可以识别回车控制。如果 cctl 为 .true.，则在到所有逻辑单元的有格式输出中都可以识别回车控制，但是单元 0（诊断通道）除外。否则将恢复缺省值。
空白－缺省情况下，将忽略输入数据字段中的尾随空白和嵌入空白。如果 bzro 为 .true.，则会将这样的空白视为零。否则将恢复缺省值。
附加－缺省情况下，为顺序访问而打开的所有文件都将被置于其开头。有时候需要或方便在文件末尾打开，以便将写入附加到现有数据之后。如果 apnd 为 .true.，则随后在任何逻辑单元上打开的文件在打开时都将被置于其末尾。值为 .false. 将恢复缺省行为。
自动文件连接－ 许多系统在程序运行时提供了全局名称与 FORTRAN 逻辑单元的自动关联。此 FORTRAN 编译器中没有这样的自动关联。不过，如果参数 prefix 是一个非空白字符串，则会在程序环境中寻找 prefixNN 形式的名称。将使用与所找到的每个这样的名称关联的值来打开逻辑单元 NN 以进行有格式的顺序访问。例如，如果程序 myprogram 具有以下调用：
call ioinit ( .true., .false., .false., 'FORT', .false.)
则以下序列：
% setenv FORT01 mydata % setenv FORT12 myresults % myprogram
将导致逻辑单元 1 打开到文件 mydata，并且逻辑单元 12 打开到文件 myresults。两个文件都将被置于其开头。任何有格式的输出都会将列 1 删除并将其解释为回车控制。将忽略输入中的嵌入空白和尾随空白。
IOINIT 活动－如果参数 vrbose 为 .true.，则 ioinit 会报告其活动。
内部标志存储在具有以下定义的有标签 common 块中：
integer*2 ieof, ictl, ibzr common /__ioiflg/ ieof, ictl, ibzr
libfui.a
getarg(3F)、getenv(3F)
prefix 不能超过 30 个字符。与环境名称关联的路径名不能超过 255 个字符。
+ 回车控制不起作用。