Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference
A newer version of this document is available. Customers should click here to go to the newest version.
Visible to Intel only — GUID: GUID-F2EFC857-8424-4543-9E85-B3CD2B68B2C8
Visible to Intel only — GUID: GUID-F2EFC857-8424-4543-9E85-B3CD2B68B2C8
GETSTRQQ
Runtime Function: Reads a character string from the keyboard using buffered input.
Module
USE IFCORE
result = GETSTRQQ (buffer)
buffer |
(Output) Character*(*). Character string returned from keyboard, padded on the right with blanks. |
Results
The result type is INTEGER(4). The result is the number of characters placed in buffer.
The function does not complete until you press Return or Enter.
Example
! Program to demonstrate GETSTRQQ USE IFCORE USE IFPORT INTEGER(4) length, result CHARACTER(80) prog, args WRITE (*, '(A, \)') ' Enter program to run: ' length = GETSTRQQ (prog) WRITE (*, '(A, \)') ' Enter arguments: ' length = GETSTRQQ (args) result = RUNQQ (prog, args) IF (result .EQ. -1) THEN WRITE (*,*) 'Couldn''t run program' ELSE WRITE (*, '(A, Z4, A)') 'Return code : ', result, 'h' END IF END