We specify a register on ETEADR= and it works fine. The SYNTAX portion of the documentation says you can use registers (1) - (15), however in the PARAMETERS section, there's no mention of registers.
Robert Ngan CSC Financial Services Group IBM Mainframe Assembler List <[email protected]> wrote on 2014/07/30 08:31:58: > From: "[email protected]" <[email protected]> > To: [email protected] > Date: 2014/07/30 08:33 > Subject: MACRO Usage > Sent by: IBM Mainframe Assembler List <[email protected]> > > I needed to use a register to specify the ETEADDR specification in a > ETDEF TYPE=SET,ETEADR=(3) macro. > . > . > I did not see any documentation explicitly stating that a Register > can be used as a valid parameter for ETEADR=. I have been successful > in specifying a register in the macro, but have not tested it yet. > . > . > The expnsion looks like this: > * > ETDEF TYPE=SET,ETEADR=(3),ROUTINE=(2),RAMODE=31, > STATE=SUPERVISOR,PC=STACKING,SSWITCH=YES, > SASN=OLD,ASCMODE=PRIMARY, > EK=8,PKM=OR, > AKM=(8,9),EKM=(8) > +* MACDATE 06/25/92 > + MVI 1(3),192 FLAG BYTE > + MVC 4(4,3),=F'0' ZEROS > + ST 2,8(,3) ROUTINE ADDRESS > + OI 8(3),X'80' AMODE QUALIFIER > + MVC 12(2,3),=AL2(192) AKM > + MVC 14(2,3),=AL2(128) EKM > + MVC 16(4,3),=A(0) PARAMETER 1 > + MVI 20(3),144 ETD OPTION BYTE 1 > + MVI 21(3),8*16 ENTRY KEY (HIGH 4 > + MVC 22(2,3),=AL2(0) EAX > + MVC 24(4,3),=F'0' ZEROS > + MVC 28(4,3),=A(0) ASSOC RECOVERY RTN ADDR > + MVC 32(4,3),=A(0) PARAMETER 2 > + MVI 36(3),0 LPA FLAG BYTE 1 @L2A > + > > So my question is, can a Register be used in the ETEADR= parameter > for ETDEF TYPE=SET. > . > . > Paul D'Angelo
