FORTRAN Reference Manual

Utility Routines

FORTRAN Reference Manual—528615-001

15-43

GETSTARTUPTEXT Routine

•

PARAM message length

The maximum size of the PARAM message is 1028 bytes, but a character variable

in FORTRAN cannot have more than 255 characters. If the PARAM message is

more than 255 characters, you can declare text as a RECORD, as shown in the

following example:

RECORD text

INTEGER*2 msgcode, numparams

RECORD param (0: 1023)

CHARACTER*1 byte

END RECORD

If the FORTRAN program allocates a text variable or RECORD that is smaller than

the PARAM message read, the PARAM message is truncated. If the program

allocates a text larger than the PARAM message, trailing blanks are provided.

Example

?GUARDIAN GETPARAMTEXT

INTEGER error

CHARACTER * 20 string, oldparam

READ (*,*) string

error = GETPARAMTEXT (string, oldparam)

GETSTARTUPTEXT Routine

The GETSTARTUPTEXT routine obtains a specified part of the startup message as

text and assigns it to a string variable. The assignment is done according to the

FORTRAN rules for CHARACTER assignment.

result

is an integer variable in which GETSTARTUPTEXT returns the result of the

operation. See Considerations on page 15-44.

portion

is a character expression with a value of 'VOLUME', 'IN', 'OUT', or 'STRING' that

identifies the particular part of the message to retrieve.

The first unused character position of portion, if any, must be a blank. Any

characters including and following a blank are ignored.

result = GETSTARTUPTEXT ( portion , text )