Hello Frank,
The EXECIO command is running well ?
I don't understand this
"EXECIO * CP (STRING QUERY RDR * ALL STEM LINES."
+++ RC(1003) +++
RC = 1003 ...
Sergio
Date: Wed, 12 May 2010 09:35:55 -0500
From: [email protected]
Subject: Re: Question About File RDR
To: [email protected]
Replace “Say lines” with
Do i=1 to Lines.0
Say Lines.i
End
Frank M. Ramaekers Jr.
From: The IBM z/VM Operating System [mailto:[email protected]] On Behalf
Of Sergio Lima
Sent: Wednesday, May 12, 2010 9:15 AM
To: [email protected]
Subject: Re: Question About File RDR
Hello Mark,
Yes, you correct.
This is like the "old" method that I used years ago.
But still have a little problem, look please :
3 *-* DO FOREVER
4 *-* 'WAKEUP (RDR '
>>> "WAKEUP (RDR "
+++ RC(4) +++
6 *-* IF RC = 4
>>> "1"
*-* THEN
*-* DO
8 *-* 'EXECIO * CP (STRING QUERY RDR * ALL STEM LINES.'
>>> "EXECIO * CP (STRING QUERY RDR * ALL STEM LINES."
+++ RC(1003) +++
10 *-* say lines
>>> "LINES"
LINES
Can you help please ?
Sergio
Date: Wed, 12 May 2010 09:44:07 -0400
From: [email protected]
Subject: Re: Question About File RDR
To: [email protected]
If I understand what you want
'EXECIO * CP (STRING QUERY RDR * ALL STEM LINES.'
Then do loop through the stem lines.
On Wed, May 12, 2010 at 9:34 AM, Sergio Lima <[email protected]> wrote:
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
[email protected]
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.
--
Mark Pace
Mainline Information Systems
1700 Summit Lake Drive
Tallahassee, FL. 32317
USE O MESSENGER DENTRO DO HOTMAIL SEM PRECISAR INSTALAR NADA. CLIQUE PARA VER
COMO._____________________________________________________ This message
contains information which is privileged and confidential and is solely for the
use of the intended recipient. If you are not the intended recipient, be aware
that any review, disclosure, copying, distribution, or use of the contents of
this message is strictly prohibited. If you have received this in error, please
destroy it immediately and notify us at [email protected].
_________________________________________________________________
DEIXE SUAS CONVERSAS MAIS DIVERTIDAS. TRANSFORME AQUI SUAS FOTOS EM EMOTICONS,
É GRÁTIS.
http://ilm.windowslive.com.br/?ocid=ILM:ILM:Hotmail:Tagline:1x1:Tagline
