iTS 1.0+)

Procedure Division

Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001

6-59

RECEIVE UNSOLICITED MESSAGE Statement

I/O Performed by the PRINT SCREEN Statement

The PRINT SCREEN I/O sequence begins with a top-of-form operation. Each screen

line is written in a separate record; trailing blanks and trailing null values are

suppressed. Printing starts with the line at the top of the screen and proceeds through

the line at the bottom of the screen.

Diagnostic Screens

A diagnostic screen, which is described in Appendix A, Advisory Messages, can be

displayed when an error occurs during a PRINT SCREEN sequence. An example of the

default diagnostic screen is:

IBM3270 Attached Printers

To permit a screen on an IBM3270 terminal to be printed, an input field must be

declared starting at screen position 1,2. If a protected field is in this position, the screen

is locked for screen copy operations and a PRINTER I/O ERROR (179) occurs.

The destination device of a PRINT SCREEN operation must have a device type of 10

and must use the CRT protocol of the AM3270 access method. Refer to the Device-

Specific Access Methods—AM3270/TR3271 manual for additional information.

RECEIVE UNSOLICITED MESSAGE Statement

The RECEIVE UNSOLICITED MESSAGE statement reads an unsolicited message into

Working-Storage. The message is either read directly into Working-Storage or is

mapped through the Message Section.

PATHWAY ERROR REPORT: 04MAY92,12:42

TERMINAL: TERM-1

PRINTER REQUIRES ATTENTION

PRINTER: $LP

PRESS F1 TO RETRY, F2 TO ABORT

RECEIVE UNSOLICITED [ MESSAGE ]

[ CODE FIELD [ IS ] code-field ]

{ YIELDS rcv-message }

{ }

{ { CODE rcv-code [,rcv-code ]... YIELDS rcv-message }... }

[ TIMEOUT timeout-value ]

[ ON ERROR imperative-stmt ]