You want to add a new 100‑byte record to a temporary storage queue called TEMPSTO1, which resides in auxiliary storage. This record is to be the last record in the queue.
Specify the following, and then press Enter:
FUNC=ADDN RCID=C'TEMPSTO1' SIZE= 100 or 64 (for FORMAT=D)
Make changes to the work area.
Specify the following, and then press Enter:
FUNC=PUTQ RCID=C'TEMPSTO1'
To replace record 5 in a temporary storage queue named TEMPSTO2, which resides in main storage, using the work area from Example 1:
Specify the following, and then press Enter:
FUNC=ADDU
Make changes to the work area.
Specify the following, and then press Enter:
FUNC=PUTQ ENTRY=05 RCID=C'TEMPSTO2' SUBFUNC=REPL SIZE= 100 or 64 (for FORMAT=D) STORFAC=MAIN
|
Copyright © 2014 CA Technologies.
All rights reserved.
|
|