The scheme you are using for handling a positional parameter that
is/may be a list.  A  list parameter is not, however, a string that
needs to be parsed.

The HLASM itself does this job for you.  An example is

|          macro
|          LISTGET   &list=
|&nle   seta           n'&list
|&i       seta           0
|.list_loop anop
|&i       seta           &i+1
|&eol   setb           (&i gt &nle)
|          aif              (&eol).list_lend
| . . . <process single element>
|          ago           .list_loop
|.list_lend anop
| . . .

Be aware also thatALL-CAPS macro definitions are 1) not required and
2) ugly and tedious to read.


John Gilmore, Ashland, MA 01721 - USA

On 1/19/12, Binyamin Dissen <[email protected]> wrote:
> Put the macro inline and give full details, including the line number.
>
> On Wed, 18 Jan 2012 23:10:45 -0500 Micheal Butz <[email protected]>
> wrote:
>
> :>Hi,
> :>
> :>
> :>
> :>
> :>
> :> I am getting the following error ** ASMA074E Illegal syntax in expression
> -
> :>MACRO - WSBEGIN
> :>
> :>
> :>
> :> The following is the first few lines of the macro
> :>
> :>
> :>
> :>          MACRO
> :>
> :> &NAME    WSBEGIN &BASE=
> :>
> :>                    LCLC  &B(4)
> :>
> :>                   LCLA &VAR,&VAR1,&VAR2
> :>
> :> &VAR      SETA 2
> :>
> :> &VAR1    SETA 1
> :>
> :>          AIF  ('&BASE'(1,1) EQ '(').MULT
> :>
> :> &B(1)    SETC '&BASE'
> :>
> :> &VAR1    SETA 1
> :>
> :>          AGO  .SETUP
> :>
> :> .MULT    ANOP
> :>
> :> .LOOP    AIF  ('&BASE'(&VAR,1) EQ ')').SETUP
> :>
> :>          AIF  (&VAR LE 4).CONT
> :>
> :>
> :>
> :>The following is the program source
> :>
> :>
> :>
> :> TESTB   WSBEGIN BASE=(R7,R8)
> :>
> :>
> :>
> :>I am wondering what the error might be
>
> --
> Binyamin Dissen <[email protected]>
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
>
> Should you use the mailblocks package and expect a response from me,
> you should preauthorize the dissensoftware.com domain.
>
> I very rarely bother responding to challenge/response systems,
> especially those from irresponsible companies.
>


--
John Gilmore, Ashland, MA 01721 - USA

Reply via email to