I wrote this little script on MPE 7.0 using a 928LX. It checks on the
user capabilities, 
When SM is found then it will search the entire system for Image root
files, and then get creator info for each database.

When only AM is found then the same is done for the account only.

If neither SM or AM then it does nothing.

What it returns is 
dbname uname upass acctname apass grpname grppass 

Then I pass all of this to another script, see below. Basically, this
script will build a batch job, stream it, and wait for it to complete.
IT WORKS GREATE ON MY 928 (7.0) machine. Now a friend of mine across
town whats to use it on her A500 running MPE 7.5, so I go over there,
and it doesn't work. What it did was display the value of the HPsusan
and a question mark, and was waiting on a terminal read. It did this not
only for the HPSUSAN, but also all three passwords.

It did not do this on the 928 running 7.0, but it did on the A500
running 7.5, anyone know whats up with this?


PARM DB,USER,UPASS,ACCT,APASS,GROUP,GPASS
PURGE !HPJOBTYPE!HPJOBNUM,TEMP > $NULL
PURGE !HPJOBTYPE!HPJOBNUM > $NULL
BUILD !HPJOBTYPE!HPJOBNUM;REC=-188,1,F,ASCII;DEV=DISC
FILE MYJOB=!HPJOBTYPE!HPJOBNUM,OLD
ECHO %JOB !HPJOBTYPE!HPJOBNUM,!USER/!UPASS.!ACCT/!APASS,!GROUP/GPASS
;OUTCLASS=LP,1;PRI=CS > *MYJOB
ECHO %TELL !HPSTREAMEDBY Structural Analysis on !db.!GROUP.!ACCT started
 >> *myjob
ECHO %RUN
MIG901.PUB.SISDSYS;INFO="!DB~!HPSUSAN~!USER~!UPASS~!ACCT~!APASS~!GROUP~!GPASS"
>> *MYJOB
ECHO %TELL !HPSTREAMEDBY Structural Analysis on !db.!GROUP.!ACCT
complete >> *myjob
echo %EOJ >> *MYJOB
Stream !hpjobtype!hpjobnum,%
pause job=!hplastjob




--
Michael Anderson
Programmer/Analyst -- Technology Dept.
Spring Independent School District
16717 Ella Boulevard
Houston, Texas 77090-4299
office: 281.586.1105
Mobile: 832.515.3868
fax: 281.586.1187
-

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *