In a single PIPE:

  "PIPE (endchar ?)",             
     "|  LITERAL CP Q ALLOC ALL" ,
     "|  CP",                     
     "|  TAKE LAST 1" ,           
     "|  SPECS W6 1" ,            
     "|l:LOOKUP W1",              
     "|  DROP FIRST 1",           
     "|  CONSOLE",                
    "?",                          
     "   LITERAL QUERY CPOWNED",  
     "|  CP",                     
     "|  SPEC W2-*",              
     "|l:"                        

 
Frank M. Ramaekers Jr.
 
 

-----Original Message-----
From: The IBM z/VM Operating System [mailto:[email protected]] On
Behalf Of Alan Ackerman
Sent: Tuesday, November 09, 2010 10:22 PM
To: [email protected]
Subject: Re: How to determine SYSRES

'PIPE CP Q ALLOC ALL' ,
   '| TAKE LAST 1' ,
   '| CONSOLE' ,
   '| SPECS W6 1' ,
   '| VAR sysres' ,
   '| CP QUERY CPOWNED' ,
   '| PICK W2 == /'sysres'/' ,
   '| SPECS W2-* 1' ,
   '| CONSOLE' 

This won't work. You cannot set the REXX variable and use it in the same
pipe.

'PIPE CP Q ALLOC ALL' ,
   '| TAKE LAST 1' ,
   '| CONSOLE' ,
   '| SPECS W6 1' ,
   '| VAR sysres' 

'PIPE CP QUERY CPOWNED' ,
   '| PICK W2 == /'sysres'/' ,
   '| SPECS W2-* 1' ,
   '| CONSOLE' 

Not tested. But then the first pipe wasn't tested either.

Alan Ackerman

_____________________________________________________
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].

Reply via email to