kamalakark
New User
Joined: 05 Sep 2006
Posts: 1
Location: Dubai
|
|
|
|
Using macros Open (file name),mode
Get filename
Close filename
DCB for the filename has to be defined with in the program.
Here is the example below listed
JCL
//F13222I DD DSN=USER.USRTBL.TABLE(TBLNAME),DISP=SHR
Assembler program
OPEN (F13222I)
GET F13222I
.
.
CLOSE (F13222I)
F13222I DCB DDNAME=F13222I,DSORG=PS,MACRF=(GL),EODAD=E0FIP
Where EOFIP will be executed once the End Of File reaches
Let me know if you need anymore.
Rgds,
Kamal |
|
