Netstat command from VM:Operator

[Graeme Moss]

Mike,

As of z/VM 5.3 there has been a change in way to get NETSTAT working. See 
Knowledge base article TEC437559 at CA Support Online.

At our site the NETSTAT command is trapped by VMOPER and a msg sent to a DSM 
running WAKEUP.
The DSM sets SECUSER to the requester (OPERATOR) issues the command then 
sets SECUSER OFF

Here is a code snippet
do forever
 say 'Waiting for requests'
 'wakeup ( iucvmsg'
 if rc = 6 then leave
 if rc = 5 then
   do
   pull request
   parse var request . 'MSG' sender  command
   call doit
   end
end


doit:

command = strip(command,'B')
if subword(command,1,1) = "USER=" then
 do
 sender = subword(command,2,1)
 command = subword(command,3)
 end

say date() time() 'Issuing' command 'for' sender

'cp set secuser' sender
command
'cp set secuser off'

return

Cheers
Graeme Moss