Rob van der Heij wrote:
> But it's a great excuse for PREDSELECT and NOT COMMAND ...

I should have been more explicit:  That's exactly what I was hoping to
avoid when I said "straightforward."  If I'm going to issue a separate
command against each file, it might as well be PIPE STATE--and, in fact,
I could just wait for it to fail before issuing it again:

/* STATEALL REXX */
xrc = 0
'peekto'
Do while rc = 0
  'callpipe (end /) *: | a: state' Arg(1) '| *: / a: | *..1:'
  xrc = Max(rc, xrc)
  /* divert record that caused error to alternate */
  'callpipe *: | take 1 | *..1:'
  'peekto'
End
Exit xrc

For more general use, though, it sure would be nice to have a stage to
validate fileids before use, not just by STATE but by DISK etc.

¬R

Reply via email to