I have a REXX Edit macro entitled ONLY that excludes all then does a find, 
which I think is closer to the OP's inquiry.

/* This REXX Edit macro simulates the old ONLY command at Volvo; you
can say "ONLY args" to simulate "X ALL; FIND ALL args". */
"ISREDIT MACRO (ARGS)"; address ISREDIT
'EXCLUDE ALL'
'FIND ALL' args

/* Display counts. */
if rc=0 then do;
  '(VF VL) = FIND_COUNTS';
  vf=vf+0; vl=vl+0; end
else do; vf=0; vl=0; end
call adhocmsg vf'/'vl,'Found' args vf 'times on' vl 'lines.'
exit 0

---
Bob Bridges, [email protected], cell 336 382-7313

/* Give a man a program and you'll frustrate him for a day. Teach a man to 
program and you'll frustrate him for a lifetime.  -Francesco Napoletano 
@napolux */

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
Farley, Peter
Sent: Tuesday, February 4, 2025 12:33

Really?  What is so hard about EXCLUDE . . . followed by FLIP?  I use that 
frequently myself.

---
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
Seymour J Metz
Sent: Tuesday, February 4, 2025 12:27 PM

Provide e an NEXCLUDE command similar to FIND and EXCLUDE that excludes all 
lines in the specified range that do not match the specified picture, regex or 
string in the specied columns.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to