IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Printing the empty files using Icetool


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
deeptik

New User


Joined: 21 Mar 2006
Posts: 8

PostPosted: Mon Aug 31, 2009 4:25 pm
Reply with quote

Hi,

I have been given a set of 25 files. I need to check all of the files to see if they are empty. At the end I need to print a report listing the names of all Empty files.

I want to do this using DFSORT/ICETOOL. The empty file check can be done using the COUNT operator. It is possible to print the report containing the names of all empty files too but this process on the whole would require as many steps as the number of files. I want to know if there is any other way by which this can be done using DFSORT/ICETOOL in the minimum number of steps.

Thanks
Back to top
View user's profile Send private message
Escapa

Senior Member


Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA

PostPosted: Mon Aug 31, 2009 4:38 pm
Reply with quote

Use REXX
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Mon Aug 31, 2009 5:03 pm
Reply with quote

Yes, you can definitely do it in one REXX step.

Read in the list of datasets to be checked, create a loop to use IDCAMS PRINT COUNT(1) for each dataset, and if RC=4 it is empty, so print out the name of the empty dataset.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Compare 2 files and retrive records f... DFSORT/ICETOOL 0
No new posts Compare 2 files(F1 & F2) and writ... JCL & VSAM 8
No new posts Write line by line from two files DFSORT/ICETOOL 7
No new posts Compare only first records of the fil... SYNCSORT 7
No new posts Shift left VB record without x00 endi... DFSORT/ICETOOL 11
Search our Forums:

Back to Top