8.127 GET_COMMAND — Get the entire command line

Synopsis:

CALL GET_COMMAND([COMMAND, LENGTH, STATUS])

Description:

Retrieve the entire command line that was used to invoke the program.

Class:

Subroutine

Arguments:
COMMAND(Optional) shall be of type CHARACTER and of default kind.
LENGTH(Optional) Shall be of type INTEGER and of default kind.
STATUS(Optional) Shall be of type INTEGER and of default kind.
Return value:

If COMMAND is present, stores the entire command line that was used to invoke the program in COMMAND. If LENGTH is present, it is assigned the length of the command line. If STATUS is present, it is assigned 0 upon success of the command, -1 if COMMAND is too short to store the command line, or a positive value in case of an error.

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

Fortran 2003 and later

See also:

GET_COMMAND_ARGUMENT — Get command line arguments,
COMMAND_ARGUMENT_COUNT — Get number of command line arguments