Examples

Assembler Macro Module Examples

LOAD EP=IOAMEM

 ST R0,MEMADR

 IOAMEM GETMEM,

   DDNAME=0,    

               RECNUM=1000,                                        

               DSNAME==CL44'N22.LIB.CNTL',                           

               MEMBER==CL8'TESTX',                                   

               ESTAE=Y,                                              

               DUMP=N,                                               

               IOAMEMA=MEMADR,                                       

               MF=E,                                                 

               MCTADDR=0

         MVC   HANDLE,IMHNDLR save handler address

          IOAMEM GETMEM,                      

               HANDLER=HANDLE,                     

               BUFFADR=0,

               RECNUM=RECNUM,

               DDNAME=DDNAME,                                    

               DSNAME=DSNAME,                           

               MEMBER=MEMBER,                                   

               ESTAE=Y,                                              

               DUMP=N,                                               

               IOAMEMA=MEMADR,                                       

               MF=E,                                                 

               MCTADDR=0

HANDLE   DS      A  

DDNAME   DC     CL8’DD1’

DSNAME   DC     CL44’MY.DSNAME’

MEMBER   DC     CL8’MEMBER1’

RECNUM   DC     A(10000)