Both are CP commands:
What about
 'PIPE CP Q NAMES|SPLIT at , |Strip | Sort |STEM user.'
 do i=1 to user.0
     parse var user.i name terminal .
 end

Or the second
'CP CP Q RDR * ALL |Drop|STEM RDR.'
do i=1 to rdr.0
    parse var rdr.i origin spid ....
end

P.S. get my LISTSG packagel and you can find USERLIST, to list logged on
users in a FILELIST fashion.
       http://www.vm.ibm.com/download/packages/descript.cgi?LISTSG

2010/3/12 Sergio Lima <[email protected]>

>  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.<http://ilm.windowslive.com.br/?ocid=ILM:ILM:Hotmail:Tagline:1x1:Tagline>
>



-- 
Kris Buelens,
IBM Belgium, VM customer support

Reply via email to