Here's a pipe that will do it: 'PIPE (ENDCHAR ?)', '< MY LISTING A', '| a: fanout', '| LOCATE 1.1 /0/', '| SPECS 2.8 1 LEFT', '| j: JUXTAPOSE', '| LOCATE 1.8 /EEE /', '| PICK W3 /== /??/', '| SPECS W1-3 1', '| STEM PROGS.', '?', 'a:', '| SPECS 13-* 1 /??/ NW', '| j:'
This is a variation on a pipe to process a USER DIRECT and prefix the MDISK statements with the owning userid. This is tailored to the format of your input file. Brian Nielsen On Mon, 23 Oct 2006 15:25:57 -0500, Huegel, Thomas <[EMAIL PROTECTED]> wrote: > >I have a file, print output, that looks something like this. > >1REPT: BYUSER > DATE: 10/23/06 > TIME: 14:50:46 >0USERID LIBRARY > ======== ====== >0AAA FULL01 >0BBB FULL01 >0CCC LIST01 > LIST01 > LIST01 > LIST01 > LIST01 > LIST01 > LIST01 > LIST01 > LIST01 >0DDD DIST01 >0EEE LIST01 A1 > LIST01 A2 > LIST01 A3 > LIST01 A4 > LIST01 A5 > LIST01 A6 >1REPT: BYUSER > DATE: 10/23/06 > TIME: 14:50:46 >0USERID LIBRAR > ======== ====== >0EEE LIST01 A7 >0FFF FULL01 > FULL01 > FULL01 > FULL01 > FULL01 > FULL01 > FULL01 > FULL01 > FULL01 > FULL01 > FULL01 > FULL01 > FULL01 > JCL01 > JCL01 >. >. >. >. > >I want to end up with something like this. >With the headings stripped off and all of the records belonging to user EEE. > >0EEE LIST01 A1 > LIST01 A2 > LIST01 A3 > LIST01 A4 > LIST01 A5 > LIST01 A6 > LIST01 A7 > >I have a couple of pipes that work, but they aren't pretty. > >I'm always looking for a better way so I thought I'd ask the experts. > >My pipes: >'PIPE < MY LISTING A | SPECS 1-9 1 | NLOCATE 1-6 /1REPT:/ | NLOCATE 1-6 >/DATE:/ |NLOCATE 1-6 /TIME:/ ', >'| NLOCATE 1-9 /========/ | NLOCATE 1-7 /0USERID/ | SORT UNIQUE 1-9 ', > >'| BETWEEN /0'||USERID' / /0/ | DROP FIRST 1 | VAR ENDUSER' >/* all this just to find who the next user is */ > > > > > >'PIPE < MY LISTING A | NLOCATE 1-6 /1REPT:/ | NLOCATE 1-6 /DATE:/ |NLOCATE >1-6 /TIME:/ ', >'| NLOCATE 1-9 /========/ | NLOCATE 1-7 /0USERID/ ', > >'| BETWEEN /0'||USERID' / /'ENDUSER' / | DROP LAST 1 | SPECS 13-43 1 | STEM >PROGS.' > >Thanks > > > > >__________________________________________________________________ ><< ella for Spam Control >> has removed VSE-List messages and set aside >VM-List for me >You can use it too - and it's FREE! http://www.ellaforspam.com >
