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 <
00000014e0e4a59b-dmarc-requ...@listserv.uga.edu> 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
>
