MACRO 00005000
&NAME VMBLK &VMRSTAT=0,&VMSIZE=0,&VMOSTAT=0,&VMPSTAT=0, X00006000
&VMMLEVL=0,&VMCLEVL=0,&VMUSER=,&VMACNT=,&VMNEXT= 00007000
.* THIS MACRO GENERATES A VMBLOK 00008000
&NAME DS 0D 00009000
DC A(0),A(0) VMQFPNT, VMQBPNT 00010500
AIF (T'&VMNEXT EQ 'O').VM5 00012000
DC A(&VMNEXT) VMPNT 00013000
AGO .VM6 00014000
.VM5 ANOP 00015000
DC A(&NAME) VMPNT 00016000
.VM6 ANOP 00017000
DC A(0),A(0) VMECEXT, VMSEG 00018100
DC XL4'&VMSIZE' VMSIZE 00019100
DC A(0),A(0) VMCHSTRT, VMCUSTRT 00020100
DC A(0),A(0) VMDVSTRT, VMTERM 00021100
DC XL2'FFFF',H'0' VMVTERM, VMTRMID 00022100
DC C'#ยข@"' VMTLEND, VMTLDEL, VMTCDEL, VMTESCP 00023100
DC 2H'0',2H'0' VMCHCNT, VMCUCNT, VMDVCNT, VMIOACTV 00024100
DC 16X'FFFF' VMCHTBL 00025100
DC AL1(&VMRSTAT) VMRSTAT 00026100
DC X'00' VMDSTAT 00027100
DC AL1(&VMOSTAT) VMOSTAT 00028100
DC X'00' VMQSTAT 00029100
DC AL1(&VMPSTAT) VMPSTAT 00030100
DC X'00',X'00' VMESTAT, VMTRCTL 00031100
DC AL1(&VMMLEVL) VMMLEVEL 00032100
DC X'00' VMQLEVEL 00033100
DC AL1(&VMCLEVL) VMCLEVEL 00034100
DC X'00',X'00' VMTLEVEL, VMPEND 00035100
DC 2H'0',2H'0' VMSLOCK, VMLLOCK, VMEXTINT, VMIOINT 00036100
DC X'FFFFFF00' VMTIMER 00037100
DC D'0' VMVTIME 00038100
DC X'7FFFFFFFFFFFF000' VMTMOUTQ 00039100
DC X'7FFFFFFFFFFFF000' VMTTIME 00040100
DC X'7FFFFFFFFFFFF000' VMTMINQ 00041100
DC D'0' VMTODINQ 00042100
DC XL6'00',2X'00' VMINST, VMUPRIOR, VMPSWDCT 00043100
DC A(0),A(0) VMTREXT, VMADSTOP 00044100
DC X'00020000',A(0) VMPSW 00045100
DC 16F'0' VMGPRS 00046100
DC 4D'0' VMFPRS 00047100
DC CL8'&VMUSER ' VMUSER 00048100
DC CL8'&VMACNT ' VMACNT 00049100
DC CL8' ' VMDIST 00050100
DC F'0',F'0' VMPGREAD, VMPGWRIT 00051100
DC 2H'0',A(0) VMWCNT, VMSEGDSP, VMSHRSYS 00052100
DC F'0',F'0' VMIOCNT, VMPNCH 00053100
DC F'0',F'0' VMLINS, VMCRDS 00054100
DC CL8' ' VMCOMND 00055100
DC 2H'0',2H'0' VMPDRUM, VMPDISK, VMPAGES, VMPRGIL 00056100
DC 2H'0',2H'0' VMDEDCH, VMQPRIOR, VMWSPROJ, VMSTEALS 00057100
DC F'0',F'0' VMTIMEON, VMTRQBLK 00058100
DC F'0',F'0' VMACOUNT, VMRDINQ 00059100
DC F'0',F'0' VMPGRINQ, VMEPRIOR 00060100
DC F'0',F'0' VMSTKO, VMMICRO 00061100
DC F'0',F'0' VMPFUNC, VMPXINT 00062100
DC F'0',F'0' VMDELAY, VMRPRIOR 00063150
DC F'0',2H'0' VMPGPNT, VMNDCNT, VMSHRSYS 00063200
DC 4X'00' VMRBSC,VMCXSTAT,VMAFF,VMLSTPRC @V4075A0 00063260
DC F'0' VMASSIST @V4075A0 00063275
DC F'0',F'0' VMRSVW1, VMRSVW2 00063300
DC F'0',F'0' VMLOCK,VMDFTPNT @V4075A0 00063360
DC H'12810' VMMORETM BEEP|CLEAR 50|10 HRC101DK 00066290
DC H'0' VMUSERH1 HRC101DK 00066480
DC F'0' VMUSER2 HRC101DK 00066670
DC F'0',F'0' VMUSER3, VMUSER4 00067100
DC F'0',F'0' VMUHS, VMPCKP @V408246 00068110
DC H'0',X'0',X'0' VMXPG, VMQ2CNT, VMQ3CNT @V408246 00069110
DC 2H'0' VMSTKCNT,VMPRRCT @V4075A0 00070115
DC A(0),X'0',X'0' VMSWPMIG, VMFVRF, VMCRTO @V408246 00071110
DC XL1'00' RESERVED @V60A6B6 00072110
DC X'6A' VMGRFTAB @V60A6B6 00072610
DC D'0' VMCPTIME @V4M0203 00073110
DC D'0' VMAPTIME @V4M0203 00074110
DC XL2'00' VMACTDEV @V5M0106 00075010
DC H'0' VMFLPAG 00076000
DC XL1'00' VMSPMFLG -SET TO OFF 00077000
DC XL1'00' RESERVED 00078000
DC H'0' VMCONLN - BYTES LEFT IN RESPONSE BUFFER 00079000
DC F'0' VMCONBUF - ADDRESS OF RESPONSE BUFFER 00080000
DC X'00' VMPSWDCA INV. 'AUTOLOG' PW COUNT @V60BBBB 00081000
DC X'00' RESERVED 00082000
DC H'0' RESERVED 00083000
SPACE 3 00105000
MEND 00106000