Try adding some blanks in front of your ‘SR…’ of the SETC.
I think the SR is being read as the label and the &N,7N as the oppose.
Lloyd


Sent from AT&T Yahoo Mail for iPad


On Tuesday, November 14, 2023, 3:49 PM, João Reginato <[email protected]> 
wrote:

now with LCLC and CSECT. Same error

João Reginato
(61) 9911-55500

Symbol  Type  Id    Address  Length  Owner Id Flags Alias-of
                HLASM R6.0  2023/11/14 17.46
XYZ      SD 00000001 00000000 00000000            00




                                  Page    3
  Active Usings: None

  Loc  Object Code    Addr1 Addr2  Stmt  Source Statement
                HLASM R6.0  2023/11/14 17.46
                                      1          MACRO

                                      2          ZERO  &N

                                      3          LCLC  &REST

                                      4 &REST    SETC  'SR    &N,&N'

                                      5          &REST

                                      6          MEND

000000                00000 00000    7 XYZ      CSECT

                                      8          ZERO  15

                                      9+        SR    15,15
                                    01-00005
** ASMA057E Undefined operation code - 00005/SR    15,15

** ASMA435I Record 5 in JOAO.QWASM.JOB09578.D0000101.? on volume:

                                    10          END


Em ter., 14 de nov. de 2023 às 17:46, Paul Gilmartin <
[email protected]> escreveu:

> On 11/14/23 13:28:09, João Reginato wrote:
> > hi
> > I can't see the error on this simple code.
> > Can anyone help me pls?
> >
> > TIA
> > João Reginato
> > (+55 61) 9911-55500
> >
> >
> >    Active Usings: None
> >
> >    Loc  Object Code    Addr1 Addr2  Stmt  Source Statement
> >                  HLASM R6.0  2023/11/14 16.58
> >                                        1          MACRO
> >                                        2          ZERO  &N
> >                                        3 &REST    SETC  'SR    &N,&N'
> >                                        4          &REST
> >                                        5          MEND
> >                                        6          ZERO  15
> >                                        7+        SR    15,15
> >                                      01-00004
> > ** ASMA057E Undefined operation code - 00004/SR    15,15
> > ** ASMA435I Record 4 in JOAO.QWASM.JOB09574.D0000101.? on volume:
> >.
> I believe the SETC is unnecessary.  How a bout just:
>          MACRO
> &REST    ZERO  &N
> &REST    SR    &N,&N
>          MEND
>
>          START
> L        ZERO  15
>          END
>
> --
> gil
>

Reply via email to