Hello List,
Thanks very much from all help. My program now run fine with EXECIO or PIPE. You are the best. Regards Sergio Date: Wed, 12 May 2010 11:10:28 -0400 From: [email protected] Subject: Re: Question About File RDR To: [email protected] Yes - that is correct. Sorry I typed that out quickly without testing it first. On Wed, May 12, 2010 at 11:05 AM, Scott Rohling <[email protected]> wrote: You probably want: 'EXECIO * CP (STEM LINES. STRING QUERY RDR * ALL' STRING needs to be the last option... everything after it is taken literally -- so you were executing CP QUERY RDR * ALL STEM LINES. Scott Rohling On Wed, May 12, 2010 at 8:56 AM, Sergio Lima <[email protected]> wrote: 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]. USE O MESSENGER DENTRO DO HOTMAIL SEM PRECISAR INSTALAR NADA. CLIQUE PARA VER COMO. -- Mark Pace Mainline Information Systems 1700 Summit Lake Drive Tallahassee, FL. 32317 _________________________________________________________________ QUEM VOCÊ QUER SER HOJE NO MESSENGER? TRANSFORME SUA FOTO, É GRÁTIS. http://ilm.windowslive.com.br/?ocid=ILM:ILM:Hotmail:Tagline:1x1:Tagline
