RE: interactive subsystem creation -- MIDRANGE-L

How about adding a workstation entry to QINTER for these devices that
need excluding with 'Control job at *ENTER'

Regards
Andy 

|-----Original Message-----
|From: Neil Palmer [mailto:neilp@xxxxxxxxxxx]
|Sent: 03 September 2003 02:30
|To: Midrange Systems Technical Discussion
|Subject: Re: interactive subsystem creation
|
|One method.  You will need the ADDWSE PCKATO* for your new subsystem
with
|AT(*SIGNON).  You need to remove the *ALL Workstation Entry from
QINTER,
|but this may entail adding a whole host of other wild card names to
pick
|up other devices not to be allocated to your new subsystem (A* B* C* D*
|etc. - and handling devices other than PCKATO* beginning with P will be
|fun).  Or possibly you could use type entries, if all devices in
MYINTER
|are a specific type that are not used in QINTER.
|
|Or, if the user profiles used at the PCKATO* workstations are unique,
you
|could add a TFRJOB to the initial program for the user profile to route
to
|the new subsystem.
|
|...Neil
|
|
|
|
|mwilk@xxxxx
|Sent by: midrange-l-bounces@xxxxxxxxxxxx
|2003/09/02 12:05
|
|
|
|To
|midrange-l@xxxxxxxxxxxx
|cc
|
|Subject
|interactive subsystem creation
|
|
|
|
|
|
|Hello everybody!
|
|I had to create interactive subsystem that grabs all devices which name
|starts with a string PCKATOxx. "xx" is a combination of characters eg.
|PCKATO12, PCKATOAP.
|
|I did it using following commands:
|
|CRTSBSD SBSD(QGPL/MYINTER) POOLS((1 *BASE) (2 *INTERACT)) AUT(*USE)
|TEXT(?WILK Interactive Subsystem?)
|CRTJOBD JOBD(QGPL/MYINTER) RTGDTA(QCMDI) LOG(4 0 *NOLIST) TEXT(?WILK
|Interactive Subsystem Job Description?)
|CRTJOBQ JOBQ(QGPL/MYINTER) TEXT(?WILK Interactive Subsystem Job Queue?)
|ADDJOBQE SBSD(QGPL/MYINTER) JOBQ(QGPL/MYINTER) MAXACT(*NOMAX)
|ADDCMNE SBSD(QGPL/MYINTER) DEV(PCKATO*)
|CRTCLS CLS(QGPL/MYINTER) RUNPTY(20) TIMESLICE(2000) DFTWAIT(30)
TEXT(?WILK
|
|Interactive Subsystem Class?)
|ADDRTGE SBSD(QGPL/MYINTER) SEQNBR(9999) CMPVAL(*ANY) PGM(QSYS/QCMD)
|POOLID(2) CLS(QGPL/MYINTER)
|
|STRSBS SBSD(QGPL/MYINTER)
|
|Unfortunately it doesn't grap devices PCKATOXX.
|Should I use following command to map the system do interesting
devices:
|ADDWSE SBSD(QGPL/MYINTER) WRKSTN(PCKATO*)    ?
|
|Do I need to modify any of QINTER subsystem paramters? If yes please
tell
|me.
|
|I will be very gratefull for any suggestions and help.
|Thank you in advance.
|
|Best Regards.
|
|Marcin Wilk
|
|
|
|
|_______________________________________________
|This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
|To post a message email: MIDRANGE-L@xxxxxxxxxxxx
|To subscribe, unsubscribe, or change list options,
|visit: http://lists.midrange.com/mailman/listinfo/midrange-l
|or email: MIDRANGE-L-request@xxxxxxxxxxxx
|Before posting, please take a moment to review the archives
|at 
http://archive.midrange.com/midrange-l.--------------------------------------------------------
 
FormaServe Systems Ltd 
91 Redland Drive 
Loughton 
Milton Keynes 
Bucks  UK 
MK5 8FL 
 
T: +44 (0)1908 609500 
W:www.formaserve.co.uk 
E: Info@xxxxxxxxxxxxxxxx 
--------------------------------------------------------
 
 
This message (and any associated files) is intended only for the use of 
midrange-l@xxxxxxxxxxxx and may contain information that is confidential, 
subject to copyright or constitutes a trade secret.  
If you are not midrange-l@xxxxxxxxxxxx you are hereby notified that any 
dissemination, copying or distribution of this message, or files associated 
with this message, is strictly prohibited.  
If you have received this message in error, please notify us immediately by 
replying to the message and deleting it from your computer.  
Messages sent to and from us may be monitored.  
Any views or opinions presented are solely those of Andy Youens and do not 
necessarily represent those of FormaServe Systems. 
 
 
 
 
 
 
 
--------------------------------------------------------