Pathway/iTS SCREEN COBOL Reference Manual (H06.10+, J06.03+)

Data Division
HP NonStop Pathway/iTS SCREEN COBOL Reference Manual—426750-003
5-97
PW-QUEUE-FKEY-UMP Special Register
You might encounter absent fields when processing messages of delimited format or
messages that contain conditionally present fields. The TCP considers a field to be
absent when:
•
The message specifies that field delimiters are enabled and optionally that
message delimiters are enabled. The TCP finds:
°
Two consecutive delimiters: two field delimiters or a field delimiter followed by
a message delimiter
°
A field delimiter as the last character of the message and the associated field
as the last field of the message
•
The message specifies that a field is conditionally present and the condition is not
met so that the TCP finds the field to be absent.
This register is relevant with any statement that uses the Message Section on inbound
data, such as: RECEIVE UNSOLICITED MESSAGE, SEND MESSAGE,
TRANSFORM. The register contains a YES if one or more fields are absent;
otherwise, the register contains a NO. The register is initialized to NO at program
startup time. Inbound messages containing absent fields can cause the register's
value to change. You can test the register at any place in the program. Testing is
usually most meaningful just after an operation that could cause the register to change.
This is a read-only register. Programs attempting to modify this special register will be
flagged at compilation with the message:
** ERROR 454 ** READ-ONLY SPECIAL REGISTER;
MAY NOT BE ALTERED
The register has the following implicit declaration:
PW-QUEUE-FKEY-UMP Special Register
The PW-QUEUE-FKEY-UMP special register controls the behavior of the
ACCEPT...ESCAPE ON UNSOLICITED MESSAGE statement. This register can be
altered freely throughout the SCREEN COBOL application and is global to all program
units.
The register has the following implicit declaration:
The value of this register is either YES or NO. The default value for the register is
YES.
If the PW-QUEUE-FKEY-UMP special register equals YES and an unsolicited
message arrives during an ACCEPT...ESCAPE ON UNSOLICITED MESSAGE
statement, the keyboard remains unlocked during execution of the unsolicited
message logic. If the operator presses a function key during this time, the function key
01 PW-INPUT-FIELDS-MISSING PIC AAA.
01 PW-QUEUE-FKEY-UMP PIC AAA.