Hello Mike,

 

This is the previlege if my machine :

 

q privclass                       
Privilege classes for user SERGIOL
        Currently: BCDEFG         
        Directory: BCDEFG         
Ready; T=0.01/0.01 14:41:14     

 

When try send a CP SMSG to VTAM machine, received :

 

CP SMSG VTAM VTAM D NET,APPLS             
HCPMFS057I VTAM not receiving; SMSG off   
Ready(00057); T=0.01/0.01 14:42:06        

 

About command SET OBSERVER, is very good for US, we don't knew this command.

 

So, what we need do here, is only change the WAKEUP parameter ?

 

About process the Output with only one command also is very good.

 

Thanks very much,

 

Sergio

 

 


 


Date: Thu, 22 Apr 2010 12:13:24 -0400
From: [email protected]
Subject: Re: Question About Read console output under REXX
To: [email protected]







Hi Sergio,
 
We no longer use VTAM, but I seem to recall you could communicate directly with 
the VTAM service virtual machine using CP SMSG (e.g. there was no need to swap 
SECUSER settings).
 
Try this from your own VM userid :
 
CP SMSG VTAM VTAM D NET,APPLS
 
Do you get a response?  If so, that’s good – no need to muck with SECUSER 
settings.  If not, you may still not need to muck with SECUSER if you have CP 
privclass C, just SET OBSERVER VTAM *, that will cause the console I/O to echo 
on your machine.  With class C you can SEND commands to a virtual machine 
without becoming their SECUSER (very handy).
 
The reason you aren’t getting anything with the PIPE CP SEND VTAM command, is 
the response from CP SEND is simply going to be RC 0 (or perhaps another RC 
and/or msg if you aren’t authorized or VTAM isn’t logged on).  The actual 
responses that appear on your virtual machine console are asynchronous IUCV 
messages that you’d have to trap using either PIPE STARMSG or use of the WAKEUP 
MODULE (PIPE STARMSG is preferred these days).
 
PS:  You don’t need to process each record in your OUTPUT. Stem individually by 
reading, stacking and writing one at a time with EXECIO.  Assuming you had 
gotten the results into OUTPUT. You could just do this:
 
PIPE STEM OUTPUT. | > VTAM RESULT A | SPECS 1.8 | CONSOLE
 
Once you get STARMSG working, you can integrate those stages above with your 
STARMSG results.
 
-Mike
 
 


From: The IBM z/VM Operating System [mailto:[email protected]] On Behalf 
Of Sergio Lima
Sent: Thursday, April 22, 2010 11:01 AM
To: [email protected]
Subject: Re: Question About Read console output under REXX
 
Hello Mr. Scott,
 
First, thanks very much from your help, and other colleagues of this list, and 
sorry from delay this response.
I tested your sample here, and this is wath we need.
For CMS commands, ok, for CP commands, also ok, but,
We need something like this :
 
/*   */                                               
TRACE R                                               
"CP SET SECUSER VTAM * "                              
'PIPE CP SEND VTAM VTAM D NET,APPLS   | STEM OUTPUT.' 
SAY OUTPUT.0                                          
DO I = 1 TO OUTPUT.0                                  
  SAY SUBSTR(OUTPUT.I,1,8)                            
  QUEUE OUTPUT.I                                      
  'EXECIO 1 DISKW' VTAM RESULT  A                     
END                                                   
"CP SET SECUSER VTAM OPERATOR "                       
 
Because, need monitoring the I/O buffers of VTAM, and others.
 
When execute the exec above, the OUTPUT of the command is not wrote in my CMS 
file.
 
Can you help please ?
 
Thanks very much,
 
 
Sérgio Lima Costa
[email protected]             
Arquitetura e Suporte                                             
GRV Solutions                                      
Tel.: +55 (11) 4152-9398
www.grvsolutions.com.br
 

 



Date: Fri, 12 Mar 2010 08:54:05 -0700
From: [email protected]
Subject: Re: Question About Read console output under REXX
To: [email protected]

'PIPE CMS command | STEM OUTPUT.'
'PIPE CP command    | STEM OUTPUT.'

Do i = 1 to output.0
  Say output.i
End

for starters

Scott

On Fri, Mar 12, 2010 at 8:43 AM, Sergio Lima <[email protected]> wrote:

Hello List,
 
Years ago, We had a REXX program that gove a CMS (query names), or a CP command 
(CP q rdr all) , and next read the output of
this command in my program, for example : If we need look the spool files, my 
program process this, and look how many files had,
or list the users logged in alphabetic order.
Unfortunatelly We lost this samples programs, so, someone have anything like 
this ?
 
Thanks very much.
 
Sergio Lima Costa
System Programmer
GRV Solutions
Sao Paulo - Brazil



Transforme-se em personagens engraçados. Conheça o novo site de I Love 
Messenger.
 



Veja todos os seus e-mails de diferentes contas com apenas um login. Veja como. 
                                          
_________________________________________________________________
Você sabia que seu navegador te ajuda a ficar longe de vírus? Leia mais sobre 
isso.
http://www.microsoft.com/brasil/windows/internet-explorer/?WT.mc_id=1500

Reply via email to