8.118 FTELL — Текущая позиция потока

Описание:

Возвращает текущую позицию в открытом файле.

Этот встроенный элемент предоставляется как в форме подпрограммы, так и в форме функции; однако, только одна форма может использоваться в любом заданном блоке программы.

Стандарт:

Расширение GNU

Класс:

Подпрограмма, функция

Синтаксис:

CALL FTELL(UNIT, OFFSET)

OFFSET = FTELL(UNIT)

Аргументы:

`OFFSET`	Должен быть типа `INTEGER`.
`UNIT`	Должен быть типа `INTEGER`.

Возвращаемое значение:

В любом из синтаксисов, OFFSET устанавливается в текущую позицию блока с номером UNIT, или в -1, если блок в данный момент не открыт.

Пример:

PROGRAM test_ftell
  INTEGER :: i
  OPEN(10, FILE="temp.dat")
  CALL ftell(10,i)
  WRITE(*,*) i
END PROGRAM

См. также:

FSEEK — Подпрограмма низкоуровневого позиционирования файла

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-13.3.0/gfortran/FTELL.html