11.1 qprint/zqprint—(Obsolete) Print a message to the terminal

call qprint(message, nbytes) 
zqprint(message, nbytes) 

Obsolete. Use x/zvmessage. qprint/zqprint will print a message to the standard output, with some carriage control. If the program is run interactively, then the output will appear on the user terminal, and any session logs which are active. Otherwise, it will appear in the job log.
For new VICAR software, x/zvmessage is to be preferred to qprint/zqprint because it uses a standard message format, allowing the user to build help for error messages, and it works both with and without the VICAR supervisor. QPRINT will function only within the VICAR supervisor.
qprint/zqprint uses the first character in the MESSAGE buffer for FORTRAN-style carriage control. Read the description of the MESSAGE argument carefully to understand how this first character is used.
qprint/zqprint calls the subroutine PRINT with editing turned on, so that non-printable characters are replaced with the character “|”.

Arguments:

• MESSAGE: input, string, maximum length 132
  MESSAGE contains the message to be given to the user. It may be passed by descriptor ( FORTRAN character type) or reference (C char array). If the string is passed by descriptor or is a NULL terminated C-type string, the NBYTES argument is optional.
  The first character in MESSAGE is used to perform a limited FORTRAN style carriage control, controlling output as follows. If the leading character is a
  • 0, then a blank line is generated before the message is printed.
  • 1, then a form-feed is generated if the job is not interactive, and a blank line is inserted if the job is interactive.
  • blank, then normal output starts on the next line.

If the leading character is one of the three above, then after the carriage control is performed, printing starts with the second character of the buffer. Otherwise, printing starts with the first character of the buffer.

• NBYTES: input, integer
  NBYTES is the number of bytes to be printed. If MESSAGE is of type CHARACTER, then the smaller of the NBYTES and the declared length of the string is used. Likewise, if a NULL ( binary 0) character is encountered before NBYTES characters are printed, printing terminates at the NULL.
  If the string is not NULL terminated or a FORTRAN CHARACTER type, then NBYTES is required.