The results are in. They include a mention that RoadRunner sets some
JCWs that can be used for this. Right now, we use TurboSTORE, but it's
good to know about the alternatives. It seems that for the next two
respondents and for me, this will be a work in progress.

Glenn Cole suggested processing the STORE listing output as a separate
file involved using EDITOR to delete everything but the lines that are
of interest:

> To keep only the "real" errors.  For example:
>
>         /text store_output
>         /set short
>         /:comment  --  hold all the "NOT STORED" lines, then create
>         /:comment  --  a file consisting ONLY of those lines
>         /:comment
>         /fq first; while; fq "NOT STORED"; begin; holdq *,append; fq
> *+1; end
>         /dq all
>         /aq 1,holdq,now
>         /:comment
>         /:comment  --  delete the errors that are "acceptable"
>         /:comment
>         /fq first; while; fq "/HPSPOOL/OUT/"; dq *
>         /fq first; while; fq "/NSD/JPAK/CHECK"; dq *
>         /fq first; while; fq "/NSD/JPAK/INDEXF"; dq *
>         ...
>         /keep afile
>         /exit
>
> Now 'afile' has the unexpected "NOT STORED" lines.

and using MPEX or listfile,6;seleq=[access=inuse]>temp to generate a
list of open files, to use as an indirect file for filestoexclude. He
had not actually used the latter approach. The chief benefit of going to
the trouble of doing so is that there could few if any files not backed
up by careful use of such an approach. If I can get this to work for me,
I like the idea.

James Lagger provided some clever hacks for parsing the STORE listing,
which I am also likely to borrow and adapt. Here it is in its entirety.

> -----Original Message-----
> From: James Lagger [SMTP:[log in to unmask]]
> Sent: Thursday, September 17, 1998 3:08 PM
> To:   Stigers, Greg  ~ AND
> Subject:      Re: clean running STORE jobs
>
> I've been looking at the same thing. The following script is a work in
> progress. Use at your own risk... you may be able to modify to fit
> your environment. We redirect the backup listings to a file in mmmddyy
> format.
>
> I compare the number of files not stored to the 'normal' number. Not a
> perfect soultion but better than nothing.
>
> I send the backup results in a condensed version via alpha page
> (telamon utility).
>
> Hope this helps -JIM
>
> parm bkupgrp=bkuplist
> comment
> comment this script will grap a backup listing & set 3 variables
> comment bkup_stored      number of files stored
> comment bkup_not_stored  number of files not stored
> comment bkup_time        time backup finished (when bkup list
> modified)
> comment
> setvar bkup_file str(hpdatef,6,3)
> setvar bkup_file bkup_file+rht("0!hpdate",2)
> setvar bkup_file bkup_file+"!hpyear"+"."+"!bkupgrp"+".DPC"
> comment substitute your file name here
> setvar bkup_strt finfo('!bkup_file','eof') - 7
> print !bkup_file;start=!bkup_strt > bkuptemp
> /bin/grep "'FILES STORED'" < bkuptemp > bkuptmp
> input bkup_stored < bkuptmp
> setvar bkup_stored ltrim(str('!bkup_stored',19,37),' ')
> /bin/grep "'FILES NOT STORED'" < bkuptemp > bkuptmp
> setvar bkup_not_stored finfo('bkuptmp','eof')
> if !bkup_not_stored > 0
>    input bkup_not_stored < bkuptmp
>    setvar bkup_not_stored ltrim(str('!bkup_not_stored',19,37),' ')
> endif
> if !bkup_not_stored < 10
>    setvar bkup_not_stored '0' + '!bkup_not_stored'
> endif
> setvar bkup_time finfo("!bkup_file",24)
> setvar bkup_display "!bkup_time !bkup_not_stored  !bkup_stored"
>
>
> JP Lagger
> Manager of Operations
> Lucas County Data Processing
> One Government Center Suite #400
> Toledo, OH 43604