Re: Close MACRO in Z390

2020-05-18 Thread Dave Wade
> -Original Message- > From: IBM Mainframe Assembler List l...@listserv.uga.edu> On Behalf Of Peter Relson > Sent: 18 May 2020 13:21 > To: ASSEMBLER-LIST@LISTSERV.UGA.EDU > Subject: Re: Close MACRO in Z390 > > > This is what happens in Assembler XF if t

Re: Close MACRO in Z390

2020-05-18 Thread Peter Relson
This is what happens in Assembler XF if the () is the result of SETC substitution. In HLASM, this can be duplicated using COMPAT(SYSLIST). z/OS has not supported the use of assembler XF for decades. Peter Relson z/OS Core Technology Design

Re: Close MACRO in Z390

2020-05-17 Thread Jonathan Scott
This is what happens in Assembler XF if the () is the result of SETC substitution. In HLASM, this can be duplicated using COMPAT(SYSLIST). In both of those cases, the () will be taken as a single item which looks like a register without a value, rather than as a list with one null entry. Dave Wa

Re: Close MACRO in Z390

2020-05-17 Thread Dave Wade
I copied the macro to make sure it was the same macro. Dave > -Original Message- > From: IBM Mainframe Assembler List l...@listserv.uga.edu> On Behalf Of Seymour J Metz > Sent: 17 May 2020 02:27 > To: ASSEMBLER-LIST@LISTSERV.UGA.EDU > Subject: Re: Close MACRO in Z3

Re: Close MACRO in Z390

2020-05-16 Thread Seymour J Metz
: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Close MACRO in Z390 Folks, Having a bit of a senior moment. I have some code that assembled fine with IFOX on VM/370R6 but fails on this close CLOSEMAC CLOSE (),MF=L with + MNOTE 12,'*** IHB006 INVALID REGISTER NOTATION WITH MF=L

Re: Close MACRO in Z390

2020-05-16 Thread Seymour J Metz
Wade [dave.g4...@gmail.com] Sent: Saturday, May 16, 2020 7:22 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Close MACRO in Z390 Edward, Thanks, and that fixes it, but looking at the IBM docs they imply that "()" is acceptable! Why does it work in XF! I don't have access to a mo

Re: Close MACRO in Z390

2020-05-16 Thread Dave Wade
--Original Message- > From: IBM Mainframe Assembler List l...@listserv.uga.edu> On Behalf Of Ed Jaffe > Sent: 16 May 2020 21:06 > To: ASSEMBLER-LIST@LISTSERV.UGA.EDU > Subject: Re: Close MACRO in Z390 > > On 5/16/2020 12:30 PM, Dave Wade wrote: > > CLOSEMAC C

Re: Close MACRO in Z390

2020-05-16 Thread Charles Mills
Yer welcome. Charles -Original Message- From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of Dave Wade Sent: Saturday, May 16, 2020 2:01 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Close MACRO in Z390 Paul Well (,) also works... Dave P.S

Re: Close MACRO in Z390

2020-05-16 Thread Dave Wade
Paul Well (,) also works... Dave P.S. how can such simple code cause such issues... > -Original Message- > From: IBM Mainframe Assembler List l...@listserv.uga.edu> On Behalf Of Paul Gilmartin > Sent: 16 May 2020 21:48 > To: ASSEMBLER-LIST@LISTSERV.UGA.EDU > Subject:

Re: Close MACRO in Z390

2020-05-16 Thread Paul Gilmartin
On 2020-05-16, at 14:20:04, Charles Mills wrote: > > *Should* work. Open an RCF if you feel inclined. > For z390? > [label] CLOSE ([dcb address,],[option],...) > [,TYPE=T] > [,MF=L > [,MODE=24|31] > > That shows the "stuff" inside the parentheses as optional. Well, I guess not > the comma. If

Re: Close MACRO in Z390

2020-05-16 Thread Charles Mills
ect: Close MACRO in Z390 Folks, Having a bit of a senior moment. I have some code that assembled fine with IFOX on VM/370R6 but fails on this close CLOSEMAC CLOSE (),MF=L with + MNOTE 12,'*** IHB006 INVALID REGISTER NOTATION WITH MF=L FORM.' On Z390. I wo

Re: Close MACRO in Z390

2020-05-16 Thread Ed Jaffe
On 5/16/2020 12:30 PM, Dave Wade wrote: CLOSEMAC CLOSE (),MF=L I would code it this way: CLOSEMAC CLOSE (*-*),MF=L -- Phoenix Software International Edward E. Jaffe 831 Parkview Drive North El Segundo, CA 90245 https://www.phoenixsoftware.com/

Close MACRO in Z390

2020-05-16 Thread Dave Wade
Folks, Having a bit of a senior moment. I have some code that assembled fine with IFOX on VM/370R6 but fails on this close CLOSEMAC CLOSE (),MF=L with + MNOTE 12,'*** IHB006 INVALID REGISTER NOTATION WITH MF=L FORM.' On Z390. I wonder if I am missing an option to A