RE: TAATOOL Pricing and PRTLIBANL

Cool.

I've been playing around with stuff like this. Coworker showed me a
little SQL he whipped up to make QCMDEXC a UDF. So, once I like the
results I see with:
select mbfile, mblib, mbndtr as DeletedCount, mbmxrl as MaxRcdLen,
mbndtr*mbmxrl as DeletedSpace, mbaccp
from qtemp/mbrinfo
where mbfila='*PHY' AND MBNDTR>0 AND MBFILE NLIKE 'QADB%'
order by mbndtr*mbmxrl desc

I can do something like
select QCMDEXC('SBMJOB JOB(' CONCAT MBFILE CONCAT ') CMD(RGZPFM FILE('
CONCAT MBLIB CONCAT '/' CONCAT MBFILE CONCAT ') MBR(' CONCAT MBNAME CONCAT
')'),
mbfile, mblib, mbndtr as DeletedCount, mbmxrl as MaxRcdLen,
mbndtr*mbmxrl as DeletedSpace, mbaccp
from qtemp/mbrinfo
where mbfila='*PHY' AND MBNDTR>0 AND MBFILE NLIKE 'QADB%'
order by mbndtr*mbmxrl desc

If you want to use mbaccp to decide whether to add KEYFILE(*FILE) is up to
you.

Rob Berendt