JCL PQ-RESELECT

Man Page Index

Executed from a jCL program, resets the pointer of a specified select register to the beginning of the list of record keys.

SYNTAX

PQ-RESELECT register-number

SYNTAX ELEMENTS

register-number is the number (1 to 5) of the select register to be reset.

NOTES

This command is executed from the primary output buffer to reset the pointer of a specified select register back to the beginning of the list.

Each time you use the "!" reference to retrieve a value from the list, the value is not destroyed. The pointer is simply advanced to the next parameter in the list. PQ-RESELECT resets the pointer back to the beginning of the list so that you can perform another pass.

You cannot execute PQ-RESELECT directly from the shell.

EXAMPLE

HSELECT SALES
STON
HPQ-SELECT 1
PH
MV %1 !1
IF # %1 XNo records selected
HPQ-RESELECT 1
PH
10 MV %1 !1
IF # %1 XFinished
...
GO 10

JCL