Tivoli Header

Quick Start


Configuring TSO Administrative Client Using APPC

  1. In the SYS1.PARMLIB dataset, create the APPC/MVS configuration members, APPCPMxx and ASCHPMxx. See Figure 23 through Figure 27.

    Note that APPCPMxx does not need to define the LU of the server application nor does it require a transaction program (TP) in the MVS APPCTP repository. This is because TSM uses the VTAM record level API rather than the APPC/MVS.

    Figure 23 shows the APPCPMxx statements used to define an APPC/MVS configuration.

    Figure 23. APPCPMxx Parmlib Member


    /***                            ***/
    /* This is an example using APPCPMxx statements to define an          */
    /* APPC/MVS configuration.                                            */
    /*                                                                    */
    /* APPCPMxx parmlib members contain startup, default, and             */
    /* customization values for APPC/MVS. They also contain               */
    /* information indicating the correspondence between                  */
    /* logical unit(LU) names and transaction schedulers.                 */
    /*                                                                    */
    /* This member illustrates the use of the LUADD, LUDEL, and           */
    /*   SIDEINFO statement types, in context.                            */
    /***                            ***/
      LUADD ACBNAME(A4VAPPC) /* SPECIFY THE NAME OF THE LU TO BE    */
                             /* added - generic LU.                 */
          BASE               /* This is the default LU for          */
                             /* outbound requests.                  */
          TPDATA(SYS1.APPCTP)/* Specify the TP profile repository.  */
                             /*                                     */
          TPLEVEL(SYSTEM)    /* TPLEVEL(SYSTEM) is the default.     */
                             /* OTHER VALUES COULD BE SPECIFIED.    */
       SIDEINFO              /* Specify that VSAM data set          */
         DATASET(SYS1.APPCSI)/* SYS1.APPCSI is the permanent        */
                             /* repository for the side information.*/
    

    Figure 24 shows the sample IDCAMS job to create the dataset SYS1.APPCTP.

    Figure 24. Sample JCL for TP Create (SYS1.APPCTP)


    //APPCTP      EXEC PGM=IDCAMS
    //SYSPRINT    DD   SYSOUT=*
    //SYSIN       DD   *
        DEFINE CLUSTER -
            (NAME(SYS1.APPCTP) -
            VOLUMES(JTFASH) -
            INDEXED REUSE -
            SHAREOPTIONS(3 3) -
            RECORDSIZE(3824 7024) -
            KEYS(112 0) -
            RECORDS(300 150))
    

    Figure 25 shows the sample IDCAMS job to create the dataset SYS1.APPCSI.

    Figure 25. Sample JCL for SI Create (SYS1.APPCSI)


    //APPCSI      EXEC PGM=IDCAMS
    //SYSPRINT    DD   SYSOUT=*
    //SYSIN       DD   *
        DEFINE CLUSTER -
            (NAME(SYS1.APPCSI) -
            VOLUMES(JTFASH) -
            INDEXED REUSE -
            SHAREOPTIONS(3 3) -
            RECORDSIZE(248 248) -
            KEYS(112 0) -
            RECORDS(50 25))
    

    Figure 26 shows the VTAM LU definitions defined for an APPC/MVS configuration.

    Figure 26. Generic VTAM LU definition for APPC/MVS


    //***********
    ** MVSAPPC - VTAM LU DEFINITIONS FOR APPC/MVS   ****
    //***********
    MVSAPPL  VBUILD TYPE=APPL
    A4VAPPC  APPL  APPC=YES,                                               X
                   ABCNAME=A4VAPPC,                                        X
                   AUTOSES=0,                                              X
                   DDRAINL=NALLOW,                                         X
                   DRESPL=NALLOW,                                          X
                   EAS=32,                                                 X
                   MODETAB=TPOMODE,                                        X
                   SECACPT=CONV,                                           X
                   SRBEXIT=YES,                                            X
                   VERIFY=NONE
     
    

    Figure 27 shows the ASCHPMxx statements used to define an APPC/MVS configuration.

    Figure 27. ASCHPMxx Parmlib Member


    CLASSADD CLASSNAME(A)
         MAX(6)
         MIN(2)
         RESPGOAL(0.5)
         MSGLIMIT(500)
    CLASSADD CLASSNAME(FAST)
         MAX(6)
         MIN(2)
         RESPGOAL(0.02)
         MSGLIMIT(500)
    CLASSADD CLASSNAME(SLOW)
    OPTIONS DEFAULT(SLOW)
         SUBSYS(JES2)
    TPDEFAULT REGION(4M)
         TIME(10,30)
         MSGLEVEL(1,1)
         OUTCLASS(X)
    
  2. Create a job for the server's side information record in SYS1.APPCSI. See Figure 28.

    Figure 28. Sample Job


    //TSOUSER  JOB ,TSOUSER,MSGCLASS=X,
    //         PRTY=5
    //TPINFO   EXEC PGM=ATBSDFMU
    //SYSPRINT DD SYSOUT=*
    //SYSSDOUT DD SYSOUT=*
    //SYSSDLIB DD DISP=SHR,DSN=SYS1.APPCSI
    //SYSIN    DD *
     SIDELETE
           DESTNAME(TOTIVSM2)     <=== ensure it is not there yet
     SIADD
           DESTNAME(TOTIVSM2)     <=== symbolic destination name in dsm.opt
           TPNAME(DUMMY)         <=== any name you wish
           MODENAME(TSMAPPC)    <=== mode name
           PARTNER_LU(A4VTSM2)  <=== Partner LU
     SIRETRIEVE
           DESTNAME(TOTIVSM2)
    
  3. Insert the following lines into your TSO administrative client's option file:
    +--------------------------------------------------------------------------------+
    |commmethod snalu6.2                                                             |
    |symbolicdestination totivsm2  <== the name defined in MVS SI record             |
    +--------------------------------------------------------------------------------+
  4. Create a CLIST to start the TSM TSO administrative client and name the CLIST ANSADM. See Figure 29.

    Figure 29. Sample CLIST


    PROC 0
    PROFILE PROMPT
    CONTROL NOLIST NOCONLIST MSG FLUSH PROMPT
    /* it is important to include the parameter "PROMPT" */
    /* in the PROFILE and CONTROL statements to allow                  */
    /* DSMADMC (TSO Admin Client module) to prompt for                 */
    /* input (e.g. PASSWORD).                                          */
    ALLOC F(DSCOPT) DA('TIVSM.TSOADMIN.OPTIONS') SHR REUSE
    ALLOC F(DSCLANG) DA('TIVSM.SANSMSG(ANSMENU)') SHR REUSE
    CALL 'SYS1.LINKLIB(DSMADMC)'
    FREE F(DSCOPT DSCLANG )
    
  5. Ensure APPC/MVS is available before starting the TSM TSO administrative client. Then, enter the following commands:
    +--------------------------------------------------------------------------------+
    |S APPC,SUB=MSTR                                                                 |
    |S ASCH,SUB=MSTR                                                                 |
    +--------------------------------------------------------------------------------+
  6. To start the TSO administrative client, enter the TSO command EX (ANSADM) or DSMADMC. For DSMADMC to execute properly, the ANSPROC procedure must have executed at TSO logon. See Starting the TSO Administrative Client for information about ANSPROC.


[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]