Ron Wells wrote:
> yes---thanks all----found that setting INTIDS and UNKNIDS to (Y) and also 
> removing a definition in the CICS console definitions
>
> anyone have any examples to consoles...thinkg of making them all the 
> same---across sysplex
>
> ----------------------------------------------------------------------
> Email Disclaimer
> This  E-mail  contains  confidential  information  belonging to the sender, 
> which  may be legally privileged information.  This information is intended 
> only  for  the use of the individual or entity addressed above.  If you are 
> not  the  intended  recipient, or  an  employee  or  agent responsible for 
> delivering it to the intended recipient, you are hereby notified that any 
> disclosure,  copying, distribution, or the taking of any action in reliance 
> on the contents of the E-mail or attached files is strictly prohibited.
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>   
I played around with something like this;

INIT     MLIM(5000) LOGLIM(5000) RLIM(50) MPF(00) UEXIT(Y)
AMRF(00)         
         CMDDELIM(;) CTRACE(CTIOPS00) CNGRP(NO)
MMS(NO)                     
        
APPLID(SMCS&SYSNAME.)                                              
HARDCOPY DEVNUM(SYSLOG,OPERLOG) OUTCODE(1-10,12-128)
CMDLEVEL(CMDS)         
        
HCFORMAT(CENTURY)                                                  
DEFAULT  ROUTCODE(1-10,12-128) HOLDMODE(YES) LOGON(OPTIONAL)
RMAX(99)       
CONSOLE  DEVNUM(/0160) UNIT(3270-X) AUTH(MASTER) USE(FC)
LEVEL(ALL)         
         NAME(&SYSNAME.0160) CON(N) DEL(RD) SEG(20) RNUM(14)
RBUF(5)        
         RTME(001) MFORM(T,J,S) MSCOPE(&SYSNAME.)
SYSTEM(&SYSNAME.)         
         ROUTCODE(1,2,4,6-10) INTIDS(Y)
UNKNIDS(Y)                          
CONSOLE  DEVNUM(/0161) UNIT(3270-X) AUTH(MASTER) USE(FC)
LEVEL(ALL)         
         NAME(&SYSNAME.0160) CON(N) DEL(RD) SEG(20) RNUM(14)
RBUF(5)        
         RTME(001) MFORM(T,J,S) MSCOPE(&SYSNAME.)
SYSTEM(&SYSNAME.)         
         ROUTCODE(1,2,4,6-10) INTIDS(Y) UNKNIDS(Y)   
CONSOLE  DEVNUM(SUBSYSTEM) NAME(&SYSNAME.SS1) AUTH(ALL)      
CONSOLE  DEVNUM(SUBSYSTEM) NAME(&SYSNAME.SS2) AUTH(ALL)      
CONSOLE  DEVNUM(SUBSYSTEM) NAME(&SYSNAME.SS3) AUTH(ALL)      
CONSOLE  DEVNUM(SUBSYSTEM) NAME(&SYSNAME.SS4) AUTH(ALL)      
CONSOLE  DEVNUM(SUBSYSTEM) NAME(&SYSNAME.SS5) AUTH(ALL)      
CONSOLE  DEVNUM(SUBSYSTEM) NAME(&SYSNAME.SS6) AUTH(ALL)      
CONSOLE  DEVNUM(SUBSYSTEM) NAME(&SYSNAME.SS7) AUTH(ALL)      
CONSOLE  DEVNUM(SMCS) NAME(&SYSNAME.SMC1) AUTH(MASTER) LOGON(REQUIRED) 
         ROUTCODE(1-10,12-128) MSCOPE(&SYSNAME.) SYSTEM(&SYSNAME.)     
CONSOLE  DEVNUM(SMCS) NAME(&SYSNAME.SMC2) AUTH(MASTER) LOGON(REQUIRED) 
         ROUTCODE(1-10,12-128) MSCOPE(&SYSNAME.) SYSTEM(&SYSNAME.)     
CONSOLE  DEVNUM(SMCS) NAME(&SYSNAME.SMC3) AUTH(MASTER) LOGON(REQUIRED) 
         ROUTCODE(1-10,12-128) MSCOPE(&SYSNAME.) SYSTEM(&SYSNAME.)     
CONSOLE  DEVNUM(SMCS) NAME(&SYSNAME.SMC4) AUTH(MASTER) LOGON(REQUIRED) 
         ROUTCODE(1-10,12-128) MSCOPE(&SYSNAME.) SYSTEM(&SYSNAME.)     

-- 
Mark Jacobs
Time Customer Service
Tampa, FL
----

In accordance to the principles of Doublethink, it 
does not matter if the war is not real, or when it 
is, that victory is not possible. The war is not 
meant to be won. It is meant to be continuous.

The essential act of modern warfare is the destruction 
of the produce of human labor. A hierarchical society 
is only possible on the basis of poverty and ignorance. 
In principle, the war effort is always planned to
keep society on the brink of starvation. The war is waged 
by the ruling group against its own subjects. And its 
object is not victory over Eurasia or Eastasia, but to 
keep the very structure of society intact.

George Orwell - 1984

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to