FORTRAN Reference Manual

Utility Routines

FORTRAN Reference Manual—528615-001

15-45

PUTASSIGNTEXT Routine

The PUTASSIGNTEXT routine creates or replaces a specified text part of an ASSIGN

message with text obtained from a string variable.

result

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

operation. See Considerations.

portion

is a character expression with a value of 'LOGICALNAME' or 'TANDEMNAME' that

identifies the particular part of the message to replace. The first unused character

position of portion, if any, must be a blank. Any characters including and

following a blank are ignored.

text

is a character data item containing the replacement text for the ASSIGN message.

See Considerations.

cplist

is a checkpoint list in which PUTASSIGNTEXT records the changes to the

message storage data space. PUTASSIGNTEXT uses a maximum of six elements

in cplist. For additional detail, see the Checkpoint Considerations for Saved

Message Utility Routines on page 15-28.

messagenumber

is an integer expression that specifies the ASSIGN message into which the new

text is placed. messagenumber must be a positive integer.

Considerations

•

Results returned by PUTASSIGNTEXT

PUTASSIGNTEXT returns an integer value that indicates the result of the

operation. If the specified ASSIGN message does not exist, PUTASSIGNTEXT

attempts to create one containing the supplied portion for text and default values

for all other message parts. PUTASSIGNTEXT returns -1, -2, or -3 if the operation

fails.

result = PUTASSIGNTEXT( portion, text, cplist, messagenumber)