How to obtain the attributes of the VSAM file.

passion_sujesh · Posted: Tue Sep 22, 2009 2:25 pm

Hi,
I have an requirement in which i have to obtain the attributes of the VSAM file. I have a file as input (might be a ps file or VSAM file), i need to get the attributes of the file. I tried 'LISTDSI' function, it is working fine for PS files, but for VSAM files it is not working. Can any one tell me how to do this in rexx (find the type of file and get the attributes of the file).

My code:
FILEDD = 'INPUT FILE'
X=LISTDSI(FILEDD)
IF X=0 THEN
DO
SAY 'ERROR OCCURED' X
END

Thanks,
Sujesh.

enrico-sorichetti · Posted: Tue Sep 22, 2009 2:26 pm

listcat

passion_sujesh · Posted: Tue Sep 22, 2009 4:57 pm

Hi enrico,
How can we get the attributes of the VSAM file. I tried using "LISTC ENT("FILE2") NAME", i was able to find if the file was an vsam or not.

Thanks,
Sujesh.

expat · Posted: Tue Sep 22, 2009 5:10 pm

You can use DSINFO to get the DSORG of a file, and then invoke either IDCAMS or LISTDSI accordingly.

chowdhrykapildev · New User Joined: 05 Aug 2009 Posts: 44 Location: Hyderabad

Hi Sujesh,

Try with this command.

"LISTCAT ENT("dsname")" ALL

Bill O'Boyle · Posted: Tue Sep 29, 2009 8:56 pm

An Assembler program, which uses the SHOWCB Macro, will return all the information that you need.

I'm not too sure if there's a REXX equivalent or not....

Bill