|
Hi Chris Not picking on your suggestion, just you were first in the queue :)I have to say I really dislike the idea of naming devices and allocating them to a subsystem to achieve this.
It can be done relatively simply using a routing entry which has the added advantage that when you happen to be logging on remotely you don;t have to remember to name your device.
The caveat mentioned elsewhere about running two subsystems applies and which one they will be allocated to.
Most of these commands would be required if creating a second subsystem anyway, so there's no damage there.
midrange.com
The steps to do this (from some old notes) are:
This subsystem will allow Telnet Only access as an alternative to Qinter.
Access to the subsystem will be permitted by use of Routing Entries rather
than relying on Workstation Names.
Note that this subsystem should not be left operational while QINTER is active.
Create a class for the subsystem specifying interactive-like parameters.
CRTCLS CLS(*LIBL/ADMSBS)
TIMESLICE(500)
TEXT('System Admin Class')
Create the subsystem description.
CRTSBSD SBSD(*LIBL/ADMSBS)
POOLS((*N *BASE))
TEXT('Admin Access')
Add a routing entry allowing permitted users to run OS/400 commands
ADDRTGE SBSD(*LIBL/ADMSBS)
SEQNBR(10)
CMPVAL('FSADMIN')
PGM(QCMD)
Add a routing entry that signs off users not permitted to access the
system in administrative mode
Create a program that just does a SIGNOFF command to support the routing entry. ADDRTGE SBSD(*LIBL/ADMSBS) SEQNBR(20) CMPVAL(*ANY) PGM(*LIBL/SIGNOFF)Create a Job Description with the required Routing Data to access the Admin subsystem. Permitted users should have their profiles modified to use JOBD *LIBL/SYSADMIN or a suitable alternative.
CRTJOBD JOBD(*LIBL/SYSADMIN)
RTGDTA(FSADMIN)
Add a routing entry to QINTER to ensure users can also access the normal
interactive subsystem correctly if it is active
ADDRTGE SBSD(QSYS/QINTER)
SEQNBR(100)
CMPVAL('FSADMIN')
PGM(QCMD)
I have set up something similar at a few places.
Regards
Evan Harris
At 08:55 a.m. 7/02/2006, you wrote:
ADDWSE SBSD(*LIBL/ITINTER)
WRKSTN(IT*)
AT(*SIGNON)
ADDWSE SBSD(*LIBL/QINTER)
WRKSTN(IT*)
AT(*ENTER)
then name all of your IT display devices starting with IT and they will
be allocated to the new subsystem at the signon screen.
There is much more in setting up a interactive subsystem that just what
is listed here. If you never have set one up, print out the QINTER
subsystem description and read, read, read.
DSPSBSD SBSD(QINTER)
OUTPUT(*PRINT)
Christopher Bipes
Information Services Director
CrossCheck, Inc.
707.586.0551, ext. 1102
707.585.5700 FAX
Chris.Bipes@xxxxxxxxxxxxxxx
www.Cross-Check.com
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
