Hello,
Very good, is working ...
If We need get other fields, like the number of the file, I need put 2 specs
command ?
Thanks
Sergio
Date: Wed, 12 May 2010 07:50:14 -0600
From: scott.rohl...@gmail.com
Subject: Re: Question About File RDR
To: IBMVM@LISTSERV.UARK.EDU
Put a double quote ( " ) in front of PIPE --- the whole PIPE command needs
to be contained within either double or single quotes.
Scott Rohling
On Wed, May 12, 2010 at 7:47 AM, Sergio Lima <sergiovm...@hotmail.com> wrote:
Hello,
First, thanks very much from your help, but may be I do some mistake here, my
REXX now is :
/* */
TRACE R
DO FOREVER
'WAKEUP (RDR '
IF RC = 4 THEN DO
/* "CP Q R * ALL" */
PIPE CP Q RDR ALL | drop 1 | take 1 | specs w 10 1 | var $name tracking"
When try run received this :
3 *-* DO FOREVER
4 *-* 'WAKEUP (RDR '
>>> "WAKEUP (RDR "
+++ RC(4) +++
6 *-* IF RC = 4
>>> "1"
*-* THEN
*-* DO
7 *-* /* "CP Q R * ALL" */
8 +++ ?
DMSREX460E Error 13 running EXPLIST EXEC, line 8: Invalid character in program
Thanks,
Sergio
Date: Wed, 12 May 2010 09:41:58 -0400
From: jim.hug...@doit.nh.gov
Subject: Re: Question About File RDR
To: IBMVM@LISTSERV.UARK.EDU
“PIPE CP Q RDR ALL | drop 1 | take 1 | specs w 10 1 | var $name tracking “
This may work.
____________________
Jim Hughes
603-271-5586
"It is fun to do the impossible."
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf
Of Sergio Lima
Sent: Wednesday, May 12, 2010 9: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.com.br
Arquitetura e Suporte
GRV Solutions
Tel.: +55 (11) 4152-9398
www.grvsolutions.com.br
EM 2009 ACONTECERAM 250.362 FRAUDES NA INTERNET. CLIQUE PARA LER DICAS DE
SEGURANÇA.
QUER NAVERGAR COM MAIS SEGURANÇA? VEJA AS DICAS DO INTERNET EXPLORER 8.
_________________________________________________________________
CANSADO DE ENTRAR EM TODAS AS SUAS DIFERENTES CONTAS DE EMAIL? JUNTE TODAS
AGORA.
http://www.windowslive.com.br/public/product.aspx/view/1?cname=agregador&ocid=Hotmail:MSN:Messenger:Tagline:1x1:agregador:-
