|
|
NM and CM callable.
Prints a character string on the system console and solicits a reply.
Syntax
I16 CA I16V I16V CA I16V
length := PRINTOPREPLY (message, length, zero, reply, maxlength);
Functional Return
- length
16-bit signed integer (assigned functional return)
Passes the length of the reply from the system operator. This length
represents a half word count if maxlength is positive or
a byte count if maxlength is negative.
If maxlength is zero, then this intrinsic does not
solicit a reply.
If an error occurs, the value returned is zero.
The length parameter can be zero, in which case only the
standard message prefix is written on the system console . If both
length and maxlength are zero, then CCL
(1) is returned.
Parameters
- message
character array (required)
Passes the characters that are output to the system console. The
character string is limited to 50 characters, additional characters are
ignored.
- length
16-bit signed integer by value (required)
The length of the output string to be transmitted. If
length is positive, the length is in half words; if
negative, the length is in bytes. Do not specify a length of >50
bytes.
- zero
16-bit signed integer by value (required)
Do not specify this parameter, but maintain parameter position with a
value of 0.
- reply
character array (required)
Returns the input characters read from the system console.
- maxlength
16-bit signed integer by value (required)
The maximum length of the message to be read into the
reply parameter. If the expected length
is positive, it specifies a half word count; if negative, it specifies a
byte count. Do not specify a length of >31 bytes.
Condition Codes
- CCE (2)
Request granted.
- CCG (0)
Not returned.
- CCL (1)
Request denied. A physical I/O error occurred. Further error analysis
through the FCHECK intrinsic is not possible.
Related Information
- Manual
Accessing Files Programmer's Guide
|