View previous topic :: View next topic
|
Author |
Message |
amarnath reddy Warnings : 1 New User
Joined: 08 Feb 2006 Posts: 3
|
|
|
|
hi all
i have a small doubt in vsam.
how will come to know that vsam file is empty or not. |
|
Back to top |
|
|
Rupesh.Kothari
Member of the Month
Joined: 27 Apr 2005 Posts: 463
|
|
|
|
Hi,
Submit the JCL
Code: |
//SORTTST JOB (ACCT#),'SORT ',NOTIFY=&SYSUID,CLASS=T,MSGCLASS=X
//STEP01 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=VSAM File ,DISP=SHR
//SORTOUT DD DSN=Output file ,DISP=SHR
//SYSIN DD *
OPTION COPY
OUTFIL REMOVECC,NODETAIL,
TRAILER1=(COUNT=(M10,LENGTH=02))
/*
//SYSUDUMP DD SYSOUT=* |
If output file contain 0 records it means fiel is empty..
Hope this helps
Regards
Rupesh |
|
Back to top |
|
|
senthils
Active User
Joined: 15 Nov 2005 Posts: 117 Location: Chennai, India
|
|
|
|
Thats a nice answer Rupesh |
|
Back to top |
|
|
nuthan
Active User
Joined: 26 Sep 2005 Posts: 146 Location: Bangalore
|
|
|
|
Hi,
U can use IDCAMS utility and in sys in dd * give PRINT COUNT(1) .
this will return a maxcc = 4 if it is a empty VSAM file. |
|
Back to top |
|
|
priyesh.agrawal
Senior Member
Joined: 28 Mar 2005 Posts: 1448 Location: Chicago, IL
|
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
Priyesh,
When you give a link to a Smart DFSORT Trick, you need to include the #tnn number at the end - otherwise the link goes to the top of the page rather than to the trick you actually want. I've edited your link above to include the #t10 needed to get to the trick you were trying to show. |
|
Back to top |
|
|
priyesh.agrawal
Senior Member
Joined: 28 Mar 2005 Posts: 1448 Location: Chicago, IL
|
|
|
|
Thank You Frank...
Regards,
Priyesh. |
|
Back to top |
|
|
|