One of our clients had the same issue recently, no HSM attention in several
years, which resulted in over 125,000 errors. I fixed many of them by taking
the report and sorting by the column that had the error number (and more
importantly the dataset name) on it, then I removed everything else (before
and after those lines) and in ISPF edit, I built the beginning part of the
FIXDS command around the line.
HSEND FIXCDS D 'THE DATASET NAME WAS HERE' +
It was very simple to rename the "ERR ... stuff before the dsn, via :
C " ERR ...." " HSEND FIXDS D '" 1 10 all (note the use of double quotes
so that you can include single quotes), then you do the same to add the
ending quote and the plus sign.
After that was complete I used the INSLINE macro (from the CBT tape), to
insert the bit settings after each primary line.:
PATCH(X'06' BITS(0.....1.))
The entire change for well over 20,000 errors for code 40 took a little
over 30 minutes, the hard part was some of the other errors that weren't so
easy to fix.
If you need more detail, send me an offline email and I'll go over the steps
with you. I can probably walk you through it quickly.
Brian Westerman
----------------------------------------------------------------------
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
