Pathway/iTS SCREEN COBOL Reference Manual (G06.24+, H06.03+, Pathway/iTS 1.0+)

Data Division
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001
5-96
PW-QUEUE-FKEY-TIMEOUT Special Register
unsolicited message logic. The keyboard is unlocked at the next ACCEPT statement.
This action prevents 6530 terminals from internally queuing a function key that the
operator presses between the start of execution of the unsolicited message logic and the
next ACCEPT statement.
PW-QUEUE-FKEY-TIMEOUT Special Register
The PW-QUEUE-FKEY-TIMEOUT special register controls the behavior of the
ACCEPT...ESCAPE ON TIMEOUT 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-TIMEOUT special register equals YES and a timeout occurs
on an ACCEPT...ESCAPE ON TIMEOUT statement, the keyboard remains unlocked
during execution of the timeout logic. If the operator presses a function key during this
time, the function key value is internally queued in the 6530 terminal. The key value is
read upon execution of the next ACCEPT statement.
If the PW-QUEUE-FKEY-TIMEOUT special register equals NO and a timeout occurs
on an ACCEPT...ESCAPE ON TIMEOUT statement, the TCP issues a command to the
terminal to lock the keyboard before executing the timeout logic. The keyboard is
unlocked at the next ACCEPT statement. This action prevents 6530 terminals from
internally queuing a function key that the operator presses between the start of execution
of the timeout logic and the next ACCEPT statement.
PW-TCP-PROCESS-NAME and PW-TCP-SYSTEM-NAME Special
Registers
The PW-TCP-PROCESS-NAME and PW-TCP-SYSTEM-NAME special registers
contain the TCP Guardian process name and the host system name, respectively.
The SCREEN COBOL program uses these registers, in conjunction with the
TERMINAL-FILENAME special register, to identify itself to another Guardian process.
The Guardian process must be a member of an active Pathway server class.
The SCREEN COBOL program can identify itself to the Guardian process by sending
the TCP process-name and system-name, and the SCREEN COBOL program name.
The Guardian process can then use the values in an UMP header and communicate with
the identified SCREEN COBOL program.
Programs attempting to modify either of these special registers will be flagged at
compilation with the message:
** ERROR 454 ** READ-ONLY SPECIAL REGISTER;
MAY NOT BE ALTERED
01 PW-QUEUE-FKEY-TIMEOUT PIC AAA.