Bev,
Sorry for the top post,
It is possible to have an LDEV on the system with NO assigned classes.
The only way to reference it is via a file equate. i.e.
FILE OUT;DEV=900
PRINT MYFILE;out=*OUT
-Craig
Bev Clancy <[log in to unmask]> wrote:
Hello once again Group,
Thanx for all the well wishes for my boys and for all the good advice. To the parent of triplets, hats off to ya, I could not imagine.
I spose I should have been more specific in my original problem description. I am in New Jersey, the system is in Ohio. The HP3k does not belong to me, I am a consultant for the company. For security reasons, I do not have access to Manager.Sys or to NMMGR. (And I don't blame them. I wouldn't want my consultants running amok on my system either.) I am VPN connected to the client's network and then VT connected via Reflections to the HP. The LDev I am trying to chase down is a Network Printer, it is not a DTC connection. This is why I was looking for a CI command, like Showclass. I tried Donna's script, and absolutely nothing happened. Nothing at all. Not even a single Echo.
Did I do something wrong? TIA
bev clancy
SGAII:help showclas
USER DEFINED COMMAND FILE: SHOWCLAS.PUB.SGAII
PARM devnum,entry=main
if "!entry" = "main"
if "!devnum" = "?"
echo
echo !hpfile [ldev number]
echo
echo Shows all the class names for a given LDev. Very handy
echo for printers, in particular.
echo
return
endif
setvar hpcierr 0
#-- test the input
continue
showdev !devnum>$null
if hpcierr <> 0
echo
echo ERROR: The LDev number given (!devnum) is invalid
echo
return
endif
file scout;temp
if finfo("*scout","exists")
purge scout,temp
endif
setvar hpcierr 0
#-- using ioconfig because it's generally accessable
xeq ioconfig.pub.sys 'ld !devnum' > *scout
if hpcierr = 0
xeq !hpfile !devnum,process < *scout
deletevar _sc_@
purge scout,temp
reset scout
else
echo
echo ERROR: IOConfig failed; hpcierror(!hpcierr)
echo !hpcierrmsg
reset scout
return
endif
else
setvar _sc_eof 0
while _sc_eof < finfo('*scout','eof')
setvar _sc_eof _sc_eof+1
input _sc_rec
#-- did we find the desired line?
if pos('CLASS: ',_sc_rec) > 0
echo
echo LDev !devnum has the following class names:
echo ![xword(_sc_rec,':')]
endif
endwhile
endif
SGAII:showclas 900
SGAII:listftemp @.@,2
Temporary file not found. (CIWARN 3289)
SGAII:listf [log in to unmask]@,2
No MPE-named files found in file set. (CIWARN 431)
SGAII:showclas
showclas
The DEVNUM parameter is required. (CIERR 10015)
Supplied parameters do not match formal parameters. (CIERR 2039)
SGAII:
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|