You didn't say if this was for a small file, or if you only need to do it
once, but under those conditions you might try this.

Run IEBPTPCH on the dataset using just ' PRINT TYPORG=PS,TOTCONV=XE' for
printing in hex, and allocate SYSUT2 to an output dataset that you can
later edit with ISPF. IEBPTPCH will put two asterisks at the end of each
printed block. In ISPF edit on the output dataset, exclude all, find
all 'page', del all nx, find all **. Then, if it is practical, eyeball
what's left between "Top of Data" and "Bottom of Data" to see if the
counts in 'Line(s) not Displayed' are all the same. Wherever they are
different, there is a short block. I'm guessing.

Bill Godfrey

On Tue, 28 Feb 2006 11:53:23 -0600, John Chase wrote:

>
>Is there an "easy" way to find any "short blocks" that might exist in a
>FB dataset?  We don't have DITTO (IBM File Manager), and I haven't found
>a way with File-Aid yet.
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to