Separate Subsystems for MIS users

Not sure how you expect to know the specific device name for the two users
in question, since QPADEV* are randomly selected.  On the other hand, a
Telnet user exit can do this in a snap.  There is some sample code out at
the Tech Studio link at
http://www.as400.ibm.com/tstudio/tech_ref/tcp/indexfr.htm.  This comes with
some programs to create sub-systems to "route" users that have a specific
device name (or rather, "root" name) and route them to any subsystem you
wish.  If you read through the code, it shows how to set it up.

You're not going to be able to get this to work with QPADEV* system
selected names, so you need to assign the names to the two users in
question and set up the subsystem with a WSE entry to route those devices
there.  You will also need to modify QINTER with an exclusion entry, to
keep users from gettting routed there too.

Look at the ADDSBS QCLSRC in the sample code for details.

> Date: Sat, 04 Jul 1998 00:50:28 -0400
> From: Jim Welsh <jimwelsh@ix.netcom.com>
> Subject: Seperate Subsystems for MIS users 
> 
> Hi
> 
> Anyone have some examples of a routing entry program that will route two
> QPADEV* users in the MIS department into a seperate interactive
> subsystem ( MISINTER )...
> 
> Once we get the device id naming working with v4r2 I imagine we can just
> use ADDWSE
> 
> The reason for doing this of course is so we can stay active when Qinter
> is ended.
> 
> Sound like a plan ? Any ideas ?
> 
> tia
> 
> - --
> Jim Welsh
> http://www.netcom.com/~jimwelsh/welcome/welcome.html
> mailto:jimwelsh@ix.netcom.com

-- 
J.S. (Jeffrey) Stevens      AS/400 TCP/IP          (Telnet/WSG/LPD)
Work:  jssteven@us.ibm.com        Personal:  jstevens@stny.lrun.com

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---