Pmt(Message); Shift(Codes) - IBM 5280 Programmer's Manual

Distributed data system, cobol
Hide thumbs Also See for 5280:
Table of Contents

Advertisement

Assume, using the following Data Definition Statements, that INVFILE is
subsequently written to the screen with a STARTING AT LINE value of 5 or
greater, and line 4, column 80 has not been cleared. Although not specified,
the PRTNO field will have column separators.
----+----1----+----2----+----)----+----4----+----5----+----6----+
A
A
R INVFILE
PRTNO
5D
B 01 01
Valid Combinations Of HI, RI, and UL
PMT (message)
SHIFT (codes)
You cannot specify the HI, RI, and UL attributes for the same field, either
explicitly in the same field description statement or in a field description
statement in combination with a record description statement. You can,
however, specify any combination of two of these attributes.
If you wish to cancel the defaults specified in a record description statement,
code the CA (for cancel) attribute in the desired field description statement,
and then code the desired HI, RI, and/or UL attributes.
The PMT (for prompt) keyword allows you to display a prompting message on
line 2 of the screen. The prompt appears when the cursor enters the field.
The prompt is cleared when the cursor leaves the field.
The prompting message is displayed on the second physical display line
starting in position 1 and continues on the following lines depending on length
of the message.
The required parameter, message, can be any message, with a maximum
length of 200 character positions. Any displayable character and spaces are
valid in the message.
The message must be within single quotes ( 'message'). Any single quotes
within the message must be coded twice (' ').
rINote: The prompt message is cleared when the cursor exits the field.
The SHIFT keyword is required in field description statements in which the
letter C is specified for Data Type. This keyword allows you to program the
keyboard conditioning for each position in the field.
The required parameter, codes, is a string of characters, one for each
character position in the field. The following characters are valid:
2- 24
IBM 5280 COBOL Programmer's Guide

Advertisement

Table of Contents
loading

Table of Contents