JCL PQ-SELECT JCL PQ-SELECTExecuted from a jCL program, loads a list of keys into a select register.
PQ-SELECT register-number
register number is the number of the select register (1 to 5) in which the keys are to be placed.
To use PQ-SELECT you must first construct a list by using one of the list processing commands such as SELECT, SSELECT, QSELECT, BSELECT, GET-LIST, FORM-LIST, SEARCH or ESEARCH. Put the PQ-SELECT command in the stack so that it will be processed as part of the external job stream when the required list is active.
Retrieve the list elements one at a time, using a "!n" direct or an indirect reference.
You cannot execute PQ-SELECT directly from the shell.
001 PQN
002 HSSELECT SALES
003 STON
004 HPQ-SELECT 1
005 P
006 10 MV %1 !1
007 IF # %1 X Done
008 T %1
009 GO 10
This example selects all the records in the SALES file, loads the record-list into select register 1 and displays the keys one at a time.
JCL