Guys, I am in the process of trying to understand and use baseless Assembler. I read through Ed's Jumpify Share presentation so i am trying to read and learn...I am not asking anyone to write my code...just tell me where I am wrong .. SAMPL001 CSECT SAMPL001 AMODE 31 SAMPL001 RMODE ANY EJECT YREGS PRINT OFF SYSSTATE ARCHLVL=2 PRINT ON J BEGIN DC C'cccccccccccccc' DC C'cccccccccccccccccccccccccccccccc' DC C'Copyright (C), ccccccccccccccccc' DC C'All rights reserved' BEGIN DS 0H SAVE (14,12) save regs coming in LR R12,R15 AHI R12,CONST-BEGIN ...... ...... Failing GETMAIN for no using here ....... CONST DC 0D DYNAMIC DSECT SAVEAREA DS 18F register save area PARMLIST DS F ......... LTORG , IHAPSA IHAASCB IHAASXB IRREVXP IEANTASM IHAACEE IKJTSB LIST=YES,EXT=YES END , 000138 0A23 201+ SVC 35 00013A 1B99 202 SR R9,R9 00013C 1B88 203 SR R8,R8 00013E 4100 04A4 004A4 204 LA R0,DYNSIZE 206 GETMAIN RC,LV=(0),SP=229 000142 208+ DS 0H 000142 209+IHB0009C DS 0H 000142 0000 0000 00000 210+ L 15,=AL1(B'00000000',(0), + ** ASMA307E No active USING for operand =AL1(B'00000000',(0),(229),B'00000000') ** ASMA435I Record 2422 in SYS1.MACLIB(GETMAIN) on volume: SDRES1
I know i misunderstood something...any pointers I would be grateful for. Regards, Scott J Ford Software Engineer http://www.identityforge.com/
