GET_COMMAND
— Get the entire command lineCALL GET_COMMAND([COMMAND, LENGTH, STATUS])
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.
|
PROGRAM test_get_command CHARACTER(len=255) :: cmd CALL get_command(cmd) WRITE (*,*) TRIM(cmd) END PROGRAM