FORTRAN Reference Manual

Utility Routines
FORTRAN Reference Manual—528615-001
15-48
PUTPARAMTEXT Routine
Considerations
Results returned by PUTASSIGNVALUE
Example
?GUARDIAN PUTASSIGNVALUE
INTEGER error, new value
READ (*,*) new value
error = PUTASSIGNVALUE ('SECEXT', new value , 0, 3)
PUTPARAMTEXT Routine
The PUTPARAMTEXT routine creates or replaces a specified part of the PARAM
message with text obtained from a string variable.
result
is an integer variable in which PUTPARAMTEXT returns the result of the operation.
See Considerations on page 15-49.
portion
is a character expression that identifies the particular part of the message to
replace. The string value must be a legal parameter name for the PARAM
Return Value Meaning
0 value is assigned as the new value of the requested message
portion.
-1 Indicates a failure due to a logic error. The message is unchanged.
Possible logic errors are:
•
The portion value is not correct or does not identify a defined
integer part of the ASSIGN message.
•
The integer value supplied is not acceptable for the specified part
of the ASSIGN message.
•
The messagenumber is not a positive integer.
•
The specified message does not exist. A non-existent message
must be created by the PUTASSIGNTEXT routine.
•
The contents of cplist are inconsistent.
-2 Insufficient checkpoint list space to complete the operation. The
message is unchanged.
-3 Insufficient message storage space to complete the operation. The
message is unchanged.
result = PUTPARAMTEXT ( portion , text , cplist )