*COPY NCPTBL 00001000
PUSH PRINT 00001200
AIF ('&SYSPARM' NE 'SUP').NCP01 00001400
PRINT OFF,NOGEN 00001600
.NCP01 ANOP 00001800
NCPTBL DSECT 00002000
SPACE 00003000
*** NCPTBL - NAMED 370X CONTROL PROGRAM TABLE 00004000
* 00005000
* 0 +-----------------------+-----------------------+ 00006000
* | NCPPNT | NCPSIZE | 00007000
* 8 +-----------------------+-----------------------+ 00008000
* | NCPNAME | 00009000
* 10 +-----------------------------------+-----+-----+ 00010000
* | NCPVOL | N*1 | N*2 | 00011000
* 18 +-----------------------+-----------+-----+-----+ 00012000
* | NCPSTART | NCPPAGCT | 00013000
* 20 +-----------------------+-----------------------+ 00014000
* 00015000
*** NCPTBL - NAMED 370X CONTROL PROGRAM TABLE 00016000
SPACE 1 00017000
NCPPNT DS 1F CHAIN POINTER TO NEXT ENTRY 00018000
NCPSIZE DS 1F 370X STORAGE SIZE REQUIRED FOR LOAD 00019000
NCPNAME DS CL8 CONTROL PROGRAM REFERENCE NAME 00020000
NCPVOL DS CL6 VOLID OF DASD CONTAINING SAVED IMAGE 00021000
NCPFLAG DS 1X N*1 CPTYPE FLAG BYTE 00022000
NCPRSV1 DS 1X N*2 RESERVED FOR FUTURE USE 00023000
NCPSTART DS 1F CCPD OF FIRST PAGE ON NCPVOL 00024000
NCPPAGCT DS 1F TOTAL NUMBER OF PAGES SAVED 00025000
SPACE 00026000
* BITS DEFINED IN NCPFLAG: 00027000
NCPTNCP EQU X'01' NETWORK CONTROL PROGRAM 00028000
NCPTCEP EQU X'02' 270X EMULATION CONTROL PROGRAM 00029000
NCPTPEP EQU X'03' PARTITIONED EMULATOR PROGRAM 00030000
EJECT 00031000
POP PRINT 00032000
SPACE 00033000