Pathway/iTS Management Programming Manual

SPI Programming Considerations
NonStop Pathway/iTS Management Programming Manual—426749-002
3-13
Extensible Structured Tokens
Corresponding COBOL level-01 variable for ZPWY-DDL-DEF-PROG:
01 ZPWY-DDL-DEF-PROG.
02 ZERRORABORT PIC X(2).
02 ZOWNER.
03 ZSYSTEMNUMBER NATIVE-2.
03 ZGROUPNUMBER NATIVE-2.
03 ZUSERNUMBER NATIVE-2.
02 ZPRINTERINFO.
03 ZISATTACHED PIC X(2).
03 ZPRINTERFILE.
04 Z-SYSNAME.
05 Z-C PIC X(8).
04 Z-LOCALNAME.
05 Z-DISC.
06 Z-VOLUME.
07 Z-C PIC X(8).
06 Z-SUBVOLUME.
07 Z-C PIC X(8).
06 Z-FILENAME.
07 Z-C PIC X(8).
05 Z-PROCESS REDEFINES Z-DISC.
06 Z-CRTPID.
07 Z-PROCNAME.
08 Z-C PIC X(6).
07 Z-CRT REDEFINES Z-PROCNAME NATIVE-2
Occurs 3 TIMES.
07 Z-PID.
08 Z-CPU PIC X(1).
08 Z-PIN PIC X(1).
07 Z-CPUPIN REDEFINES Z-PID NATIVE-2.
06 Z-QUAL1.
07 Z-C PIC X(8).
06 Z-QUAL2.
07 Z-C PIC X(8).
05 Z-DEVICE REDEFINES Z-DISC.
06 Z-DEVNAME.
07 Z-C PIC X(8).
06 Z-SUBDEVNAME.
07 Z-C PIC X(8).
06 Z-FILLER PIC X(8).
02 ZSECURITY PIC S9(4) COMP.
02 ZTCP.
03 Z-C PIC X(15).
04 FILLER PIC X.
02 FILLER PIC X.
02 ZTMF PIC X(2).