Capturing physical input file name within a SAS program

[sparky]

I have a SAS program executing on an IBM mainframe as part of a submitted batch job.  The file specified in the JCL as input to this program is a GDG file MY.INPUT.FILE(0).  Whenever I execute this program, I want to be able to capture and save the value of the name of the absolute generation of the file so it can be passed in the output file.  For example, today my program may be reading MY.INPUT.FILE.G0176V00. Is there a way to identify/capture the absolute generation file name in the SAS program?   

[SASKiwi]

Try the dictionary table EXTFILES:

In your SAS program:

proc sql;

  select * from dictionary.extfiles;

quit;

[Tom]

Did you try the FILENAME option on the INFILE statement?

Not sure what that would return on that OS but it can't hurt to try.

//INDD DD DSN=MY.INPUT.FILE(0)...

...

data x ;

   length filename filenm $200 ;

   infile indd filename=filenm ;

   input;

   filename = filenm;

run;