*COPY CCPARM 00001000 PUSH PRINT 00001200 AIF ('&SYSPARM' NE 'SUP').CCP01 00001400 PRINT OFF,NOGEN 00001600 .CCP01 ANOP 00001800 CCPARM DSECT 00002000 SPACE 00003000 *** CCPARM - COMMUNICATION PARAMETER LIST 00004000 * 00005000 * 0 +-----------------------------------------------+ 00006000 * | CCPNAME | 00007000 * 8 +-----------------------+-----------------------+ 00008000 * | CCPADDR | CCPSIZE | 00009000 * 10 +-----------------------+-----------------------+ 00010000 * | CCPPSIZE | CCPENTRY | 00011000 * 18 +-----+-----+-----+-----+-----------------------+ 00012000 * | C*1 | C*2 | C*3 | C*4 | CCPSTOR | 00013000 * 20 +-----+-----+-----+-----+-----+-----+-----------+ 00014000 * | CCPHBFSZ | CCPHBFNO | C*5 | C*6 | CCPMAXID | 00015000 * 28 +-----------+-----------+-----+-----+-----------+ 00016000 * | | 00017000 * = CCPRESID = 00018000 * | | 00019000 * +-----------------------------------------------+ 00020000 * 00021000 *** CCPARM - COMMUNICATION PARAMETER LIST 00022000 SPACE 00023000 CCPNAME DS CL8 NCPNAME SPECIFIED IN NAMECP MACRO 00024000 CCPADDR DS 1F ORIGIN OF CONTROL PROGRAM IMAGE 00025000 CCPSIZE DS 1F CONTROL PROGRAM SIZE IN BYTES 00026000 CCPPSIZE DS 1F PARAMETER LIST SIZE IN BYTES 00027000 CCPENTRY DS 1F CONTROL PROGRAM ENTRY POINT ADDR. 00028000 CCPTYPE DS 1X C*1 CONTROL PROGRAM TYPE FLAG 00029000 CCPCAONE DS 1X C*2 FIRST CHANNEL ADAPTER TYPE FLAG 00030000 CCPCATWO DS 1X C*3 SECOND CHANNEL ADAPTER TYPE FLAG 00031000 CCPRSV1 DS 1X C*4 RESERVED 00032000 CCPSTOR DS 1F 370X STORAGE SIZE SPECIFIED (BYTES) 00033000 CCPHBFSZ DS 1H BUFFER SIZE FROM 'HOST' MACRO 00034000 CCPHBFNO DS 1H NUMBER OF BUFFERS IN READ LIST 00035000 CCPPAD0 DS 1X C*5 FIRST BUFFER PAD COUNT (BYTES) 00036000 CCPPAD1 DS 1X C*6 SUBSEQUENT BUFFER PAD COUNT 00037000 CCPMAXID DS 1H HIGHEST RESOURCE I.D. DEFINED 00038000 CCPRESID DS 1F RESOURCE I.D. DESCRIPTION 00039000 SPACE 00040000 ORG CCPRESID DEFINITION BREAK-DOWN 00041000 CCPRSTYP DS 1X RESOURCE TYPE FLAG 00042000 CCPRSTAT DS 1X RESOURCE INITIAL STATUS FLAGS 00043000 CCPRSTEP DS 1H SUBCHANNEL ADDRESS WHEN IN EP-MODE 00044000 SPACE 00045000 * BITS DEFINED IN CCPTYPE: 00046000 CCPTNCP EQU X'01' NETWORK CONTROL PROGRAM 00047000 CCPTEP EQU X'02' 270X EMULATION PROGRAM 00048000 CCPTPEP EQU X'03' PARTITIONED EMULATION PROGRAM 00049000 CCPTEP4 EQU X'0A' 270X EMULATION PRGM FOR CA4 00049500 EJECT 00050000 * BITS DEFINED IN CCPCAONE AND CCPCATWO: 00051000 CCPTYPE1 EQU X'01' CHANNEL ADAPTER TYPE ONE 00052000 CCPTYPE2 EQU X'02' CHANNEL ADAPTER TYPE TWO 00053000 SPACE 00054000 * HOST VALUES REQUIRED BY VM/370 SUPPORT FOR 3704/3705: 00055000 CCPVPAD0 EQU 34 34-BYTE PAD IN FIRST BTU BUFFER 00056000 CCPVPAD1 EQU 34 34-BYTE PAD IN SUBSEQUENT BUFFERS 00057000 EJECT 00058000 POP PRINT 00059000 SPACE 00060000