MACRO 00001000
CMSCVT &SECT 00002000
PUSH PRINT 00002100
AIF ('&SYSPARM' NE 'SUP').ACC01 00002200
PRINT OFF,NOGEN 00002300
.ACC01 ANOP 00002400
AIF ('&SECT' EQ 'CSECT').CSECT 00003000
CVTSECT DSECT 00004000
AGO .CONT 00005000
.CSECT ANOP 00006000
CVTSECT DS 0D 00007000
ENTRY CMSCVT 00008000
.CONT ANOP 00009000
* 00010000
*** COMMUNICATION VECTOR TABLE AS SUPPORTED BY CMS 00011000
* 00012000
SPACE 00013000
DC H'0' - RESERVED 00014000
CVTMDL DC H'0' - CPU MODEL ID 00015000
DC CL4'C5.0' CMS RELEASE NUMBER @VA08400 00016100
CMSCVT DS 0D - CVT START 00017000
DC 14F'-1' - NOT SUPPORTED 00018000
CVTDATE DC PL4'0' - CURRENT DATE IN PACKED DECIMAL 00019000
DC 3F'-1' - NOT SUPPORTED 00020000
DC A(0) - NOT SUPPORTED 00021000
DC F'-1' - NOT SUPPORTED 00022000
CVTEXIT DC XL2'0A03' - AN SVC 3 INSTRUCTION (EXIT) 00023000
CVTBRET DC XL2'07FE' - A BCR 15,14 INSTRUCTION 00024000
DC 8F'-1' - NOT SUPPORTED 00025000
CVTDCB DC XL1'40' - SYSTEM CONFIGURATION = PCP 00026000
DC FL3'-1' - NOT SUPPPRTED 00027000
CVTR13 DC F'0' - R13 SAVED DURING 'OPEN' 00028000
DC F'-1' - NOT SUPPORTED 00029000
CVTNUCB DC A(0) - LOWEST STORAGE ADDRESS NOT IN NUCLEUS 00030000
DC 8F'-1' - NOT SUPPORTED 00031000
CVTMZ00 DC A(0) - HIGHEST STORAGE ADDRESS IN MACHINE 00032000
DC 3F'-1' - NOT SUPPORTED 00033000
DC XL2'00' - NOT SUPPORTED 00034000
CVTOPTA DC XL2'00' - BIT 7 - EXT-PREC FP HRDWRE IN CPU 00035000
DC 2F'-1' - NOT SUPPORTED 00036000
DC 3A(0) - NOT SUPPORTED 00037000
CVTUSER DC F'0' - FIELD AVAILABLE TO USER 00038000
DC 12F'-1' - NOT SUPPORTED 00039000
CVTAVIB DC V(DMSVIB) ADDR OF VSAM INTFC BOOTSTRAP 00039100
EJECT 00040000
POP PRINT 00040100
MEND 00041000