/* rexx */

TrapMode = outtrap('racf.')
'lu s22'
TrapMode = OutTrap('OFF')

SinglLine = ''

Do i = 1 to racf.0
   singleLine = SingleLine Racf.i
   End

If (Pos('NO-INSTALLATION-DATA',SingleLine) = 0) Then Do
   xInstData = ''
   parse Var SingleLine . 'NAME=' xName 'OWNER=' . 'INSTALLATION-DATA'
   End

Else Do
   parse Var SingleLine . 'NAME=' xName 'OWNER=' . 'INSTALLATION-DATA'
   End



ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM coming soon  *




On Sun, Sep 8, 2024 at 10:53 PM Lizette Koehler <[email protected]>
wrote:

> I am coding a REXX to read the output from LU userid
>
>
>
> I am working on learning IRRXUTIL   but that will be a bit later
>
>
>
> I need to capture the name and installation date
>
>
>
> The Installation date can be long
>
>
>
>
>
> INSTALLATION-DATA=*********** ********** ******************
> ****************** *
>
> My challenge is creating a one line entry for my results.  It may go into
> excel later.
>
>
>
> Output keeps wrapping when I run  REXX in batch with SAY commands
>
>
>
> Output will be
>
>
>
> USERID  dlm  NAME  dlm  Owner dlm Create Date dlm Last Logon dlm
> Installation-data
>
>
>
> Since the Installation- data can vary in length - the long lines  wrap
>
>
>
> What is a good solution to create a 200 Lrecl output using SAY using
> ISIPF/REXX process
>
>
>
> Lizette
>
>
>
>
>
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to