The output from the CP Q RDR ALL isn't stacked so the pull won't work.
Easier to use a PIPE to pull it in
'PIPE CP Q RDR * ALL | drop 1 | specs w10 1 | var filename'
or if there might be multiple files in the reader, make it
| stem filename.
instead of var and work through the files to find what you need.
Bob Bates
Enterprise Hosting Services
w. (469)892-6660
c. (214) 907-5071
"This message may contain confidential and/or privileged information. If you
are not the addressee or authorized to receive this for the addressee, you must
not use, copy, disclose, or take any action based on this message or any
information herein. If you have received this message in error, please advise
the sender immediately by reply e-mail and delete this message. Thank you for
your cooperation."
________________________________
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf
Of Sergio Lima
Sent: Wednesday, May 12, 2010 8:35 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Question About File RDR
Hello List,
I need do a REXX here, and unfortunatelly I forgot how do something.
The REXX is very easy, and is like this :
3 *-* DO FOREVER
4 *-* 'WAKEUP (RDR '
>>> "WAKEUP (RDR "
+++ RC(4) +++
6 *-* IF RC = 4
>>> "1"
*-* THEN
*-* DO
7 *-* "CP Q R * ALL"
>>> "CP Q R * ALL"
ORIGINID FILE CLASS RECORDS CPY HOLD DATE TIME NAME TYPE DIST
SUPCICS 0001 A PRT 00000060 001 NONE 05/12 10:23:29 EXPLIST 10885 SANZ
8 *-* pull . . . . . . . . . FILENAME
What I need, is get the field number 10 showed above (EXPLIST), and is not a
PULL rexx command.
Sorry about ask this very easy question, but really don't have anybody here
that know this.
Thanks very much,
Sérgio Lima Costa
sergio.co...@grvsolutions<mailto:marcelo.quei...@grvsolutions.com.br>.com.br
Arquitetura e Suporte
GRV Solutions
Tel.: +55 (11) 4152-9398
www.grvsolutions.com.br<http://www.grvsolutions.com.br/>
________________________________
EM 2009 ACONTECERAM 250.362 FRAUDES NA INTERNET. CLIQUE PARA LER DICAS DE
SEGURANÇA.<http://www.microsoft.com/brasil/windows/internet-explorer/features/navegue.aspx?tabid=1&catid=1&WT.mc_id=1565>
