"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:[email protected]] On Behalf 
Of Sergio Lima
Sent: Wednesday, May 12, 2010 9:35 AM
To: [email protected]
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:[email protected]> .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>
 

Reply via email to