Operating System - OpenVMS
1830893 Members
3470 Online
110017 Solutions
New Discussion

Is there anyway to extract sysuaf.lis to excel?

 
Victor Mendham
Regular Advisor

Is there anyway to extract sysuaf.lis to excel?

Is there an easy was to dump the sysuaf and export to excel?
3 REPLIES 3
Victor Mendham
Regular Advisor

Re: Is there anyway to extract sysuaf.lis to excel?

Dhuh, sorry had a brainfreeze. No need to answer.
Hakan Zanderau ( Anders
Trusted Contributor

Re: Is there anyway to extract sysuaf.lis to excel?

Yes ! it's easy......

Export SYSUAF.LIS to the PC.
OPEN the file using EXCEL and EXCEL will start the "Text Import Wizard". Then you will get a question about what delimiter to
use.

BUT !! you need to check the OWNER field in
SYSUAF.LIS. Some owners have more than one
string and delimited by " ".

I'm using EXCEL from Office XP
Don't make it worse by guessing.........
Hakan Zanderau ( Anders
Trusted Contributor

Re: Is there anyway to extract sysuaf.lis to excel?

I have had a huge bell ringing in my head for the last hour.........

I made a comment regarding the ownerfield,
so I had to check SYSUAF.LIS more closely.

I made a small DCL-script to make the file
easier to import in Excel.

$ open/read infile sysuaf.lis
$ open/write outfile sysuaf_excel.lis
$ read/end=eof infile str
$ read/end=eof infile str
$10:
$ read/end=eof infile str
$ strln=f$length(str)
$ owner=f$edit(f$extract(0,20,str),"trim")
$ if owner .eqs. "" then owner=" "
$ user=f$edit(f$extract(21,14,str),"trim")
$ uic=f$edit(f$extract(35,14,str),"trim")
$ account=f$edit(f$extract(50,8,str),"trim")
$ if account .eqs. "" then account=" "
$ priv=f$edit(f$extract(59,6,str),"trim")
$ prio=f$edit(f$extract(66,2,str),"trim")
$ defdir=f$extract(69,strln-69,str)
$ write outfile owner+"#"+user+"#"+uic+"#"+account+"#"+priv+"#"+prio+"#"+defdir
$ goto 10
$eof:
$ close infile
$ close outfile

In Excel use "#" as delimiter. Tried it myself and it worked.
Don't make it worse by guessing.........