9.113 GET_COMMAND — Получение всей командной строки

Описание:

Получение всей командной строки, которая использовалась для вызова программы.

Стандарт:

Fortran 2003 и более поздние версии

Класс:

Подпрограмма

Синтаксис:

CALL GET_COMMAND([COMMAND, LENGTH, STATUS])

Аргументы:

COMMAND	(Необязательно) должен быть типа CHARACTER и стандартного размера.
LENGTH	(Необязательно) должен быть типа INTEGER и стандартного размера.
STATUS	(Необязательно) должен быть типа INTEGER и стандартного размера.

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

Если COMMAND присутствует, в COMMAND сохраняется вся командная строка, которая использовалась для вызова программы. Если LENGTH присутствует, ему присваивается длина командной строки. Если STATUS присутствует, ему присваивается значение 0 при успешном выполнении команды, -1, если COMMAND слишком короткий для хранения командной строки, или положительное значение в случае ошибки.

Пример:

PROGRAM test_get_command
  CHARACTER(len=255) :: cmd
  CALL get_command(cmd)
  WRITE (*,*) TRIM(cmd)
END PROGRAM

См. также:

GET_COMMAND_ARGUMENT, COMMAND_ARGUMENT_COUNT