Resources

Home   News   Version 1   Tech Support   Pubs   S2K Site Map



SYSTEM 2000 R12.1 Installation Instructions


SYSTEM 2000 for Basic, Multi-User, CICS Interface and QueX Software, Release 12.1 under MVS


Table of Contents

Chapter 1 - Introduction

Chapter 2 - Base Installation


Chapter 3 - Multi-User Installation


Chapter 4 - CICS Installation


Chapter 5 - QueX Installation


Chapter 6 - Base Validation


Chapter 7 - Multi-User Validation


Chapter 8 - CICS Validation


Chapter 9 - QueX Validation

Chapter 10 - SYSTEM 2000 Maintenance

Appendix A - Installation Checklist

Appendix B - Library S2K.R121.LOAD

Appendix C - Library S2K.R121.SOURCE

Appendix D - Library S2K.R121.CNTL

Appendix E - Library S2K.R121.VALID


Chapter 1 - Introduction

This document describes the steps necessary to install and validate the four SYSTEM 2000(R) software products: the basic SYSTEM 2000 software, the Multi-User(TM) software, the CICS Interface, and the QueX(TM) software. All licensed software products are included on your delivery media if they were ordered at the same time.

To install the products you have licensed, you will prepare job JCLGENER to retrieve job JCLINST from the media, and then edit that job to delete any unlicensed products before unloading the media.

After installation, you will run tests to validate operation of the licensed products.

Please review all the installation steps before executing any of them. Contact the Austin Technical Support Department if you have questions about installation.

When you have installed the Release 12.1 software, you will have the following disk data sets:


File    3380 Space     Physical Characteristics and Description


 1      20 cylinders   DSN=S2K.R121.LOAD
                       LRECL=UND     RECFM=U
                       BLKSIZE=7294  DSORG=PO

                       LOAD library containing overlays and accessory
                       modules to link and execute SYSTEM 2000 software;
                       also contains non-overlaid executable modules
                       SYS2K and S2KPLI.
                       A description of each module is in Appendix B.

 2      20 cylinders   DSN=S2K.R121.SOURCE
                       LRECL=80     RECFM=FB
                       BLKSIZE=6160 DSORG=PO

                       Installation JCL, macros, validation programs,
                       command files, data files, and source routines.
                       A description of each member is in Appendix C.

 3      2 cylinders    DSN=S2K.R121.CNTL
                       LRECL=80     RECFM=FB
                       BLKSIZE=6160 DSORG=PO

                       Data set allocated at installation time to
                       contain all generated JCL.  This file is not on
                       the delivery media.  A description of each member
                       is in Appendix D.

 4      1 cylinder     DSN=S2K.R121.VALID
                       LRECL=132     RECFM=FBA
                       BLKSIZE=1320  DSORG=PO

                       Expected output from validation tests.  A
                       description of each member is in Appendix E.

Top of Document   Top of Chapter

Chapter 2 - Base Installation

UNLOAD AND CATALOG MEDIA CONTENTS

Below is the JCL to copy the data set S2K.R121.JCLINST from media to disk.

Illus. 2.1     JCLGENER

//JCLGENER JOB
//*----------------MODIFY JOB CARD AS NEEDED----------------
//**********************************************************
//* COPY JCLINST FILE FROM DELIVERY TAPE
//**********************************************************
//*
//COPY     EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=A
//SYSUT1   DD  DSN=S2K.R121.JCLINST,DISP=OLD,LABEL=(1,SL),
//            UNIT=CART,VOL=SER=XXXXXX,
//            DCB=(DEN=4,LRECL=80,BLKSIZE=6160,RECFM=FB)
//SYSUT2   DD  DSN=S2K.R121.JCLINST,DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,SPACE=(TRK,(1,1))
//SYSIN    DD  DUMMY
//*
When job JCLINST (Illus. 2.2) is edited and executed, the SYSTEM 2000 libraries are preallocated, cataloged with IEFBR14, and populated with the delivery media contents using the IEBCOPY utility. The job copies to disk the products licensed by your site.
Illus. 2.2     JCLINST

//JCLINST JOB
//*----------------MODIFY JOB CARD AS NEEDED----------------
//**********************************************************
//* ALLOCATE NEW S2K.R121 DATA SETS
//**********************************************************
//NEWALLOC EXEC PGM=IEFBR14
//LOAD     DD DSN=S2K.R121.LOAD,
//         DISP=(NEW,CATLG),
//         SPACE=(CYL,(20,0,70)),
//         DCB=(DSORG=PO,RECFM=U,BLKSIZE=7294),
//         UNIT=DISK,VOL=SER=XXXXXX  <==**VERIFY**
//SOURCE   DD DSN=S2K.R121.SOURCE,
//         DISP=(NEW,CATLG),
//         SPACE=(CYL,(20,0,70)),
//         DCB=(DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=6160),
//         UNIT=DISK,VOL=SER=XXXXXX  <==**VERIFY**
//CNTL     DD DSN=S2K.R121.CNTL,
//         DISP=(NEW,CATLG),
//         SPACE=(CYL,(2,0,70)),
//         DCB=(DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=6160),
//         UNIT=DISK,VOL=SER=XXXXXX  <==**VERIFY**
//VALID    DD DSN=S2K.R121.VALID,
//         DISP=(NEW,CATLG),
//         SPACE=(CYL,(1,1,70)),
//         DCB=(DSORG=PO,RECFM=FBA,LRECL=132,BLKSIZE=1320),
//         UNIT=DISK,VOL=SER=XXXXXX  <==**VERIFY**
//*
//**********************************************************
//*  COPY MEDIA CONTENTS TO DISK
//**********************************************************
//LOADALL  EXEC PGM=IEBCOPY
//SYSPRINT DD  SYSOUT=A
//SYSUT3   DD  UNIT=RIO,SPACE=(TRK,(50))
//SYSUT4   DD  UNIT=RIO,SPACE=(TRK,(50))
//**********************************************************
//* DISK DATA SETS
//**********************************************************
//OUTLOAD  DD  DSN=S2K.R121.LOAD,DISP=OLD
//OUTSOURC DD  DSN=S2K.R121.SOURCE,DISP=OLD
//OUTVAL   DD  DSN=S2K.R121.VALID,DISP=OLD
//**********************************************************
//* CART DATA SETS
//**********************************************************
//INLOAD   DD  DSN=S2K.R121.LOAD,UNIT=CART,DISP=OLD,
//             LABEL=(02,SL),VOL=SER=123456
//INSOURCE DD  DSN=S2K.R121.SOURCE,UNIT=AFF=INLOAD,DISP=OLD,
//             LABEL=(03,SL),VOL=REF=*.INLOAD
//INVAL    DD  DSN=S2K.R121.VALID,UNIT=AFF=INLOAD,DISP=OLD,
//             LABEL=(04,SL),VOL=REF=*.INLOAD
//INMLOAD  DD  DSN=S2K.R121MU.LOAD,UNIT=AFF=INLOAD,DISP=OLD,
//             LABEL=(05,SL),VOL=REF=*.INLOAD
//INMSOURC DD  DSN=S2K.R121MU.SOURCE,UNIT=AFF=INLOAD,DISP=OLD,
//             LABEL=(06,SL),VOL=REF=*.INLOAD
//INTOOLS  DD  DSN=S2K.R121.SAMPLIB,UNIT=AFF=INLOAD,DISP=OLD,
//             LABEL=(07,SL),VOL=REF=*.INLOAD
//INCLOAD  DD  DSN=S2K.R121CICS.LOAD,UNIT=AFF=INLOAD,DISP=OLD,
//             LABEL=(08,SL),VOL=REF=*.INLOAD
//INCSRC   DD  DSN=S2K.R121CICS.SOURCE,UNIT=AFF=INLOAD,DISP=OLD,
//             LABEL=(09,SL),VOL=REF=*.INLOAD
//INQLOAD  DD  DSN=S2K.R121QUEX.LOAD,UNIT=AFF=INLOAD,DISP=OLD,
//             LABEL=(10,SL),VOL=REF=*.INLOAD
//INQSOURC DD  DSN=S2K.R121QUEX.SOURCE,UNIT=AFF=INLOAD,DISP=OLD,
//             LABEL=(11,SL),VOL=REF=*.INLOAD
//SYSIN    DD  *
       COPY OUTDD=OUTLOAD,INDD=((INLOAD,R))
       COPY OUTDD=OUTSOURC,INDD=((INSOURCE,R))
       COPY OUTDD=OUTVAL,INDD=((INVAL,R))
       COPY OUTDD=OUTLOAD,INDD=((INMLOAD,R))
       COPY OUTDD=OUTSOURC,INDD=((INMSOURC,R))
       COPY OUTDD=OUTSOURC,INDD=((INTOOLS,R))
       COPY OUTDD=OUTLOAD,INDD=((INCLOAD,R))
       COPY OUTDD=OUTSOURC,INDD=((INCSRC,R))
       COPY OUTDD=OUTLOAD,INDD=((INQLOAD,R))
       COPY OUTDD=OUTSOURC,INDD=((INQSOURC,R))
/*
//*

Top of Document   Top of Chapter

EDIT AND RUN JOB JCLS2KIV

You begin installation by completing the installation checklist shown in Appendix A. Then use the values you supply on the checklist to code the S2KIVJCL macro. The macro is part of job JCLS2KIV, which is on your SYSTEM 2000 SOURCE library (Illus. 2.3). The job assembles the macro and generates the jobs to run the remaining installation and validation procedures.

To expedite coding and job submission, the parameters in the job are supplied in the order they appear on the checklist.

The ASM step in this job creates IEBUPDTE input. When the UPDATE step of the job is executed, generated jobs are sent to the CNTL library you specify for the JCLOUT parameter; any identically named members on that PDS will be replaced. You may need to supply the appropriate library names for the MAC and JCLOUT parameters.

Illus. 2.3     JCLS2KIV

//JCLS2KIV JOB
//************************************************************
//* CREATE TAILORED INSTALLATION JCL
//************************************************************
//*
//GENJCL   PROC MAC='S2K.R121.SOURCE',
//         JCLOUT='S2K.R121.CNTL',
//         UNIT=SYSDA,SYSOUT=A
//ASM      EXEC  PGM=IEV90,
//             PARM='DECK,NOOBJ'
//SYSUT1   DD  UNIT=&UNIT,SPACE=(1700,(600,100))
//SYSUT2   DD  UNIT=&UNIT,SPACE=(1700,(300,50))
//SYSUT3   DD  UNIT=&UNIT,SPACE=(1700,(300,50))
//SYSLIB   DD  DSN=&MAC,DISP=SHR
//SYSPRINT DD  SYSOUT=&SYSOUT,DCB=BLKSIZE=1089
//SYSTERM  DD  SYSOUT=&SYSOUT
//SYSPUNCH DD  DSN=&&S2KIV,UNIT=&UNIT,SPACE=(TRK,(10,5)),
//            DISP=(,PASS)
//*
//************************************************************
//* PLACE THE JOBS CREATED IN THE ASSEMBLY STEP
//* INTO THE PDS IDENTIFIED BY THE JCLOUT DSN.
//************************************************************
//*
//UPDATE   EXEC PGM=IEBUPDTE,PARM=NEW,COND=(4,LT,ASM)
//SYSPRINT DD  SYSOUT=&SYSOUT
//SYSUT2   DD  DISP=SHR,DSN=&JCLOUT
//SYSIN    DD  DSN=&&S2KIV,DISP=(OLD,DELETE),UNIT=SYSDA
//         PEND
//*
//         EXEC GENJCL
//SYSIN    DD  *
S2KIVJCL S2KIVJCL JOBINFO='',                                          X
               ACTINFO=(),                                             X
               JCL1=,                                                  X
               JCL2=,                                                  X
               JCL3=,                                                  X
               JCL4=,                                                  X
               LOAD=S2K.R121.LOAD,                                     X
               CNTL=S2K.R121.CNTL,                                     X
               SOURCE=S2K.R121.SOURCE,                                 X
               VALID=S2K.R121.VALID,                                   X
               DBIND=S2K.R121,                                         X
               DBVOL=,                                                 X
               DBUNIT=SYSDA,                                           X
               DBBLK=6216,                                             X
               SYSOUT=A,                                               X
               PROCLIB=SYS3.PROCLIB,                                   X
               SYSPROC=SYS3.CMDPROC,                                   X
               SYSHELP=SYS3.HELP,                                      X
               SU11=REUSE,                                             X
               SUMU=SU,                                                X
               FREE=NO,                                                X
               WRKUNIT=SYSDA,                                          X
               LINKPGM=IEWL,                                           X
               ASMPGM=IEV90,                                           X
               COBPGM=IKFCBL00,                                        X
               FORTPGM=FORTVS,                                         X
               PL1PGM=IEL0AA,                                          X
               LANG=FTN3,                                              X
               PARMS=NLPARM,                                           X
               BASE=YES,                                               X
               MUP=YES,                                                X
               ACTIND=S2K.R121.ACCOUNT,                                X
               ACTVOL=,                                                X
               ACTNBR=1000,                                            X
               ACTUNIT=SYSDA,                                          X
               ACTBLK=9076,                                            X
               SVCNUM=,                                                X
               XMS=YES,                                                X
               AUTH=S2K.R121.AUTH,                                     X
               S2KCOM=S2K.R121.COM,                                    X
               XMSVOL=,                                                X
               CICS=YES,                                               X
               CICSVER=3,                                              X
               S2KLIB=S2K.CICS.S2KLIB,                                 X
               CICSMAC=CICS.MACLIB,                                    X
               CICSLOAD=CICS.LOADLIB,                                  X
               CICSCOB=CICS.COBLIB,                                    X
               CICSPL1=CICS.PL1LIB,                                    X
               COBLIB=SYS1.COBLIB,                                     X
               PL1LIB=SYS1.PLIBASE,                                    X
               PRELOAD=,                                               X
               SYS1MAC=SYS1.MACLIB,                                    X
               SYS1MOD=SYS1.MODGEN,                                    X
               QUEX=YES
         END
//*

Top of Document   Top of Chapter

SET UP PROC, CLIST, AND HELP LIBRARIES

Once the base SYSTEM 2000 installation is complete, you may want to move the Institute-supplied procs, CLISTs, and help files, described below, into your production libraries. Job JCLPROCL is supplied for this purpose; it assumes you generated these members on your CNTL library. Refer to the members themselves and to their corresponding help files for detailed information about CLIST and PROC execution.

The CLISTs generated on your CNTL library are as follows:

GENIUS     Executes the Genius validation CLISTs.

QUEX       Executes the QueX software.

QUVB       Executes the QueX User View Builder.

S2K        Allocates SYSTEM 2000 files and executes SYSTEM 2000
           software.  Files are allocated only when S2K CLIST is called
           by SASS2K CLIST.  Execution may be either Multi-User or
           single-user.

S2KFRDB    Frees database files; called by S2KFREE CLIST when DBN
           parameter is specified.

S2KFREE    Frees all files allocated to SYSTEM 2000 software; called by
           S2K CLIST when FREE is specified.
Corresponding on-line TSO help files that describe the above CLISTs (except S2KMODEL) are generated on your CNTL library. After they are moved to your system help library, enter "HELP <CLIST name>" to display information about a CLIST.

The batch JCL procs generated on your CNTL library are as follows:

S2KMU      Executes batch Multi-User interface SYS2KJOB.

S2KSU      Executes single-user SYSTEM 2000 software; allocates all
           files except database files.
For SAS access to SYSTEM 2000 software, you need to make minor changes to your SAS CLIST and to your SAS PROC. The SASS2K CLIST and SASS2KP PROC on your CNTL library should be merged with your SAS CLIST and SAS PROC in order to make SYSTEM 2000 available.

The CLIST modifications are keyword parameters and ALLOC statement additions for: the SYSTEM 2000 LOAD library, the S2KCOM file, and the S2KPARMS file. Also, S2KLOAD should be added to your TASKLIB statement.

The PROC modifications are the addition of keyword parameters for the SYSTEM 2000 LOAD library and the S2KCOM file. S2KLOAD should be included in your STEPLIB concatenation. Also, you need DD statements for the S2KCOM, S2KPARMS, and S2KDEFC files.

Top of Document   Top of Chapter

Chapter 3 - Multi-User Installation

If you received a combined installation package containing the base SYSTEM 2000 software as well as the Multi-User software, you must first install the base SYSTEM 2000 software. Then proceed with the instructions below.

Top of Document   Top of Chapter

ASSIGN SVC SLOT FOR XMS MULTI-USER

If you are installing SVC Multi-User, follow the instructions on page 3-5. If you are installing XMS Multi-User, simply assign any user SVC slot from the valid range of 200 through 255; the SVC does not need to be of a particular type. You specify the SVC number when you code SVCNUM= in the S2KIVJCL macro.

Top of Document   Top of Chapter

APPLY ZAP FOR XMS MULTI-USER SVC NUMBER

In order to indicate that you are running XMS Multi-User software, you must run job JCLZAP (Illus. 3.1) to zap the appropriate SVC number in CSECT S2KCMC and to zap the CSECT SVCADR in all Multi-User interfaces. When Multi-User software is initialized, the control program S2KCMC puts the entry point of S2KPC into the system SVC table, where all address spaces can access the SVC number. S2KCMC also writes the SVC number to the S2KCOM file, which is read by the interfaces, so that Multi-User communication is established. See the Product Support Manual for more information about S2KCMC execution.
Illus. 3.1     JCLZAP

//JCLZAP JOB (ACTINFO),
//      USERID,TIME=(1)
//*
//************************************************************
//* APPLY ZAP FOR MULTI-USER SVC NUMBER
//************************************************************
//*
//ZAP      PROC SYSOUT=A
//ZAP      EXEC PGM=IMASPZAP,PARM='IGNIDRFULL'
//SYSPRINT DD  SYSOUT=&SYSOUT
//SYSLIB   DD  DSN=S2K.R121.LOAD,DISP=SHR
//       PEND
//*
//************************************************************
//* APPLY ZAP FOR MULTI-USER SVC NUMBER
//************************************************************
//*
//ZAP      EXEC  ZAP
//SYSIN    DD   *
*
*  ZAP CARDS FOR XMS SYSTEM 2000
*
 NAME SYS2KJOB SVCADR
 REP 0008 07010701
 NAME S2KDMV6 SVCADR
 REP 0008 07010701
 NAME S2OP SVCADR
 REP 0008 07010701
 NAME MUPLINT  SVCADR
 REP 0008 07010701
 NAME CLEARS2K SVCADR
 REP 0008 07010701
 NAME S2K00    SVCADR
 REP 0008 07010701
 NAME S2000    SVCADR
 REP 0008 07010701
 NAME SYS2KTPI SVCADR
 REP 0008 07010701
 NAME S2KSIP   SVCADR
 REP 0008 07010701
 NAME SYS2K    SVCADR
 REP 0008 07010701
 NAME S2KXBUF  SVCADR
 REP 0008 07010701
 NAME S2KCMC   S2KCMC
 REP 000A 00ED
//*

Top of Document   Top of Chapter

INSTALL XMS MULTI-USER CODE

Special Note: The allocation of S2KCOM for Release 12.1 is slightly different than for previous releases. To allow for CICS recovery, you must allocate this file for share option 4.

To install XMS Multi-User, run job JCLXAUTH (Illus. 3.2 on page 3-3). This job executes IEBCOPY to place the S2KCMC and S2KPC load modules into the authorized library designated by your systems programmer. It then links S2KCMC as authorized and allocates the S2KCOM file as a 30-byte permanent data set.

For sites running more than one release of SYSTEM 2000 software: S2KCMC, S2KPC and Multi-User must all be from the same SYSTEM 2000 release. If you are currently running Release 12.0 XMS Multi-User and want to run Release 12.1 XMS Multi-User, the following steps are recommended:

  1. Assign a unique SVC to Release 12.1 XMS Multi-User.

  2. Copy S2KCMC and S2KPC into a separate authorized library.

  3. Create a separate S2KCOM file for Release 12.1.
Illus. 3.2     JCLXAUTH

//JCLXAUTH JOB (ACTINFO),
//      USERID,TIME=(1)
//************************************************************
//*  COPY S2KCMC AND S2KPC TO AUTHORIZED LIBRARY
//************************************************************
//STEP1    EXEC PGM=IEBCOPY
//SYSUT3   DD   UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT4   DD   UNIT=SYSDA,SPACE=(CYL,(1,1))
//INFIL    DD   DSN=S2K.R121.LOAD,DISP=SHR
//OTFIL    DD   DSN=S2K.R121.AUTH,DISP=SHR
//SYSPRINT DD   SYSOUT=A
//SYSIN    DD   *
  COPY INDD=INFIL,OUTDD=OTFIL
 S M=((S2KCMC,,R))
 S M=((S2KPC,,R))
//************************************************************
//*  LINK S2KCMC AS AUTHORIZED
//************************************************************
//LINK     EXEC PGM=IEWL,PARM='AMODE=31,RMODE=24'
//SYSLMOD  DD   DSN=S2K.R121.AUTH,DISP=SHR
//SYSPRINT DD   SYSOUT=A
//SYSUT1   DD   UNIT=SYSDA,SPACE=(3400,(400,50))
//SYSLIB   DD   DSN=S2K.R121.AUTH,DISP=SHR
//SYSLIN   DD   *
 INCLUDE SYSLIB(S2KCMC)
 ENTRY S2KCMC
 SETCODE AC(1)
 NAME S2KCMC(R)
//************************************************************
//* ALLOCATE VSAM S2KCOM FILE
//************************************************************
//ALLOC    EXEC PGM=IDCAMS
//SYSUDUMP DD SYSOUT=A
//SYSPRINT DD SYSOUT=A
//SYSIN    DD *
 DEFINE CLUSTER -
         (NAME(S2K.R121.COM) -
         RECORDS (1,1) -
         VOLUMES(SAS834) -
         NUMBERED -
         CISZ(30) -
         RECORDSIZE(30,30) -
         REUSE -
         SHR(4) )

Top of Document   Top of Chapter

INSTALL ACCOUNTING LOG FILES

Job JCLACT (Illus. 3.3) executes ACTUTIL, the utility that allocates space for and initializes the Multi-User Accounting Log files. After Multi-User completes execution, ACTUTIL dumps the accounting records that were written to these files.
Illus. 3.3     JCLACT

//JCLACT JOB (ACTINFO),
//      USERID,TIME=(1)
//*
//************************************************************
//* INSTALL ACCOUNTING LOG
//************************************************************
//*
//BLDACT   PROC SYSOUT=A,ACTBLK=9076,
//             ACTNBR=1000,
//             ACTUNIT=SYSDA
//ACTBLK   EXEC PGM=ACTUTIL,
//             PARM='FUNCTION=BUILD,NBLOCKS=1000'
//STEPLIB  DD   DSN=S2K.R121.LOAD,DISP=SHR
//SYSPRINT DD   SYSOUT=&SYSOUT
//ACCTFILE DD   DSN=S2K.R121.ACCOUNT.&ACTFILE,
//             DISP=(NEW,CATLG,DELETE),UNIT=&ACTUNIT,
//             VOL=SER=&ACTVOL,DCB=BLKSIZE=&ACTBLK,
//             SPACE=(&ACTBLK,&ACTNBR)
//         PEND
//*
//************************************************************
//* ALLOCATE SPACE AND INITIALIZE ACCOUNTING LOG FILES
//************************************************************
//*
//         EXEC BLDACT,ACTFILE=MANX,
//            ACTVOL=SAS834,ACTUNIT=SYSDA
//         EXEC BLDACT,ACTFILE=MANY,
//            ACTVOL=SAS834,ACTUNIT=SYSDA
//*

Top of Document   Top of Chapter

SVC MULTI-USER INSTALLATION

For more information on the SVC and its parameters, see the Product Support Manual. The SYSTEM 2000 Multi-User SVC requires a Type 2 SVC slot to be installed into the nucleus before you can run Multi-User validation. If a Type 2 SVC slot is not available, then a systems programmer must make a slot available by re-GENing the system.

For MVS sites, two additional attributes are required, and only a Type 1 or Type 2 SVC can be zapped to conform to these requirements:

Refer to the section entitled "Updating the SVCTABLE" in the MVS/SP SYSTEM IPO Systems Programmer's Guide.

Run job JCLSVC on the CNTL library to generate a Type 2 SVC. This job also links the SVC with the S2KCOPY routine.

Additionally, after the SVC has been assembled, the system nucleus must be relinked to include the Multi-User SVC and S2KCOPY. Then the system must be re-IPLed to make the SVC available.

For sites running more than one release of SYSTEM 2000 software: S2KCOPY, the SVC, and Multi-User (S2000) must all be from the same SYSTEM 2000 release. For example, if you want to run Release 12.0 Multi-User and Release 12.1 Multi-User in the same operating system, then the Release 12.1 S2KCOPY must be renamed so that the Release 12.0 S2KCOPY will be used with Release 12.0 Multi-User and the Release 12.1 S2KCOPY will be used with Release 12.1 Multi-User. The following linkage editor control statement is needed before each INCLUDE card:

          CHANGE S2KCOPY(R121COPY
After assembling the SVC, include it in the SCP nucleus. Because your site systems programmer must provide and execute the job to relink the nucleus, only a sample job is shown below (Illus. 3.4). Use the standard procedures from your OS SYSGEN to link the SVC and S2KCOPY into the SCP nucleus. Linkage editor parameters normally include XREF, LIST, NCAL, RENT, and SCTR. INSERT and ORDER cards are also normally required.
Illus. 3.4     Relink the System Nucleus

//NUCLKED EXEC PGM=&LINKPGM,
//    PARM='MAP,LET,LIST,XREF,RENT,NCAL,SIZE=(164K,24K),SCTR'
//SYSUT1   DD UNIT=SYSDA,SPACE=(1024,(400,20))
//SYSPRINT DD SYSOUT=A
//SYSLMOD  DD DISP=OLD,DSN=SYS1.NUCLEUS
//OBJ      DD DISP=OLD,DSN=S2K.R121.LOAD
//SYSLIN   DD *
//    ANY NECESSARY ORDER OR INCLUDE CARDS PER STAGE 2 SYSGEN
//    REPLACE IGC255
//    INCLUDE SYSLMOD(IEANUC01)
//    INCLUDE OBJ(IGC255)
//    NAME IEANUC02
You must run job JCLZAP to zap your SVC number in CSECT SVCADR of the following modules: SYS2KJOB, S2KDMV6, S2OP, MUPLINT, CLEARS2K, S2K00, S2000, SYS2KTPI, S2KSIP, SYS2K and S2KXBUF.

If you are running the SYSTEM 2000 CICS interface you must also run job JCLCIZAP to zap your SVC number in CSECT SVCADR of the following CICS modules: PLXFRMT and S2KADRC.

These jobs contain the hex equivalent of the SVC number you specified in the SVCNUM parameter of the S2KIVJCL macro.

Top of Document   Top of Chapter

Chapter 4 - CICS Installation

INTRODUCTION

The SYSTEM 2000 CICS interface for Release 12.1 supports CICS 3.2 (and greater) as well as releases prior to CICS 3.2. The CICSVER parameter (see the installation checklist in Appendix A) causes all the necessary JCL and members to be generated for either environment.

The CICS Interface installation is divided into four sections.

Section 1 installs the complete command-level interface for all CICS environments.

Section 2 completes the command-level interface installation for CICS 3.2 (and greater).

Section 3 completes the command-level interface installation for CICS releases prior to CICS 3.2.

Section 4 installs the macro-level interface. For Release 12.1, macro-level is required to support PLEX programs that have not been precompiled with Version 12 precompilers. Sections 1 and 3 are required to perform a complete CICS interface installation.

Top of Document   Top of Chapter

SECTION 1 -- COMMAND-LEVEL INTERFACE INSTALLATION

AMODE and RMODE Requirements

The CICS interface command-level modules are delivered on the LOAD library already linked with AMODE=31 and RMODE=ANY. S2KCUSE, the CICS user routine, is the only module that must be AMODE=31 and RMODE=24; job JCLCL01 links it this way.

Your CICS PLEX programs can be in any mode. DFHCSD parameters that define programs and transactions may specify taskdataloc or datalocation as ANY or BELOW. Ensure that all programs invoked with transaction as defined as ANY are at least AMODE=31. When you assemble and link DFHPEP and DFHZNEP, ensure they are at least AMODE=31.

Top of Document   Top of Chapter

Assemble and Link CICS User Routine S2KCUSE

The job stream to assemble and link the CICS user module S2KCUSE must be run. Member JCLCL01 contains the necessary JCL. Submit this JCL for execution and review the output and condition codes. It is a good idea to print this output and save it for future reference. The sample job is shown in Illus. 4.1.

If you want to change the default parameters for S2KCUSE, see the CICS Maintenance in Chapter 10.

Illus. 4.1     JCLCL01

//JCLCL01 JOB (ACTINFO),
//    USERID,TIME=(1)
//*
//*        ASSEMBLE AND LINK ASSEMBLY PROGRAMS
//*
//CLTPASM  PROC S=NONAME,SYSOUT=A,WRKUNIT=SYSDA,
//*
//         SOURCE='S2K.R121.SOURCE',
//         LOAD='S2K.R121.LOAD',
//         SYS1MAC='SYS1.MACLIB',
//         SYS1MOD='SYS1.MODGEN',
//         CICSMAC='CICS.MACLIB'
//*
//ASM      EXEC PGM=IEV90,
//         PARM=(NODECK,LOAD)
//SYSLIB   DD DSN=&CICSMAC,DISP=SHR,DCB=BLKSIZE=32000
//         DD DSN=&SYS1MAC,DISP=SHR
//         DD DSN=&SOURCE,DISP=SHR
//         DD DSN=&SYS1MOD,DISP=SHR
//SYSUT1   DD UNIT=&WRKUNIT,SPACE=(1700,(400,50))
//SYSUT2   DD UNIT=&WRKUNIT,SPACE=(1700,(400,50))
//SYSUT3   DD UNIT=&WRKUNIT,SPACE=(1700,(400,50))
//SYSPRINT DD SYSOUT=&SYSOUT
//SYSIN    DD DSN=&SOURCE(&S),DISP=SHR
//SYSPUNCH DD DUMMY
//SYSLIN   DD DSN=&SYSOBJ,DISP=(NEW,PASS),
//         UNIT=&WRKUNIT,
//         SPACE=(1700,(1400,50))
//LKED     EXEC PGM=IEWL,
//   PARM=(MAP,LET,LIST,NCAL,'AMODE=31,RMODE=24')
//SYSLIN   DD DISP=(OLD,DELETE),DSN=&SYSOBJ
//SYSLIB   DD DSN=&LOAD,DISP=SHR
//SYSLMOD  DD DSN=&LOAD(&S),DISP=SHR
//SYSUT1   DD UNIT=(&WRKUNIT,SEP=(SYSLIN,SYSLMOD)),
//         SPACE=(CYL,(5,2),,CONTIG),DSN=&SYSUT1
//SYSPRINT DD SYSOUT=&SYSOUT
//         PEND
//ASM1     EXEC CLTPASM,S=S2KCUSE

Top of Document   Top of Chapter

Modify the DFHPEP Program

Source members DFHPEP32 and DFHPEP21 contain the complete program for DFHPEP. If you have an existing Program Error Program, you must incorporate the code for handling SYSTEM 2000 abends with your DFHPEP.

If you are running the default DFHPEP, which is supplied with your CICS installation, you can rename DFHPEP to DFHPEP1$ in your CICS load library so that DFHPEP is executed from the SYSTEM 2000 load library.

Use job JCLPEP to assemble DFHPEP. Based on what you specify in the CICSVER parameter in the S2KIVJCL installation macro, the generated JCLPEP does a command-level compile for DFHPEP32 or a macro-level compile for DFHPEP21.

Top of Document   Top of Chapter

Modify the DFHSRT for XMS

CNTL member DFHSRT contains the CICS System Recovery Table (SRT) entry that is required in an XMS environment. Note the different entries: CICS 3.2 (and greater) is coded with RECOVER=YES, and versions prior to CICS 3.2 are coded with PROGRAM=S2KSRTRR.
Illus. 4.2     DFHSRT

*
*   THE FOLLOWING ABEND CODES ARE ALL RELATED TO CROSS
*   MEMORY SERVICES (XMS) ABENDS AND SHOULD BE ADDED
*   TO YOUR DFHSRT IF YOU ARE RUNNING SYSTEM 2000
*   MULTI-USER IN AN XMS ENVIRONMENT.
*
         DFHSRT TYPE=SYSTEM,             OS ABEND CODES TO             *
               ABCODE=(052,053,0D4,0D5,0D6,0D7,0D8,0D9,0DA,            *
               0DB,0DC,0DE,0DF,0E2),                                   *
               RECOVER=YES               BE HANDLED BY CICS

Top of Document   Top of Chapter

Compile and Link PLEX Validation Programs

You must submit the appropriate job streams to compile and link the desired PLEX validation programs. The CNTL library member names for these are:
     JCLCL02  command-level COBOL
     JCLCL03  command-level PL/I
     JCLCL04  command-level Assembler
Submit the desired jobs for execution and review the output and condition codes. It is a good idea to print this output and save it for future reference.

Top of Document   Top of Chapter

Add Entries to the DFHCSD

The JCLCSDU job provides sample JCL to update your DFHCSD file with the entries for the CICS command-level interface. Edit the job to replace YOURCSD with the data set name of your DFHCSD file.

JCLCSDU creates an S2K group on your CSD. You need to add S2K to your group list as specified in the GRPLIST parameter in your CICS startup job. To do so, either use the CEDA transaction online or add the following statement to the end of CSDS2K:

  ADD GROUP(S2K) LIST(YOURLIST)
If this is an installation with CICS prior to 3.2, you need to concatenate source member CSDS2K21 with your input.

If you are installing QueX software, you can add entries for QueX software at the same time you add entries for the CICS interface. See the next chapter for QueX installation instructions.

If you do not use Resource Definition Online (RDO) at your site, source library members DFHPCT, DFHPPT, and DFHFCT provide the macro definitions to define the CICS command-level interface entries.

Illus. 4.3     JCLCSDU

//JCLCSDU JOB (ACTINFO),
//    USERID,TIME=(1)
//*
//*  THIS JOB UPDATES THE CSD WITH THE PROPER ENTRIES.
//*
//        EXEC PGM=DFHCSDUP
//STEPLIB  DD  DSN=CICS.LOADLIB,DISP=SHR
//DFHCSD   DD  DSN='YOURCSD',DISP=SHR
//SYSUT1   DD  UNIT=SYSDA,SPACE=(1024,(100,100))
//SYSPRINT DD  SYSOUT=A
//SYSIN    DD  DSN=S2K.R121.SOURCE(CSDS2K),DISP=SHR



Illus. 4.4     CSDS2K

**********************************************************
*  THE FOLLOWING DEFINITIONS ARE TO BE INCLUDED AS       *
*  INPUT TO AN EXECUTION OF THE DFHCSDUP PROGRAM.        *
**********************************************************
**********************************************************
*                                                        *
*  SYSTEM 2000 REQUIRED TRANSACTIONS  (CICS 3.2)         *
*                                                        *
**********************************************************
  DEFINE TRANSACTION(LALL) PROGRAM(S2KLIST)  GROUP(S2K)
  DEFINE TRANSACTION(LPLX) PROGRAM(S2KLIST)  GROUP(S2K)
  DEFINE TRANSACTION(LSCF) PROGRAM(S2KLIST)  GROUP(S2K)
  DEFINE TRANSACTION(PLXS) PROGRAM(PLXSTOP)  GROUP(S2K)
  DEFINE TRANSACTION(SCFZ) PROGRAM(SCFTERM)  GROUP(S2K)
  DEFINE TRANSACTION(S2KE) PROGRAM(S2KEDTRT) GROUP(S2K)
  DEFINE TRANSACTION(S2KK) PROGRAM(S2KPFKY)  GROUP(S2K)
  DEFINE TRANSACTION(S2KU) PROGRAM(SCFDRVR)  GROUP(S2K)
  DEFINE TRANSACTION(S2OP) PROGRAM(SCFDRVR)  GROUP(S2K)
  DEFINE TRANSACTION(S2VA) PROGRAM(ASMCCL)   GROUP(S2K)
  DEFINE TRANSACTION(S2VC) PROGRAM(COBCCL)   GROUP(S2K)
  DEFINE TRANSACTION(S2VP) PROGRAM(PL1CCL)   GROUP(S2K)
  DEFINE TRANSACTION(TALL) PROGRAM(SCFTERM)  GROUP(S2K)
  DEFINE TRANSACTION(TPLX) PROGRAM(PLXTERM)  GROUP(S2K)
  DEFINE TRANSACTION(TSCF) PROGRAM(SCFTERM)  GROUP(S2K)
  DEFINE TRANSACTION(UDMP) PROGRAM(CLUDUMP)  GROUP(S2K)
**********************************************************
*                                                        *
*  SYSTEM 2000 REQUIRED PROGRAMS      (CICS 3.2)         *
*                                                        *
**********************************************************
*
*  VALIDATION PROGRAMS
*
  DEFINE PROGRAM(ASMCCL)   GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(COBCCL)   GROUP(S2K) LANGUAGE(COBOL)
  DEFINE PROGRAM(PL1CCL)   GROUP(S2K) LANGUAGE(PLI)
*
*  SCF PROGRAMS
*
  DEFINE PROGRAM(SCFDRVR)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(SCFERROR) GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(SCFINTF)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(SCFPGBD)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(SCFPGMG)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(SCFTERM)  GROUP(S2K) LANGUAGE(ASSEMBLER)
*
*  PLEX PROGRAMS
*
  DEFINE PROGRAM(PLXFRMT)  GROUP(S2K) LANGUAGE(ASSEMBLER) RES(YES)
  DEFINE PROGRAM(PLXINIT)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(PLXSHUT)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(PLXSTOP)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(PLXTERM)  GROUP(S2K) LANGUAGE(ASSEMBLER)
*
*  COMMON PROGRAMS
*
  DEFINE PROGRAM(CLUDUMP)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KADRC)  GROUP(S2K) LANGUAGE(ASSEMBLER) RES(YES)
  DEFINE PROGRAM(S2KCUSE)  GROUP(S2K) LANGUAGE(ASSEMBLER) RES(YES)
  DEFINE PROGRAM(S2KLIST)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KPFKY)  GROUP(S2K) LANGUAGE(ASSEMBLER)
*
*  COMMAND EDITOR PROGRAMS
*
  DEFINE PROGRAM(CONVERT)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(EDJRNL)   GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(GETNXLEX) GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(IOAID)    GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(IOCTRL)   GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(IOMEMBR)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(OUTBLD)   GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(SETMODE)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KDLT)   GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KDSPL)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KEDTRT) GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KEND)   GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KEPROC) GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KERR)   GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KFIND)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KGET)   GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KINS)   GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KLISTD) GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KMDFY)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KPTR)   GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KSAVE)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KSBMT)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KSCR)   GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KSEND)  GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(S2KSETPF) GROUP(S2K) LANGUAGE(ASSEMBLER)
  DEFINE PROGRAM(USERID)   GROUP(S2K) LANGUAGE(ASSEMBLER)
**********************************************************
*                                                        *
*  SYSTEM 2000 REQUIRED FILES         (CICS 3.2)         *
*                                                        *
**********************************************************
  DEFINE FILE(S2KCOM) RECORDSIZE(30) BROWSE(YES) GROUP(S2K)
  DEFINE FILE(S2KLIB) RECORDFORMAT(V) GROUP(S2K)
      ADD(YES) BROWSE(YES) DELETE(YES) READ(YES) UPDATE(YES)
**********************************************************
*                                                        *
*  ADD GROUP(S2K) TO YOUR MAIN GRPLIST                   *
*                                                        *
**********************************************************
  ADD GROUP(S2K) LIST(GRPLIST)

Top of Document   Top of Chapter

Modify the DCT for the SUBMIT Command

Note: The Command Editor SUBMIT command feature is available only with CICS 3.2 (and greater) releases. The Command Editor is strictly command-level; CICS releases prior to CICS 3.2 require CICS macro-level code to perform the necessary functions.

Member DFHDCT on the source library contains the entries that are required for execution of the SUBMIT command. The entries are shown in Illus. 4.5. The following DD statement must be added to your CICS execution JCL in order to point to the JESx internal reader:

//JESRDR DD SYSOUT=(A,INTRDR)

Illus. 4.5     DCT Entries

JESRDR  DFHDCT TYPE=SDSCI,DSCNAME=JESRDR,TYPEFLE=OUTPUT,               *
               RECFORM=VARUNB,BLKSIZE=88,RECSIZE=84,BUFNO=1
***********************************************************************
MJCL    DFHDCT TYPE=EXTRA,DESTID=MJCL,DSCNAME=JESRDR

Top of Document   Top of Chapter

Create the S2KLIB Library

Job JCLVSAM defines the S2KLIB VSAM file that is used by the CICS interface Command Editor. The Command Editor may use an alternative file, but S2KLIB is required to hold the default member. Additionally, S2KLIB contains member type PFKY, which holds user-defined PF key definitions using the S2KK transaction.
Illus. 4.6     JCLVSAM

//JCLVSAM JOB (ACTINFO),
//      USERID,TIME=(1)
//************************************************************
//*
//* ALLOCATE CICS COMMAND EDITOR AND
//* PF KEY DEFINITION VSAM FILE
//*
//************************************************************
//ALLOC    EXEC PGM=IDCAMS
//SYSUDUMP DD  SYSOUT=A
//SYSPRINT DD  SYSOUT=A
//SYSIN    DD *
 DEFINE CLUSTER -
         (NAME(S2K.CICS.S2KLIB) -
         VOLUMES(SAS834) -
         RECORDSIZE(2000 19000) -
         REUSE -
         CYLINDERS(5 0) -
         KEYS(12 0) -
         FREESPACE(20 20) -
         SHR(3 3) )
//DUMMREC DD *
DUMMY
//SYSIN DD *
  REPRO-
 INFILE(DUMMREC)-
 OUTDATASET(S2K.CICS.S2KLIB)
/*

Top of Document   Top of Chapter

Modify CICS Start-up JCL

Concatenate S2K.R121.LOAD in DFHRPL. Add an S2KCOM DD statement if you are running XMS Multi-User. Add S2KLIB for the Command Editor and PF key definitions.

Top of Document   Top of Chapter

SECTION 2 -- FOR THE CICS 3.2 (AND GREATER) ENVIRONMENT

Modify the DFHZNEP Program

Insert source library member S2KTRM32 into the IBM-supplied program DFHZNEPX immediately before the return. See comments in S2KTRM32 for more instructions. Assemble the DFHZNEP module with JCL supplied for your CICS installation. In the assemble step, you must add your SYSTEM 2000 source library to the SYSLIB concatenation to pick up the SYSTEM 2000 macros.

Top of Document   Top of Chapter

SECTION 3 -- FOR THE CICS RELEASES PRIOR TO 3.2

If you are running both CICS 3.2 (and greater) and a CICS release earlier than 3.2, it is recommended that you keep separate S2K.R121.CNTL and S2K.R121.LOAD libraries for each environment. You can do this by running job JCLS2KIV once with CICSVER=3 and completing the CICS Version 3 command-level installation.

Allocate new S2K.R121.CNTL and S2K.R121.LOAD libraries to be used exclusively for your environments earlier than CICS 3.2. Then change JCLOUT to another CNTL library, change CNTL= and LOAD= to your new CNTL and LOAD libraries, code CICSVER=2, and run job JCLS2KIV again. Follow instructions for sections 1, 3, and optionally, 4.

This section assumes you have installed the CICS interface with the CICSVER parameter (in the S2KIVJCL macro) specified as either CICSVER=2 or CICSVER=1.

Top of Document   Top of Chapter

Modify the DFHZNEP Program

Source library member S2KTRMZX must be added to the source code for the DFHZNEP Node Error Processing program. S2KTRMZX is macro-level assembler code, as required by versions of CICS prior to 3.2. The update is to be placed in the DFHZNEP program immediately before the RETURN process. In the assemble step add the source library to your SYSLIB concatenation to pick up the SYSTEM 2000 macros.

Top of Document   Top of Chapter

File Control

The member DFHFCT contains the CICS definitions for the S2KLIB and S2KCOM data sets. This member must be included in your existing File Control Table.

If you are running strictly command-level interface PLEX programs, your installation is now complete. If you are still running any macro-level interface PLEX programs, proceed to the next section.

Top of Document   Top of Chapter

SECTION 4 -- MACRO-LEVEL CICS INTERFACE

Source library member DFHPPTML contains CICS program definitions that are required for executing the macro-level interface. These entries must be added to your existing PPT when use of the macro-level interface is required.

Member DFHPCTML contains CICS transaction definitions that are required for executing abend handling and validation programs for the macro-level interface. These members must be added to your existing PCT when use of the macro-level interface is required.

The macro-level interface is for use with PLEX programs only. SCF execution and the Command Editor are not supported in a macro-level environment under R12.1.

When you compile a PLEX program under any release of Version 12, it becomes a command-level program. If you need to compile macro-level programs, you must use the Release 11.6 precompilers.

Jobs JCLASM1 and JCLLINK assemble and link the interface dependent routines needed for the macro-level interface.

Top of Document   Top of Chapter

Macro-Level Validation Programs

You must submit the appropriate job streams to compile and link the desired PLEX validation programs. The CNTL library members are:
     JCLCOBC  command-level COBOL
     JCLPL1C   command-level PL/I
See the CICS Validation Chapter for macro-level validation tests.

Top of Document   Top of Chapter

Chapter 5 - QueX Installation

RUN JCLQXZAP TO ZAP MULTI-USER SVC NUMBER

Member JCLQXZAP, shown in Illus. 5.1, zaps the appropriate Multi-User SVC number in CSECT SVCADR of module QUVBPGM. If you have not installed Multi-User software yet, you can run this job at a later time.
Illus. 5.1     JCLQXZAP

//JCLQXZAP JOB (ACTINFO),
//    USERID,TIME=(1)
//*
//***********************************************************
//*  APPLY ZAP FOR MULTI-USER SVC NUMBER
//***********************************************************
//*
//ZAP      PROC ZAPPARM=IGNIDRFULL,SYSOUT=A,
//             LOAD='S2K.R121.LOAD'
//ZAP      EXEC PGM=IMASPZAP,PARM='&ZAPPARM'
//SYSPRINT DD  SYSOUT=&OUT
//SYSLIB   DD  DSN=&LOAD,DISP=SHR
//         PEND
//*
//***********************************************************
//*  APPLY ZAP FOR MULTI-USER SVC NUMBER
//***********************************************************
//*
//ZAP      EXEC ZAP
//SYSIN DD *
*
* ZAP CARDS FOR XMS SYSTEM 2000 MULTI-USER
*
 NAME QUVBPGM SVCADR
 REP 0008 0701,0701
//*

Top of Document   Top of Chapter

RUN JCLALCAT TO CREATE THE QUEX USER VIEW DATABASE

Member JCLALCAT (Illus. 5.2) defines the QueX User View database QUEXCATALOG and loads validation user view UVDEMO into it. Note that the database name for the QueX User View database must be QUEXCATALOG, and the database password must be QUEX.
Illus. 5.2     JCLALCAT

//JCLALCAT JOB (ACTINFO),
//    USERID,TIME=(1)
//*
//************************************************************
//*  CREATE QUEXCATALOG DATA BASE
//************************************************************
//*
//S2KPROC  PROC SYSOUT=A,
//             PARMDSN='S2K.R121.CNTL(NLPARM)',
//             LOAD='S2K.R121.LOAD',
//             SOURCE='S2K.R121.SOURCE'
//GO       EXEC PGM=SYS2K,PARM='PAD00=YES'
//STEPLIB  DD   DSN=&LOAD,DISP=SHR
//SYSUDUMP DD   SYSOUT=&SYSOUT
//S2KPARMS DD   DSN=&PARMDSN,DISP=SHR
//CATDEFIN DD   DSN=&SOURCE.(CATDEFIN),DISP=SHR
//CATDATA  DD   DSN=&SOURCE.(CATDATA),DISP=SHR
//         PEND
//*
//************************************************************
//*  CREATE QUEXCATALOG DATA BASE
//************************************************************
//*
//CAT1     EXEC S2KPROC
//S2KCOMD  DD   *
USER,QUEX:
ALLOC QUEXCATALOG,FILES=ALL,VOL=SAS803,
UNIT=SYSDA,DISP=NEW:
IF ERROR THEN DBN IS QUEXCATALOG: CONTROL: RELEASE:
ENDIF:
EXIT:
//CAT2     EXEC S2KPROC
//S2KCOMD  DD   *
USER,QUEX:NDB IS QUEXCATALOG:
COMMAND FILE IS CATDEFIN:
CONTROL:SEPARATOR IS @:
ACCESS:DATA FILE IS CATDATA:
LOAD:
CONTROL:SEPARATOR IS *:
ACCESS:TALLY C11:
CONTROL:
ENABLE ROLLBACK:
SAVE DATA BASE ON SAS803:
EXIT:
//*

Top of Document   Top of Chapter

ADD CHANGES FOR QUEX EXECUTION UNDER CICS

QueX software under CICS communicates with the SYSTEM 2000 Multi-User software only. This means that the QUEXCATALOG database that contains the user views and any databases the QueX software accesses must be accessible through your SYSTEM 2000 Multi-User environment.

User views that will be used with the QueX software under CICS must be built with the QueX software under TSO.

Job JCLCSDU provides sample JCL to update your DFHCSD file with the entries for the SYSTEM 2000 CICS command-level interface. Edit the job to replace YOURCSD with the data set name of your DFHCSD file and replace (CSDS2K) with (CSDQUEX) on the SYSIN statement.

JCLCSDU job creates a group (S2KQUEX) on your CSD. You need to add this group to your group list, as specified in the GRPLIST parameter in your CICS startup job. To do so, either use the CEDA transaction online or add the following statement to the end of CSDQUEX:

  ADD GROUP(S2KQUEX) LIST(YOURLIST)
If you do not use Resource Definition Online (RDO) at your site, members QUEXPCT and QUEXPPT on your SOURCE library provide the macro definitions to define the QueX entries.

After you log on to CICS, enter the transaction QUEX. From this point, QueX executes the same way it does under TSO.

Top of Document   Top of Chapter

Chapter 6 - Base Validation

Successful completion of the validation tests assures that SYSTEM 2000 software is properly installed. The VALID library contains verified output from previous executions of the tests. To compare your output with the contents of the members on the VALID library, use job JCLVALID on the CNTL library to print the members.

Top of Document   Top of Chapter

VALIDATE SELF-CONTAINED FACILITY

The Self-Contained Facility (SCF) and Report Writer are tested using prepared Command Files to issue commands. Member JCLSCF on the CNTL library contains the job stream to execute the tests. The job steps must execute in the order given because each step relies on a preceding one to supply the database in a known condition. Job JCLSCF is shown in Illus. 6.1.
Illus. 6.1     JCLSCF

//JCLSCF JOB (ACTINFO),
//    USERID,TIME=(1)
//*
//************************************************************
//* SELF-CONTAINED FACILITY AND REPORT WRITER VALIDATION
//************************************************************
//*
//S2KPROC  PROC PARMS=NLPARM,
//             SYSOUT=A
//GO       EXEC PGM=SYS2K
//STEPLIB  DD   DSN=S2K.R121.LOAD,DISP=SHR
//SYSUDUMP DD   SYSOUT=&SYSOUT
//S2KPARMS DD   DSN=S2K.R121.CNTL(&PARMS),DISP=SHR
//LIBDEFN  DD   DSN=S2K.R121.SOURCE(LIBDEFN),DISP=SHR
//LIBLDER  DD   DSN=S2K.R121.SOURCE(LIBLDER),DISP=SHR
//TESTRW1  DD   DSN=S2K.R121.SOURCE(TESTRW1),DISP=SHR
//         PEND
//*
//************************************************************
//* TEST SELF-CONTAINED FACILITY
//************************************************************
//*
//SCF1     EXEC S2KPROC
//S2KCOMD  DD   *
USER,LIB:
ALLOC LIBRARY,FILES=ALL,VOL=SAS803,UNIT=SYSDA,DISP=NEW
IF ERROR THEN DBN IS LIBRARY: CONTROL: RELEASE:
ENDIF:
EXIT:
//*
//SCF2     EXEC S2KPROC
//S2KCOMD  DD   *
USER,LIB: NDB IS LIBRARY:
COMMAND FILE IS LIBDEFN:
CONTROL: ENABLE ROLLBACK:
CONTROL: SAVE DATA BASE ON SAS803:
EXIT:
//*
//************************************************************
//* TEST REPORT WRITER
//************************************************************
//*
//RW1      EXEC S2KPROC
//S2KCOMD  DD   *
USER,LIB: DBN IS LIBRARY: CONTROL: RELEASE:
EXIT:
//*
//RW2      EXEC S2KPROC
//S2KCOMD  DD   *
USER,LIB:
RESTORE LIBRARY:
ACCESS: COMMAND FILE IS TESTRW1:
EXIT:
//*

Top of Document   Top of Chapter

VALIDATE PLEX

The CNTL library contains the PLEX validation program source for each programming language supported by SYSTEM 2000 software. Members JCLASM, JCLCOB, JCLFORT, and JCLPL1 contain the jobs to test execution of each language. Only the programming languages to be used with SYSTEM 2000 software at your site need to be tested.

Top of Document   Top of Chapter

Chapter 7 - Multi-User Validation

Successful completion of the validation tests ensures that the Multi-User software is properly installed. The results from the Multi-User validation tests should be the same as from the base SYSTEM 2000 software test because the tests are the same.

Verify that the database files for the LIBRARY and PUBLISHERS databases are still allocated.

Top of Document   Top of Chapter

INITIALIZE MULTI-USER AND RUN VALIDATION TESTS

Multi-User validation requires execution of two jobs, JCLMU and JCLMUDEP. Job JCLMU executes Multi-User. When the following message appears at the operator console, you are ready to submit job JCLMUDEP:
     'S2K1117/01- MULTI-USER INITIALIZATION PHASE COMPLETE'
Job JCLMUDEP re-executes the base SYSTEM 2000 software validation tests in a Multi-User environment. It must use an initiator other than the one in which the Multi-User main task is running. Job JCLMU is shown in Illus. 7.1, and job JCLMUDEP is shown in Illus. 7.2.

Top of Document   Top of Chapter

ISSUE CONSOLE OPERATOR COMMANDS

During Multi-User execution, any of the SYSTEM 2000 Multi-User operator commands can be issued, for example:

     F job name,D A,S      display all active tasks
                             and their status

     F job name,C S2K      terminate Multi-User when all
                             active tasks are complete
See the Product Support Manual for complete information on the console operator commands.

The operator must not cancel any user job or the Multi-User main task with an OS CANCEL unless a problem prevents canceling through Multi-User. When validation is complete, use Multi-User termination commands to ensure that all dependent region jobs are notified that Multi-User is coming down and to prevent user or test databases from being damaged. Shut down Multi-User from an OS console using a Multi-User operator command, such as CANCEL S2K.

Illus. 7.1     JCLMU

//JCLMU JOB (ACTINFO),
//    USERID,TIME=(1)
//*
//************************************************************
//* INITIATE MULTI-USER MAIN TASK
//************************************************************
//*
//MUMAIN   PROC SYSOUT=A
//S2K      EXEC PGM=S2KCMC,REGION=0M
//STEPLIB  DD   DSN=S2K.R121.AUTH,DISP=SHR
//S2KLOAD  DD   DSN=S2K.R121.LOAD,DISP=SHR
//S2KCOM   DD   DSN=S2K.R121.COM,DISP=SHR
//S2KPARMS DD   DSN=S2K.R121.CNTL(MUPARM),DISP=SHR
//S2KDIAG  DD   SYSOUT=&SYSOUT
//SYSOUT   DD   SYSOUT=&SYSOUT
//SYSUDUMP DD   SYSOUT=&SYSOUT
//*
//************************************************************
//* FILES FOR MULTI-USER ACCOUNTING LOG
//************************************************************
//*
//S2KMANX  DD   DSN=S2K.R121.ACCOUNT.MANX,DISP=SHR
//S2KMANY  DD   DSN=S2K.R121.ACCOUNT.MANY,DISP=SHR
//*
//         PEND
//*
//************************************************************
//* INITIATE MULTI-USER MAIN TASK
//************************************************************
//*
//         EXEC MUMAIN
//*


Illus. 7.2     JCLMUDEP

//JCLMUDEP JOB (ACTINFO),
//    USERID,TIME=(1)
//*
//************************************************************
//* VALIDATE EXECUTION UNDER MULTI-USER
//************************************************************
//*
//MUTEST   PROC SYSOUT=A
//TESTSTEP EXEC PGM=SYS2KJOB,COND=EVEN
//STEPLIB  DD DSN=S2K.R121.LOAD,DISP=SHR
//S2KCOM   DD DSN=S2K.R121.COM,DISP=SHR
//SYSUDUMP DD  SYSOUT=&SYSOUT
//S2KCOMD  DD  DDNAME=SYSIN
//LIBDEFN  DD  DSN=S2K.R121.SOURCE(LIBDEFN),DISP=SHR
//LIBLDER  DD  DSN=S2K.R121.SOURCE(LIBLDER),DISP=SHR
//TESTRW1  DD  DSN=S2K.R121.SOURCE(TESTRW1),DISP=SHR
//         PEND
//*
//************************************************************
//* SELF-CONTAINED FACILITY VALIDATION
//************************************************************
//*
//         EXEC MUTEST
//SYSIN    DD   *
USER,LIB:EXCLUSIVE  DATA BASE NAME IS LIBRARY:CONTROL:RELEASE:
EXIT:
//*
//         EXEC MUTEST
//SYSIN    DD   *
USER,LIB:
NDB IS LIBRARY:
COMMAND FILE IS LIBDEFN:
CONTROL: ENABLE ROLLBACK:
SAVE DATA BASE:
EXIT:
//*
//************************************************************
//*  REPORT WRITER VALIDATION
//************************************************************
//*
//         EXEC MUTEST
//SYSIN    DD   *
USER,LIB:EXCLUSIVE  DATA BASE NAME IS LIBRARY:CONTROL:RELEASE:
EXIT:
//*
//         EXEC MUTEST
//SYSIN    DD   *
USER,LIB:
RESTORE LIBRARY:
COMMAND FILE IS TESTRW1:
EXIT:
//*

Top of Document   Top of Chapter

VALIDATE PLEX

Job JCLMUPLX is provided to validate COBOL, Assembler, FORTRAN, and PL/I. Jobs JCLASM, JCLCOB, JCLFORT, and JCLPL1 must have been run during single-user validation to create the programs used in JCLMUPLX.

Top of Document   Top of Chapter

Chapter 8 - CICS Validation

VALIDATE THE SELF-CONTAINED FACILITY

To verify that the SCF transaction S2KU executes correctly and that the proper SVC has been specified for communication with SYSTEM 2000 Multi-User software:

  1. Enter the SCF transaction S2KU to receive the sign-on screen.

  2. Fill in the displayed fields and follow the instructions if you make an error. Any database available under SYSTEM 2000 Multi-User software may be used, but the example here uses the LIBRARY database with a password of LIB, since it is required for the PLEX test below. The commands are as follows:
     
                USER,LIB:
                DBN IS LIBRARY:
     
  3. Enter any SCF commands.

  4. Enter "EXIT:" to terminate the SCF session.

Top of Document   Top of Chapter

VALIDATE PLEX

To verify that the PLEX transaction executes correctly and that the proper SVC has been specified for communication with SYSTEM 2000 Multi-User software:
  1. Select the PLEX transaction for the language you wish to use:
     
           S2VC (COBOL)  S2VP (PL/I)  S2VA (Assembler)
     
  2. Enter a four-character function code (BOOK, AUTH, or SUBJ) to identify the data that immediately follows. If you interject CONT between the function code and the data, the data is used in a CONTAINS dynamic where-clause. Examples of the two input formats are as follows:
     
                S2VCBOOKHOUND OF THE BASKERVILLES
                               or
                S2VCBOOKCONTBASKERVILLE
     
    The results are valid LIBRARY database values. The BOOK function causes a LOCATE of records in which the title of the book matches the input data. The AUTH function causes a LOCATE of records where the author's surname matches the input data. The SUBJ function causes a LOCATE of records where the category matches the input data. All located records are displayed on the output screen, one per line.

Top of Document   Top of Chapter

VALIDATE ERROR CONDITION HANDLING

To ensure your DFHPEP is functioning properly, issue:
     S2VCPEPX
To verify results, test with the Multi-User Diagnostic Log level USEGM. Run the PEPX test. You should get an ASRA abend at your terminal. The Multi-User Diagnostic Log should show these commands: START S2K, OPEN LIBRARY, and an 0013 terminate message.

To test your automatic STOP S2K, issue:

     S2VCKCPX
The KCPX test should result in these commands: START S2K, OPEN LIBRARY, and STOP S2K, with a small delay between OPEN LIBRARY and STOP S2K.

To test DFHZNEP modifications, do the following:

  1. Start an S2KU session.

  2. Open the LIBRARY or any other database.

  3. From another terminal, use CEMT to RELease the terminal running S2KU.

  4. Check the Multi-User Diagnostic Log. You should see :USER,CICS:EXIT: followed by the 0014 TERMINATE TP SCF USER message.

Top of Document   Top of Chapter

VALIDATE MACRO-LEVEL INTERFACE (PLEX ONLY)

Macro-level interface validation uses the TESX and TPLC transactions for COBOL and PL/I, respectively. The formats for using these transactions are as follows:

For testing standard communication with SYSTEM 2000:

     xxxxNORMbook title
For testing proper installation of the PEP updates:
     xxxxPEPX
For testing proper installation of the automatic STOP S2K:
     xxxxKCPX

Top of Document   Top of Chapter

Chapter 9 - QueX Validation

Make sure that the QueX User View database, QUEXCATALOG, contains the initial user view named UVDEMO. Then, to validate the QueX software, follow the tutorial in the QueX User's Guide.

Top of Document   Top of Chapter

Chapter 10 - SYSTEM 2000 Maintenance

This chapter contains descriptions of jobs that are not required during installation but may be useful or required later. There are jobs for each of the four products: the base, Multi-User, CICS, and QueX software. Several of these jobs are more fully documented in other SYSTEM 2000 manuals, which are referenced.

Top of Document   Top of Chapter

BASE SYSTEM 2000 SOFTWARE

Relink Executable Modules

Job JCLS2KLN (Illus. 10.1) creates executable modules SYS2K and S2KPLI. The Product Support Manual contains descriptions of the PRELNK macro and its parameters, and of overlaid and flat configurations. An overlaid configuration saves memory at the cost of CPU cycles and I/O operations and is configured in accordance with available memory and SYSTEM 2000 software usage. Both SYS2K and S2KPLI are provided on the delivery media, linked flat. Consequently, job JCLS2KLN should be executed only if you want an overlaid system or if you apply SYSTEM 2000 problem fixes or special zaps during installation. JCLS2KLN must be run after you have applied fixes and after you have installed a field fix distribution.

If you have received special zaps or problem fixes from SAS Institute Technical Support in Austin, TX, they should be applied using your standard zap utility or the JCL in job JCLZAP. JCLS2KLN must be run after you apply the zaps.

Illus. 10.1    JCLS2KLN

//JCLS2KLN JOB (ACTINFO),
//    USERID,TIME=(1)
//*
//************************************************************
//* RELINK EXECUTABLE MODULES SYS2K AND S2KPLI
//************************************************************
//*
//S2KLINK  PROC SYSOUT=A,WRKUNIT=SYSDA
//ASM      EXEC PGM=IEV90,
//             PARM='OBJECT,NODECK,XREF(SHORT)'
//SYSLIB   DD  DSN=S2K.R121.SOURCE,DISP=SHR
//SYSUT1   DD  UNIT=&WRKUNIT,SPACE=(1700,(600,100))
//SYSUT2   DD  UNIT=&WRKUNIT,SPACE=(1700,(300,30))
//SYSUT3   DD  UNIT=&WRKUNIT,SPACE=(1700,(300,50))
//SYSPRINT DD  SYSOUT=&SYSOUT
//SYSLIN   DD  DSN=&&DECK,UNIT=&WRKUNIT,
//             SPACE=(80,(200,50)),DISP=(NEW,PASS)
//LKED     EXEC PGM=IEWL,
//    PARM=(MAP,XREF,LET,LIST,NCAL,'SIZE=(256K,64K)',
//    'AMODE=31','RMODE=ANY')
//SYSLMOD  DD  DSN=S2K.R121.LOAD(&LNAME),DISP=SHR
//SYSLIN   DD  DSN=&&DECK,DISP=(OLD,DELETE)
//LOAD     DD  DSN=S2K.R121.LOAD,DISP=SHR
//SYSPRINT DD  SYSOUT=&SYSOUT
//SYSUT1   DD  UNIT=&WRKUNIT,SPACE=(1024,(400,20))
//         PEND
//*
//************************************************************
//* RELINK EXECUTABLE MODULES SYS2K AND S2KPLI
//************************************************************
//*
// EXEC S2KLINK,LNAME=SYS2K
//ASM.SYSIN DD *
      TITLE 'LINK EDIT SYSTEM 2000 FLAT SYSTEM FOR SCF'
      PRELNK OV=FLAT,RW=YES,LANG=NL,RB=YES,MU=YES,QA=QAEXIT
      END
// EXEC S2KLINK,LNAME=S2KPLI
//ASM.SYSIN DD *
      TITLE 'LINK EDIT SYSTEM 2000 FLAT SYSTEM FOR PLEX'
      PRELNK OV=FLAT,RB=YES,LANG=PLI,MU=NO,RW=NO
      END
//*

Top of Document   Top of Chapter

Unload FFD Media

Job JCLFFDI provides sample JCL to unload a field fix distribution (FFD) mailer media, which SYSTEM 2000 Technical Support periodically sends to its customers. The first file on the media is always a PDS, which contains all of the fixes and JCL to apply them. Sometimes FFDs contain replacement load modules on a second file. This job provides sample JCL to unload future field fix distributions. When preparing this JCL, follow the instructions in the letter that accompanies the field fix distribution media.

Top of Document   Top of Chapter

Run S2KSETI to Authorize SYSTEM 2000 Software

S2KSETI is an independent utility that you run against your SYSTEM 2000 LOAD library to authorize the SAS Institute Program Products at your installation. You also run the utility to renew authorization. Under normal circumstances, all media that contain the base SYSTEM 2000 software are "pre-authorized" and you will not need to run S2KSETI. You will need to run it at a later date if you license additional software, if your CPU serial number changes, and at annual renewal time.

The procedures for new authorization and renewal authorization are the same. Before your SAS license expires, you will be invoiced for the renewal fee. When SAS Institute receives the renewal fee, you will be mailed parameter values that must be used to authorize SYSTEM 2000 software for the renewal period. The source text members SETBTEXT, SETMTEXT, SETCTEXT, and SETQTEXT must be edited to supply the renewal information for each product. You must code the values in these members exactly as they are provided in order for the program to execute properly.

Executable module S2KSETI is provided on the LOAD library, and job JCLSET (Illus. 10.2) runs the program.

Illus. 10.2    JCLSET

//JCLSET JOB (ACTINFO),
//    USERID,TIME=(1)
//*
//***********************************************************
//* AUTHORIZE SAS INSTITUTE PROGRAM PRODUCTS
//* STEPS:
//*   1.  MODIFY MEMBER SET?TEXT IN SOURCE LIBRARY
//*       WITH YOUR UPDATED PARAMETERS
//*       ? = B FOR BASE PRODUCT
//*       ? = M FOR MULTI-USER PRODUCT
//*       ? = C FOR CICS INTERFACE PRODUCT
//*       ? = Q FOR QUEX PRODUCT
//*   2.  COMMENT OUT EXEC STEP FOR PRODUCT
//*       YOU DO NOT HAVE
//*   3.  EXECUTE THIS JOB.
//*
//***********************************************************
//*
//SETI     PROC PRODUCT=B,SET=SET
//STEP     EXEC PGM=S2KSETI,PARM='SRCLIB'
//STEPLIB  DD  DSN=S2K.R121.LOAD,DISP=SHR
//SRCLIB   DD  DSN=S2K.R121.LOAD,DISP=SHR
//SYSPRINT DD  SYSOUT=A
//SYSUDUMP DD  SYSOUT=A
//SYSIN    DD  DISP=SHR,
// DSN=S2K.R121.SOURCE(&SET.&PRODUCT.TEXT)
//         PEND
//BASE     EXEC SETI,PRODUCT=B  FOR BASE
//MUP      EXEC SETI,PRODUCT=M  FOR MULTI-USER
//CICS     EXEC SETI,PRODUCT=C  FOR CICS INTERFACE
//QUEX     EXEC SETI,PRODUCT=Q  FOR QUEX

Top of Document   Top of Chapter

Other Maintenance Jobs

Four members on the SYSTEM 2000 CNTL library are described below: JCLDEL, JCLALLOC, JCLDUMP, and JCLCNVRT. These jobs are not required installation steps, and under normal circumstances they will not be needed during initial installation of the base software.

Top of Document   Top of Chapter

Delete Database Files

Job JCLDEL deletes the database files and the disk Savefile for the EMPLOYEE database. Run this job when you are going to recreate a database and want to reallocate the database files. Be sure to supply the appropriate DBNAME parameter(s) before you submit the job.

Top of Document   Top of Chapter

Allocate Database Files

Job JCLALLOC catalogs database Files 1 through 8 and the disk Savefile for the SYSTEM 2000 databases. Be sure to supply the appropriate DBNAME parameter(s) before you submit the job.

Top of Document   Top of Chapter

Dump Pages of a Database File

From time to time for debugging purposes, Technical Support may request a dump of certain pages of a SYSTEM 2000 database file. Job JCLDUMP provides sample JCL to do this.

Top of Document   Top of Chapter

Convert Databases to Release 12.1 Format

Databases created before Release 12.1 must be rebuilt in the R12.1 format. This can be done either with the UNLOAD/LOAD program generators or with the conversion program CVRT121. Use of both methods is documented in SYSTEM 2000 Software: Changes and Enhancements, Release 12.1.

Job JCLCNVRT contains sample JCL to convert a database using CVRT121.

Top of Document   Top of Chapter

Use of the S2KGLOAD and S2KGUNLD Program Generators

The two program generator programs are supplied on the R12.1 SOURCE library. The jobs listed below are on your CNTL library after you expand the S2KIVJCL installation macro. Changes to the procedures for using the program generators are documented in SYSTEM 2000 Software: Changes and Enhancements, Release 12.1.

JCLGDEF provides sample JCL to define a database using DESCRIBE/DEFINE output.

JCLGDESC provides sample JCL to create the environment for the program generators.

JCLGENCB provides sample JCL to generate the COBOL load and unload source programs.

JCLGCOB provides sample JCL to compile and link the generated COBOL load and unload programs

JCLGCBGO provides sample JCL to execute the generated COBOL load and unload programs

JCLGPL1 provides sample JCL to compile modules S2KGLOAD and S2KGUNLD

Top of Document   Top of Chapter

Create EMPLOYEE and PERSONNEL Databases

The EMPLOYEE database is used for examples in SYSTEM 2000 publications, for SAS Institute training classes, and in QueX validation. Job JCLEMP creates this database. When JCLEMP is run as supplied, the EMPLOYEE database is created with definition and database cycle numbers of 3 and 1, respectively. To ensure that your output matches the examples in the publications and training class lab sessions, be sure the definition number and database cycle number are at 3 and 1 before you save the database.

The PERSONNEL database is used for examples in basic SYSTEM 2000 software publications and may also be used for certain training classes. Job JCLPERS creates the PERSONNEL database.

Top of Document   Top of Chapter

MULTI-USER MAINTENANCE

JCL for the Diagnostic Log

Members JCLDIAG and JCLDIAGX on the CNTL library are described below. These jobs are not required installation steps and are not needed during initial installation of the Multi-User software.

Top of Document   Top of Chapter

JCL to run the SYSTEM 2000 DIAG2000 Program

The SYSTEM 2000 DIAGNOSTIC LOG (file S2KDIAG) provides records of events that occur during a Multi-User session. DIAG2000 is a utility that organizes this information into detailed and summary reports. Complete descriptions of these reports and the use of DIAG2000 is provided in the Product Support Manual. Job JCLDIAG provides sample JCL to execute DIAG2000.

Top of Document   Top of Chapter

JCL to compile and link the DIAG2000 program

Job JCLDIAGX provides sample JCL to compile and link DIAG2000 when source changes are made.

Top of Document   Top of Chapter

Run S2OP in Batch

SYSTEM 2000 software provides a program that looks like an alternate console to Multi-User software. It is an optional service that runs in three environments: TSO, CMS, and MVS batch. S2OP is documented in Chapter 3 of the Product Support Manual. Job JCLS2OP provides sample JCL for running S2OP in the MVS batch environment.

Top of Document   Top of Chapter

Assemble and Link an XBUF table

SYSTEM 2000 software offers an Extended Buffer (XBUF) Manager feature, which allows the use of several kinds of caching techniques. This feature is fully documented in Technical Report S2-107 XBUF Caching Feature in SYSTEM 2000 Software. The use of XBUF requires that XBUF macros be coded and then assembled and linked into XBUF tables. Job JCLXBUF provides sample JCL to assemble and link an XBUF table. XBUF is available for use in both single and Multi-User environments.

Top of Document   Top of Chapter

CICS MAINTENANCE

Change the CICS Interface Parameters

The CICS module S2KCUSE is provided with default parameters that specify required information, such as the maximum number of PLEX users, the maximum number of SCF users in the interface, and maximum number of terminals. These parameters have minimum and maximum values as shown below. Site requirements may necessitate modification of one or more of these parameters.

To change these parameters, edit S2KCUSE as desired, then reassemble S2KCUSE using job JCLCL01. S2KCUSE must be link-edited to be AMODE=31, RMODE=24.


Illus. 10.3    CICS Interface Parameters with Value Ranges

PLEX=____________

specifies the number of concurrent PLEX transactions that will be using
the interface.

DEFAULT  32       RANGE 0-230

PWAITS=__________

specifies the number of one-second waits the interface will issue for a
new PLEX user if all specified PLEX users are active.

DEFAULT  2        RANGE 1-10

STOPWT=__________

specifies the wait interval for PLXSTOP in one-second increments.
Format is HHMMSS.

DEFAULT  20       RANGE 1 - 995959

SCF=_____________

specifies the number of concurrent SCF users that will be using the
interface.  This refers to the SCF transactions that have commands
active in the interface (i.e., URB slots).

DEFAULT  10       RANGE 0-230

MAXTERM=_________

specifies the maximum number of terminals that will be using SCF.

DEFAULT  40       RANGE 0-10000

Top of Document   Top of Chapter

Change the PF Key Settings

New transaction S2KK provides the ability to dynamically alter PF key settings for S2KU, S2KE, and S2OP. To alter a setting, invoke the S2KK transaction and specify the environment to be altered:
 
  S2KK S2KE  - changes PF keys for the S2KE transaction
  S2KK S2OP  - changes PF keys for the S2OP transaction
  S2KK S2KU  - changes PF keys for the S2KU transaction
 
A setting may also be altered by invoking S2KK from within the transaction itself. For a complete description of this enhancement, refer to the CICS Interface (Command Level) manual, Second Edition.

To change the installation-wide PF key defaults, change the S2KUGEN macro and reassemble and link the S2KCUSE routine using job JCLCL01.

Top of Document   Top of Chapter

Command-Level Maintenance

Source fixes to the CICS interface are applied with the utility IEBUPDTE. After they have been applied, the source modules must be reassembled and relinked. These three jobs on the CNTL library reassemble and link CICS modules:

Top of Document   Top of Chapter

Macro-level Maintenance

When source fixes are applied to modules in the macro-level interface, job JCLASM1 must be run to reassemble the affected module, and job JCLLINK must be run to relink the macro-level interface, S2KCICS.

Top of Document   Top of Chapter

QUEX MAINTENANCE

Modify Function Key Settings

Job JCLQXPFT (Illus. 10.4) contains the default settings for the program function keys. The comments provided with the job explain how to change the default settings.
Illus. 10.4    JCLQXPFT

//JCLQXPFT  JOB (ACTINFO),
//    USERID,TIME=(1)
//* PF1      EQU   X'F1'       DISPLAY VALUE 'F140'
//* PF2      EQU   X'F2'       DISPLAY VALUE 'F240'
//* PF3      EQU   X'F3'       DISPLAY VALUE 'F340'
//* PF4      EQU   X'F4'       DISPLAY VALUE 'F440'
//* PF5      EQU   X'F5'       DISPLAY VALUE 'F540'
//* PF6      EQU   X'F6'       DISPLAY VALUE 'F640'
//* PF7      EQU   X'F7'       DISPLAY VALUE 'F740'
//* PF8      EQU   X'F8'       DISPLAY VALUE 'F840'
//* PF9      EQU   X'F9'       DISPLAY VALUE 'F940'
//* PF10     EQU   X'7A'       DISPLAY VALUE 'F1F0'
//* PF11     EQU   X'7B'       DISPLAY VALUE 'F1F1'
//* PF12     EQU   X'7C'       DISPLAY VALUE 'F1F2'
//************
//************
//*    PF KEYS 13 THROUGH 24 MIRROR
//*    PF KEYS 1 THROUGH 12
//************
//************
//* SELECT ONE OF THE VALUES ABOVE AND REPLACE THE
//* INDICATED VALUE IN THE @PFTABLE ZAP DECK BELOW.
//*
// EXEC PGM=IMASPZAP,PARM='IGNIDRFULL'
//SYSLIB DD DISP=SHR,DSN=S2K.R121.LOAD
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
*
* THE @PFTABLE MODULE IS ZAPPED WITH THE ATTENTION
* IDENTIFIER (AID) VALUES FOR THE ASSIGNED PF KEYS.
* THESE VALUES ARE INTERPRETED AT EXECUTION TIME TO
* DETERMINE THE INPUT COMMAND OR FUNCTION FROM SCREEN
* QX04 (ITEM MENU), SCREEN QX01 (USERVIEW ID), AND
* SCREEN QX05 (RECORD MENU).
*
NAME QUEXPGM @PFTABLE
VER 0000 F200         SELECT           PFKEY 2
VER 0006 F100         HELP             PFKEY 1
VER 000C F300         EXIT             PFKEY 3
VER 0012 F400         MODIFY           PFKEY 4
VER 0018 F500         INSERT           PFKEY 5
VER 001E F600         DELETE           PFKEY 6
VER 0024 F700         BACK             PFKEY 7
VER 002A F900         SORT             PFKEY 9
VER 0030 F800         MENU             PFKEY 8
VER 0036 7C00         PAGE PLUS        PFKEY 12
VER 003C 7B00         PAGE MINUS       PFKEY 11
*
*    REPLACEMENT VALUES FOR QUEX PF KEYS
*
REP 0000 F200          AID SET FOR SELECT
REP 0006 F100          AID SET FOR HELP
REP 000C F300          AID SET FOR EXIT
REP 0012 F400          AID SET FOR MODIFY
REP 0018 F500          AID SET FOR INSERT
REP 001E F600          AID SET FOR DELETE
REP 0024 F700          AID SET FOR BACK
REP 002A F900          AID SET FOR SORT
REP 0030 F800          AID SET FOR MENU
REP 0036 7C00          AID SET FOR PAGE PLUS
REP 003C 7B00          AID SET FOR PAGE MINUS
*
* THE QXCOMCS CSECT IS ZAPPED WITH THE DISPLAY VALUES
* OF THE PF KEY ASSIGNMENTS.  THESE VALUES WILL BE
* DISPLAYED IN THE APPROPRIATE FIELDS ON THE QX04
* SCREEN DISPLAY.
*
NAME QUEXPGM QXCOMCS
VER 0004 F240            SELECT DISPLAY VALUE '2 '
VER 002A F140            HELP   DISPLAY VALUE '1 '
VER 002C F440            MODIFY DISPLAY VALUE '4 '
VER 002E F540            INSERT DISPLAY VALUE '5 '
VER 0030 F640            DELETE DISPLAY VALUE '6 '
VER 0033 F840            MENU   DISPLAY VALUE '8 '
VER 0035 F740            BACK   DISPLAY VALUE '7 '
VER 0037 F940            SORT   DISPLAY VALUE '9 '
VER 0039 F340            EXIT   DISPLAY VALUE '3 '
*
*  REPLACEMENT VALUES SHOULD REPRESENT CHARACTER
*  NOTATION OF ASSIGNED PF KEY NUMBER.
*  EXAMPLE :
*
*   IF REPLACEMENT VALUE ABOVE IS X'F4' FOR PF KEY
*   FOUR, THEN THE REPLACEMENT VALUE BELOW SHOULD BE
*   X'F440' (EBCDIC '4 ').
*
REP 0004 F240      SELECT DISPLAY CODE
REP 002A F140      HELP   DISPLAY CODE
REP 002C F440      MODIFY DISPLAY CODE
REP 002E F540      INSERT DISPLAY CODE
REP 0030 F640      DELETE DISPLAY CODE
REP 0033 F840      MENU   DISPLAY CODE
REP 0035 F740      BACK   DISPLAY CODE
REP 0037 F940      SORT   DISPLAY CODE
REP 0039 F340      EXIT   DISPLAY CODE
//

Top of Document   Top of Chapter

Appendix A - Installation Checklist>


   1.  JOBINFO=_________________________________________________

            specifies the operands to be included on all job cards
            produced by the S2KIVJCL macro:  programmer name, job class,
            region size, and so forth.  Maximum length is 63 characters.
            The entire parameter must be enclosed in single quotes.  If
            any single quotes are to be included within the parameter,
            replace them with two single quotes.

                 DEFAULT  ' '

   2.  ACTINFO=_________________________________________________

            specifies the accounting information to be included on all
            job cards.  All of the information supplied here must be
            enclosed within the parentheses.  Maximum length is 57
            characters.

                 DEFAULT  ()

   3.  JCL(n)=____________________________________________________

            specifies any additional site-dependent JCL or any JCL
            comments to assist in identifying the installation jobs.
            There are four cards for this purpose where (n) can be
            values 1 through 4.  The entire parameter must be enclosed
            in single quotes.

                 NO DEFAULT

   4.  LOAD=________________________________

            specifies the full data set name of the LOAD library.  This
            library contains all load modules necessary to run
            SYSTEM 2000 software.  Members are listed in Appendix B.

                 DEFAULT  S2K.R121.LOAD


   5.  CNTL=________________________________

            specifies the full data set name of the CNTL library.  The
            installation and validation job streams are added to this
            library when you assemble and execute the S2KIVJCL macro.
            Members are listed in Appendix D.

                 DEFAULT  S2K.R121.CNTL

   6.  SOURCE=________________________________

            specifies the full data set name of the SOURCE library.
            This library contains sample JCL, macros, validation program
            source, command files, and loader string data.  Members are
            listed in Appendix C.

                 DEFAULT  S2K.R121.SOURCE

   7.  VALID=_______________________________

            specifies the full data set name of the VALID library.  This
            library contains validation test output for comparison with
            your own test results.  Members are listed in Appendix E.

                 DEFAULT  S2K.R121.VALID

   8.  DBIND=_______________________________

            specifies the high-level index for the data sets that will
            contain the databases.  For instance, if PROD.S2K is
            specified, the first LIBRARY database DD statement will look
            like this:

            //LIBRARY1 DD DSN=PROD.S2K.LIBRARY1,DISP=OLD

                 DEFAULT  S2K.R121

   9.  DBVOL=_____________________

            specifies the volume serial number of the disk on which the
            validation databases will be allocated.  This parameter must
            be specified.

                 NO DEFAULT

   10. DBUNIT=____________________

            specifies the unit device type for a database disk.

                 DEFAULT  SYSDA

   11. DBBLK=_____________________

            specifies the database block size.  This value should be
            chosen to effectively utilize the device type track size.
            All pool sizes are listed in the Product Support Manual with
            the discussion of the POOL parameter.

                 DEFAULT  6216

   12. SYSOUT=_______________

            specifies the system output class that will be used for all
            print output.

                 DEFAULT A

After you run job JCLS2KIV and members have been created on your SYSTEM 2000 CNTL library, you can use job JCLPROCL to move members to your site's PROCLIB, CLIST, and SYSHELP libraries. The next three parameters allow you to specify those library names.

   13. PROCLIB=_____________________________

            specifies the full data set name of the PROCLIB library.

                 DEFAULT  SYS3.PROCLIB

   14. SYSPROC=_____________________________

            specifies the full data set name of the CLIST library.

                 DEFAULT  SYS3.CMDPROC

   15. SYSHELP=_____________________________

            specifies the full data set name of the SYSHELP library.

                 DEFAULT  SYS3.HELP

   16. SU11=________________________________

            specifies the REUSE parameter for TSO ALLOCATE commands.
            This value can be REUSE or null if the REUSE parameter is
            not supported at your site.

                 DEFAULT  REUSE

   17. SUMU=________________________________

            specifies whether you want the TSO CLISTs to execute
            single-user or Multi-User.

                 DEFAULT SU

   18. FREE=________________________________

            specifies whether you want the TSO CLISTs to free the
            database files or leave them allocated.  Values are YES or
            NO.

                 DEFAULT  NO

   19. WRKUNIT=___________________

            specifies the unit device type for all work files.

                 DEFAULT  SYSDA

   20. LINKPGM=___________________

            specifies the name of the linkage editor.

                 DEFAULT  IEWL

   21. ASMPGM=____________________

            specifies the name of the assembler.  If you specify IEV90,
            a SYSLIN DD statement is generated in job JCLASM.  For
            assembler IFOX00 and any other assembler, a SYSGO DD
            statement is generated.

                 DEFAULT  IEV90

   22. COBPGM=____________________

            specifies the name of the COBOL compiler.

                 DEFAULT  IKFCBL00

   23. FORTPGM=___________________

            specifies the name of the VS FORTRAN (R2 or greater)
            compiler.

                 DEFAULT  FORTVS

   24. PL1PGM=____________________

            specifies the name of the PL/I compiler.

                 DEFAULT  IEL0AA

   25. LANG=______________________

            specifies the release level of the VS FORTRAN compiler.  For
            Release 2.0 use FTN2.  For Release 3.0 and greater, use
            FTN3.

                 DEFAULT  FTN3

   26. PARMS=_____________________

            specifies the member on the CNTL library that contain
            SYSTEM 2000 execution parameters for single user jobs.

                 DEFAULT  NLPARM

   27. BASE=______________________

            specifies you are installing the base SYSTEM 2000 software.
            Values are YES or NO.

                 DEFAULT  YES

   28. MUP=_______________________

            specifies you are installing the Multi-User software.  Value
            are YES or NO.

                 DEFAULT  YES

   29. ACTIND=____________________

            specifies the high-level index for the data sets that will
            be the Accounting Log files.  If you specify
            S2K.R121.ACCOUNT, the Accounting Log file names will be
            S2K.R121.ACCOUNT.MANX and S2K.R121.ACCOUNT.MANY.

                 DEFAULT  S2K.R121.ACCOUNT

   30. ACTVOL=____________________

            specifies the volume serial of the disk on which the
            Accounting Log files will be allocated.

                 NO DEFAULT


   31. ACTNBR=____________________

            specifies the number of blocks for the Accounting Log files.

                 DEFAULT  1000

   32. ACTUNIT=___________________

            specifies the unit device type of the disk on which the
            Accounting Log files will be allocated.

                 DEFAULT  SYSDA

   33. ACTBLK=____________________

            specifies the block size of the Accounting Log files when
            they are built and when they are dumped to tape or disk.

                 DEFAULT  9076

   34. SVCNUM=__________

            specifies the SVC number, which your systems programmer must
            supply.  The number must be from the valid range of 200
            through 255.  Both types of Multi-User (XMS and SVC) require
            an SVC slot that is used exclusively by Release 12.1
            SYSTEM 2000 Multi-User software.  See Chapter 3  for
            additional requirements if you are installing the SVC
            Multi-User software.

                 NO DEFAULT

   35. XMS=__________

            specifies that you are installing XMS Multi-User.  Values
            are YES or NO.

                 DEFAULT YES

   36. AUTH=______________________

            specifies the authorized library, designated by your systems
            programmer, to which load modules S2KCMC and S2KPC are to be
            copied.  This value is not required if you are installing
            non-XMS Multi-User software.

                 DEFAULT  S2K.R121.AUTH

   37. S2KCOM=____________________

            specifies the full data set name of the 30-byte file S2KCOM.
            This value is not required if you are installing non-XMS
            Multi-User software.

                 DEFAULT  S2K.R121.COM

   38. XMSVOL=____________________

            specifies the volume serial of the disk on which the S2KCOM
            file is to be allocated.  This parameter must be specified
            if you are installing XMS Multi-User.

                 NO DEFAULT

   39. CICS=______________________

            specifies you are installing the CICS interface.  Values are
            YES or NO.

                 DEFAULT YES

   40. CICSVER=______________________

            specifies the single digit version of CICS.  Specify 2 for
            releases prior to CICS 3.2), specify 3 for CICS 3.2 (and
            greater), specify 4 for CICS 4.1 (and greater), and 5 for
            CICS 5.1 (and greater).

            Note: the JCL and members generated for CICS 3.2 (and
            greater) and releases earlier than CICS 3.2 generate
            different code.  If you are running both environments, it is
            recommended that you create and maintain separate CNTL
            libraries.

                 DEFAULT 3

   41. S2KLIB=________________________

            specifies the name of the VSAM S2KLIB for the Command
            Editor.

                 DEFAULT S2K.CICS.S2KLIB

   42. CICSMAC=_______________________________

            specifies the name of the CICS macro library.  This library
            is included to pick up CICS macros required for assembling
            the interface.

                 DEFAULT  CICS.MACLIB


   43. CICSLOAD=_______________________________

            specifies the name of the CICS load library.  This library,
            which contains the language translators, is referenced in
            the link-edit step in the validation program(s).

                 DEFAULT  CICS.LOADLIB

   44. CICSCOB=_______________________________

            specifies the name of the CICS COBOL copy library.  This
            library is required for linking a CICS COBOL program.

                 DEFAULT  CICS.COBLIB

   45. CICSPL1=_______________________________

            specifies the name of the CICS PL/I load library.  This
            library is required for linking a CICS PL/I program.

                 DEFAULT  CICS.PL1LIB

   46. COBLIB=_______________________________

            specifies the name of the system COBOL load library.  This
            library is required for linking a COBOL program.

                 DEFAULT  SYS1.COBLIB

   47. PL1LIB=_______________________________

            specifies the name of the system PL/I load library.  This
            library is required for linking a PL/I program.

                 DEFAULT  SYS1.PL1BASE

   48. PRELOAD=_______________________________

            specifies the name of the SYSTEM 2000 LOAD library.  This
            library contains the PLEX precompiler(s) needed to run the
            macro-level interface validation program(s).  If you do not
            run the macro-level interface, leave this blank so that
            PRELOAD will default to the same value as LOAD.

                 DEFAULT  same as LOAD

   49. SYS1MAC=_______________________________

            specifies the name of the system macro library.  This
            library is included to pick up system macros that are
            required to assemble the interface.

                 DEFAULT  SYS1.MACLIB

   50. SYS1MOD=___________

            specifies the name of the system generation macro library.
            This library is included to pick up system macros that are
            required to assemble the interface.

                 DEFAULT  SYS1.MODGEN

   51. QUEX=____________________

            specifies that you are installing the QueX software.  Values
            are YES or NO.

                 DEFAULT YES

Top of Document   Top of Appendix

Appendix B - Library S2K.R121.LOAD

The following list shows the load modules on S2K.R121.LOAD. All of these modules are generated via the standard IBM linkage editor. Interpret the Mode column as follows: blank means AMODE=24, RMODE=24. A31 means AMODE=31, RMODE=24. R31 means AMODE=31, RMODE=ANY.

Names preceded by an asterisk will not be on your LOAD library until you have run jobs JCLCL01, JCLCL02, JCLCL03, and JCLCL04 (for the macro-level interface, jobs JCLASM1 and JCLLINK).

+--------------------------------------------------------------------+
|    Abbreviations:                                                  |
|                                                                    |
|    A    - Assembler PLEX            P    - PL/I PLEX               |
|    AL   - Accounting Log            QueX - QueX Software           |
|    ALL  - All features or special   RB   - Rollback (Recovery)     |
|           functions                 RW   - Report Writer           |
|    C    - COBOL PLEX                SCF  - Self-Contained Facility |
|    CICS - CICS Interface            SU   - single-user             |
|    F    - FORTRAN PLEX              USI  - Universal Software      |
|    MU   - Multi-User                       Interface               |
|    MT   - Multi-Thread                                             |
|                                                                    |
+--------------------------------------------------------------------+
------------------------------------------------------------------------
Module      Required          Entry
Name        by         Mode   Point       Description
------------------------------------------------------------------------

$AVOPTS     ALL               $AVOPTS     Routine to load S2KSETI at
                                          execution time

@ADABEND    QueX              ADABEND     QueX load module

@ADCATIO    QueX              ADCATIO     QueX load module

@ADTRMIO    QueX              ADTRMIO     QueX load module

@CMSEDTR    QueX              CMSEDTR     QueX load module

ACTUTIL     AL                ACTUTIL     Utility routine to format and
                                          dump MU Accounting Log files

ADCATCTL    QueX              ADCATCIL    QueX load module

ADESTERM    QueX              ADESTERM    QueX load module

*ASMCCL     CICS              ASMCCL      Assembler command-level
                                          validation program

CFIND       ALL               CFINDCH     Hierarchical Table (HT)
                                          Validation Program

*CICSAB     CICS              CICSAB      Interface module included with
                                          S2KCICS

*CICSMAC    CICS              CICSMAC     Interface module included with
                                          S2KCICS

*CICSPLI    CICS              CICSPLI     Interface module included with
                                          S2KCICS

*CICSPLR    CICS              CICSPLR     Interface module included with
                                          S2KCICS

*CICSS2KA   CICS              CICSS2KA    S2KA transaction module

CLEARS2K    MU                CLEARS2K    Utility routine to clear
                                          tables kept in Type 2 SVC for
                                          MU

CLUDUMP     CICS       R31    CLUDUMP     UDMP transaction module

*COBCCL     CICS                          COBOL command-level validation
                                          program

CONVERT     CICS       R31    CONVERT     Command Editor module

CVRT121     ALL               CVRT121     Database conversion program

*DFHPEP     CICS              DFHPEP      Program Error Program

DIAG2000    MU                DIAG2000    Program to produce reports
                                          from the S2K Diagnostic Log

DUMPXX      UTILITY           DUMPXX      Program to snap dump selected
                                          pages of a file

EDITENAB    USI               EDITENAB    Routine to implement extended
                                          item editing

EDJRNL      CICS       R31    EDJRNL      Command Editor module

EX00CALL    USI               EX00CALL    EXIT00 sample database call
                                          table

EX15CALL    USI               EX15CALL    EXIT15 sample database call
                                          table

EX16CALL    USI               EX16CALL    EXIT16 sample database call
                                          table

EX19CALL    USI               EX19CALL    EXIT19 sample database call
                                          table

EX20CALL    USI               EX20CALL    EXIT20 sample database call
                                          table

FIL4VAL     UTILITY           FIL4VAL     File 4 verification program

FINDMSG     QueX              FINDMSG     QueX load module

FORMATSK    ALL        A31    FORMATSK    Subtask to format database
                                          file

GENIUS      GENIUS            GENIUS      Genius executable module

*GENUSER    CICS              GENUSER     Interface module included with
                                          S2KCICS

GETNXLEX    CICS       R31    GETNXLEX    Command Editor module

GOTOSAS     ALL        A31    GOTOSAS     Module to hold information
                                          about PLEX programs and
                                          communications with the SAS
                                          System

IDTRANS     QueX              IDTRANS     QueX load module

IOAID       CICS       R31    IOAID       Command Editor module

IOCTRL      CICS       R31    IOCTRL      Command Editor module

IOMEMBR     CICS       R31    IOMEMBR     Command Editor module

LOADTSK     ALL        A31    LOADTSK     Subtask to restore a saved
                                          database

LOGDUMP     UTILITY           LOGDUMP     Utility program to selectively
                                          print MU Diagnostic Log

MUABEND     CICS              MUABEND     Interface module included with
                                          S2KCICS

MUDRIVER    CICS              MUDRIVER    Interface module included with
                                          S2KCICS

MUPLINT     C,P,F,            MSYSTM2     Interface used for runtime
            or A                          communication between MU and
            under MU                      PLEX program (loaded by
                                          S2KPLR)

MUPLINT$    CICS              MUPLINT$    Interface module included with
                                          S2KCICS

MUPOSTAB    CICS              MUPOSTAB    Interface module included with
                                          S2KCICS

NO522       MU         R31    NO522       Subtask attached by both MU
                                          region and dependent region to
                                          prevent OS 522 abends

OPENWAIT    USI        A31    OPENWAIT    Subtask to open a Keepfile or
                                          TAPES2K DCB

OUTBLD      CICS       R31    OUTBLD      Command Editor module

PADCALC     ALL               PADCALC     Utility to calculate the PADxx
                                          parameter

PLXFRMT     CICS       R31    PLXFRMT     PLEX format module

PLXINIT     CICS       R31    PLXINIT     PLEX initialization module

PLXPBLD     CICS       R31    PLXPBLD     PLEX module linked with user
                                          application

PLXSHUT     CICS       R31    PLXSHUT     PLEX shutdown program

PLXSTOP     CICS       R31    PLXSTOP     PLEX check for missing STOP
                                          S2K program

PLXTERM     CICS       R31    PLXTERM     PLEX termination module

*PL1CCL     CICS                          PL/I command-level validation
                                          program

PRCOMA      A                 MAIN        Assembler language PLEX
                                          processor

PRCOMC      C                 MAIN        COBOL language PLEX processor

PRCOMF      F                 MAIN        FORTRAN language PLEX
                                          processor

PRCOMP      P                 MAIN        PL/I language PLEX processor

QAEXIT      UTILITY    R31    QAEXIT      Timing and I/O statistics
                                          routine for SCF

QASTAT      UTILITY    R31    QASTAT      Timing and I/O statistics
                                          routine for PLEX

QUEXCICS    QueX              QUEXCICS    QueX executable module under
                                          CICS

QUEXPGM     QueX              QUEXSTRT    QueX executable module under
                                          TSO

QUEXSCRN    QueX              QUEXSCRN    QueX application screens -
                                          QX01, QX04, QX05

QUEXSTRT    QueX              QUEXSTRT    QueX initialization routine

QULINK      QueX              QULINK      QueX load module

QUS2KP      QueX              QIS2LP      QueX load module

QUTBLD      QueX              QUTBLD      QueX load module

QUVBPGM     QUVB              QUVBCTL     QUVB executable module

QUVBSCRN    QUVB              QUVBSCRN    QUVB application screens -
                                          QB01, QB03, LK01

QUWHCC      QueX              QUWHCC      QueX load module

QXBLDMNU    QueX              QXBLDMNU    QueX load module

QXBLDSCR    QueX              QXBLDSCR    QueX load module

QXCNTL      QueX              QXCNTL      QueX load module

QXCTRL      QueX              QXCTRL      QueX load module

QXINIT      QueX              QXINIT      QueX load module

QXPARS      QueX              QXPARS      QueX load module

QXRDMENU    QueX              QXRDMENU    QueX load module

QXRDSCR     QueX              QXRDSCR     QueX load module

QXSCRMGR    QueX              QXSCRMGR    QueX load module

QXSCRTAB    QueX              QXSCRTAB    Generate application screen
                                          tables

QXUTIL      QueX              QXUTIL      QueX load module

QX1009 -    QueX              QX1009 -    Help screens
QX1016                        QX1016

QX1018 -    QueX              QX1018 -    Help screens
QX1105                        QX1105

RECHAIN     RECHAIN           RECHAIN     File 5 reusable space chain
                                          verification program

RWTCOM01    RW         R31    RWTCOM      Data area used by REPORT
                                          processor

*SASASCE    S2K               SASASCE     Assembler PLEX validation
                                          program

*SASCBCE                      SASCBCE     COBOL PLEX validation program

*SASFOCE                      SASFOCE     FORTRAN PLEX validation
                                          program

*SASPLCE                      SASPLCE     PL/I PLEX validation program

SAVECHK     S2K               SAVECHK     Savefile verification program

SAVETSK     ALL        A31    SAVETSK     Subtask to save a database

SCFDRVR     CICS       R31    SCFDRVR     SCF driver module

SCFERROR    CICS       R31    SCFERROR    SCF error message text module

SCFINTF     CICS       R31    SCFINTF     SCF interface module

SCFPGBD     CICS       R31    SCFPGBD     SCF page build module

SCFPGMG     CICS       R31    SCFPGMG     SCF page management module

SCFTERM     CICS       R31    SCFTERM     SCF termination module

SETMODE     CICS       R31    SETMODE     Command Editor module

SMCNTL      SMON              SMCNTL      Alias of SMON

SMON        optional          SMCNTL      Utility to reenter Session
                                          Manager after exiting the QueX
                                          software or QUVB

*SVCADR$    CICS              SVCADR      Interface module included with
                                          S2KCICS

SYS2K       SCF-SU     R31    S2K         Executable module used by SCF
            ALL-MU                        users in SU and by all users
                                          in MU

SYS2KJOB    SCF under         MSYS2K      Interface used for runtime
            MU                            communication between
                                          SYSTEM 2000 software and SCF
                                                  user in MU; location of user
                                          files

SYS2KTPI    SCF under         SCFTP2I     Interface used for runtime
            MU (TSO                       communication between
            only)                         SYSTEM 2000 software and SCF
                                          user in MU using TSO
                                          foreground; allows LOCAL files
                                          as well as user files in MU
                                          and has a local output file

SYS2KTSO    SCF under         SCFTP2I     Alias of SYS2KTPI
            MU (TSO
            only)

S2CONSOL    MU         A31    S2CONSOL    Subtask to wait on console
                                          modify command

S2EXIT      USI               S2EXIT      SYSTEM 2000 interface to
                                          user-exit code

S2KACCT     ALL        A31    ACTIPL      MU Accounting Log routine;
                                          loaded by MU (S2000) if
                                          accounting enabled

S2KADRC     CICS       R31    S2KADRC     SYSTEM 2000 SVC communication
                                          module

*S2KATTCH   CICS              S2KATTCH    Module that attaches the S2KA
                                          transaction

*S2KCICS    CICS              S2KCICS     Main SYSTEM 2000 interface
                                          executable program

S2KCMC      XMS        A31    S2KCMC      Control program to set up the
                                          XMS environment and initialize
                                          MU for XMS

S2KCOPY     MU under   A31    S2KCOPY     MU SVC routine to move data
            SVS, MVS,                     areas from one region to
            TSO or a                      another (if required, must be
            fetch-                        linked into SCP nucleus)
            protected
            system

*S2KCUSE    CICS              S2KCUSE     CICS user module

S2KDBAP     XBUF       A31    S2KXBUF     Alias of S2KXBUF

S2KDLT      CICS       R31    S2KDLT      Command Editor module

S2KDMV6     SCF under  A31    S2KDMV6     Interface used to invoke
            SAS                           Version 6 of the SAS system

S2KDSPL     CICS       R31    S2KDSPL     Command Editor module

S2KEDTRT    CICS       R31    S2KEDTRT    Command Editor module

S2KEND      CICS       R31    S2KEND      Command Editor module

S2KEPROC    CICS       R31    S2KEPROC    Command Editor module

S2KERR      CICS       R31    S2KERR      Command Editor module

S2KEXIN     USI               S2KEXIN     EXIT00 code for user-exit
                                          methodology

S2KFIND     CICS       R31    S2KFIND     Command Editor module

S2KGET      CICS       R31    S2KGET      Command Editor module

S2KGLOAD    UTILITY    R31    LOADGEN     COBOL PLEX load program
                                          generator

S2KGUNLD    UTILITY    R31    UNLDGEN     COBOL PLEX unload program
                                          generator

S2KINS      CICS       R31    S2KINS      Command Editor module

S2KIO       ALL        A31    S2KIO       I/O coordination routine
                                          (loaded by module S2K for SU
                                          and by SUPS2K for MU)

S2KLIST     CICS       R31    S2KLIST     List transaction module

S2KLISTD    CICS              S2KLISTD    Command Editor module

S2KMDFY     CICS       R31    S2KMDFY     Command Editor module

S2KOSCRN    CICS       R31    S2KOSCRN    CICS interface screen input
                                          utility program

S2KPC       XMS        A31    S2KPC       Routine to handle interregion
                                          communication in an XMS
                                          environment

S2KPFKY     CICS       R31    S2KPFKY     User PF key definitions module

S2KPL       C,P,F,     R31    S2KPL       Interface used by PLEX
            or A                          programs at run time (linked
                                          with user's program; loads
                                          S2KPLR at run time)

*S2KPLC     CICS              S2KPLC      Module linked with application
                                          program

S2KPLI      C,P,F,     R31    S2KPLI      Executable module used by PLEX
            or A                          programs in SU only (loaded by
            (non-MU)                      S2KPLR at run time for PLEX)

*S2KPLITC   CICS              S2KPLITC    COBOL command-level validation
                                          program

S2KPLR      C,P,F,     A31    S2KPLR      Interface used in run time
            or A                          communication between
                                          SYSTEM 2000 software and PLEX
                                          programs (loaded by S2KPL at
                                          run time; loads S2KPLI in SU
                                          and loads MUPLINT in MU)

S2KPLR$     CICS              S2KPLR$     Interface module included with
                                          S2KCICS

*S2KPL1     CICS              S2KPL1      PL/I command-level validation
                                          program

S2KPTR      CICS       R31    S2KPTR      Command Editor module

S2KRESET    CICS       R31    S2KRESET    CICS command-level utility
                                          program

S2KRBX  S2K3D  S2K33                      SYSTEM 2000 modules included
S2KRB0  S2K3E  S2K34                      together by PRELNK to create
S2KRB3  S2K3F  S2K35                      executable modules SYS2K and
S2KRB5  S2K3H  S2K36                      S2KPLI
S2KRW   S2K3I  S2K37
S2K00   S2K3J  S2K38
S2K10   S2K30  S2K39
S2K3B   S2K31  S2K50
S2K3C   S2K32

S2KSAVE     CICS       R31    S2KSAVE     Command Editor module

S2KSBMT     CICS       R31    S2KSBMT     Command Editor module

S2KSCR      CICS       R31    S2KSCR      Command Editor module

S2KSEND     CICS       R31    S2KSEND     Command Editor module

S2KSETI     ALL               S2KSETI     Independent utility to
                                          authorize new SAS Institute
                                          Program Products and renew
                                          authorization for currently
                                          licensed products

S2KSETPF    CICS       R31    S2KSETPF    Command Editor module

S2KSIP      ALL        A31    S2KSIP      Routine to initialize
                                          SYSTEM 2000 work areas (loaded
                                          by SYS2K or S2KPLI at
                                          initialization time; loads
                                          S2KPARM)

*S2KSRTRR   CICS              S2KSRTRR    System Recovery Table program

*S2KUEXP    CICS              S2KUEXP     PL/I command-level program to
                                          enable the KCP user exit

*S2KUEXST   CICS              S2KUEXST    COBOL command-level program to
                                          enable the KCP user exit

S2KVCON     CICS              S2KVCON     Interface module included with
                                          S2KCICS

S2KXBUF     XBUF       A31    S2KXBUF     Control program to execute
                                          XBUF

S2OP        MU                S2OP        Alternate console routine

S2OPJOB     MU                S2OP        Alias of S2OP

S2OPTSO     MU                S2OP        Alias of S2OP

S2000       MU         R31    SUPS2K      MU routine to schedule
                                          SYSTEM 2000 usage for batch
                                          and TP users

*TERMS2K    CICS              TERMS2K     TERM transaction program

TIMDAT      UTILITY           TIMDAT      Assembly load module routine
                                          linked with MU validation
                                          programs

TRDCOM01    SCF,C,P,   R31    TRDCOM      Data area used by non-RW
            F or A                        system

UPKEEP      UTILITY           UPKEEP      Routine to inspect Update Log
                                          and Keepfile
USERCOM     ALL        R31    USERCOM     User communication block
                                          (loaded by SYS2K or S2KPLI
                                          from LOAD library)

USEREDIT    USI               USEREDIT    Edit tables for sample
                                          extended item editing system

USERID      CICS       R31    USERID      Command Editor module

WAITUNIT    ALL        A31    WAITUNIT    Subtask to wait for a SAVE
                                          unit

XBUFTBL     XBUF              XBUFTBL     Pregenerated XBUF table

*XKCREQ     CICS              XKCREQ13    Task Control Program user exit

Top of Document   Top of Appendix

Appendix C - Library S2K.R121.SOURCE

------------------------------------------------------------------------
Member
Name              Description
------------------------------------------------------------------------
#ADPFKEQ          QueX macro
#PLIDATA          Parameter list copy member for PLEX calls to
                  SYSTEM 2000 software
ACTIO             Multi-User accounting I/O source program
AID               Macro
ASMCCL            Assembler validation source program
AUTHFUNC          Macro
BACKSAVE          Macro
BASETEXT          Installation instructions
BASSM             Macro for SVC assembly
BSM               Macro for SVC assembly
BUILDPCI          Macro
CACHE             Macro for XBUF assembly
CATDATA           QUEXCATALOG database loader string data
CATDEFIN          QUEXCATALOG database command file
CHAIN             Macro
CICSAB            Assembler interface program
CICSADDR          Macro
CICSDRI           Assembler interface program
CICSGETM          Macro
CICSID            Macro
CICSLVA           Macro
CICSMAC           Assembler interface program
CICSPLI           Assembler interface program
CICSPLR           Assembler interface program
CICSS2KA          Assembler interface program
CICSWAIT          Macro
CLMASMC           Installation macro to generate job JCLCL04
CLMASML           Installation macro to generate job JCLCL01
CLMCOBC           Installation macro to generate job JCLCL02
CLMPL1C           Installation macro to generate job JCLCL03
CLMUIDZ           Installation macro to generate job JCLCLUZ
CLUDUMP           S2KCUSE dump program
CLUIDZAP          Zap cards for job JCLCLUZ
COBCCL            COBOL command-level validation program
COCHK             Macro to validate a component number
COEDIT            Macro to initiate value table generation for a
                  component
COMDS             Macro
CONVERT           CICS command-level conversion routine
COPYRITE          Copyright notice
COVALUE           Macro to generate a component value table entry
CSDQUEX           CICS RDO table definitions for QueX software
CSDS2K            CICS RDO table definitions for SYSTEM 2000 software
CSDS2K21          CICS RDO table definitions for SYSTEM 2000 software
                  prior to CICS 3.2
CTRLDFLT          Macro
CTRLREC           Macro
DAID3270          CICS Interface SCF PF Key settings
DBCALL            Macro to generate user exit call table entries
DBCALL$           Sample input to generate value
                  verification/replacement tables for LIBRARY database
DBCHK             Macro used for the user-exit methodology
DBEDIT            Macro to define the start of database edit criteria
DBTABLE           Macro to generate a list of database names and edit
                  table entries
DDBCALL           Macro to define a user-exit call table entry
DDBEDIT           Macro to define a database edit table entry
DEFEREGS          Macro
DEXTPARM          Macro for generating USI (S2EXIT)
DFHDCT            CICS table for Destination Control Table
DFHFCT            CICS table for File Control Table
DFHKCEXT          Task Control Program user exit prior to CICS 1.5
DFHPCT            CICS table for Processing Control Table
DFHPCTML          CICS Program Control Table macro definition
DFHPEP32          Assembler interface program for Program Error Program
                  for CICS 3.2 and above
DFHPEP21          Assembler interface program for Program Error Program
DFHPPT            CICS table for Program Processing Table
DFHPPTML          CICS Processing Program Table macro definition
DIAG2000          COBOL source utility to produce summary report for
                  SYSTEM 2000 Diagnostic Log file
DIRA              Macro for SVC assembly
DJOBQ             Macro for SVC assembly
DOPERAID          Macro
DPLRBLKS          Macro
DRVRSTRG          Macro
DSCFERR           Macro
DSCHCVT           Macro for SVC assembly
DSTACE            Macro
DSTOPPRM          Macro
DSVCTBL           Macro for SVC assembly
DS2KCUSE          Macro
DS2KPCI           Macro
DS2KVCON          Macro
DUCB              Macro
DUMPXX            Source program to snap dump selected pages of a file
DURB              Macro for SVC assembly
DURBMU            Macro
EDITCOM           CICS macro
EDITENAB          Source to implement user-exit methodology
EDITERR           Macro to issue macro error messages
EDJRNL            CICS Command Editor module
EDMEMBR           CICS Command Editor module
EMPDEFIN          Command File to create EMPLOYEE database
EMP1DATA          First loader string data for EMPLOYEE database
ENDLNK            Macro used in PRELNK for configuring executable
                  modules
ENDS2K            Macro for S2KDSN user-exit routine assembly
ENTERMU           Macro
EPOSTAB           Macro
EQUREGS           Macro
EXITAREA          Macro to define areas used by user-exit routines
EXITBGN           User-exit prologue macro
EXITEND           User-exit epilogue macro
EXTPARM           Macro to define user-exit parameter list
EXTWAIT           Macro used in generating user-exit interface
FINDPCI           Macro
FINDSTAC          Macro
FINDTERM          Macro
FINDURBS          Macro
FREESTAC          Macro
FREEURB           Macro
GENPCI            Macro
GENROUT           Macro
GENSTACT          Macro
GENURBS           Macro
GENURB1           Macro
GENUSER           CICS member
GETNXLEX          CICS Command Editor module
GETURB            Macro
GROUP             Macro used in PRELNK for configuring executable
                  modules
GVTNOTE           Restricted Rights Legend
HXDIGIT           Macro to convert decimal SVC number to hexadecimal
IDUSER            Macro
INITMU            Macro
IOAID             CICS Command Editor module
IOCTRL            CICS Command Editor module
IOMEMBR           Assembler interface program
JBTTACG           Tuning Tools batch job
JBTTACT1          Tuning Tools batch job
JBTTACT2          Tuning Tools batch job
JBTTACT3          Tuning Tools batch job
JBTTACT4          Tuning Tools batch job
JBTTACT5          Tuning Tools batch job
JBTTACT6          Tuning Tools batch job
JBTTACT7          Tuning Tools batch job
JBTTACT8          Tuning Tools batch job
JBTTDIA1          Tuning Tools batch job
JBTTDIA2          Tuning Tools batch job
JBTTNDX           Tuning Tools job index
JCLGENER          JCL to unload media file JCLINST
JCLINST           JCL to allocate and unload all delivery media files
JCLS2KIV          JCL to assemble and execute installation macro
                  S2KIVJCL
KEYTABLE          CICS command Editor macro
LIBDEFN           Command File to create LIBRARY database and run SCF
                  validation
LIBLDER           Loader string data for LIBRARY database
LISTSCRN          Macro
LSTCOMM           Macro
MACACT            Macro to generate job JCLACT
MACALLOC          Macro to generate job JCLALLOC
MACASM            Macro to generate job JCLASM
MACASML           Installation macro to generate job JCLASM1
MACASMM           Installation macro to generate job JCLASMM
MACBACK           Macro to generate job JCLBACK
MACBDBAL          Macro to generate proc S2KDBAL
MACBSS2K          Macro to generate proc SASS2K
MACB2KMU          Macro to generate proc S2KMU
MACB2KSU          Macro to generate proc S2KSU
MACCEDIT          Macro to generate job JCLCEDIT
MACCFIND          Macro to generate job JCLCFIND
MACCICS           Macro to generate job JCLCICS
MACCIZAP          Macro to generate job JCLCIZAP
MACCNVRT          Macro to generate job JCLCNVRT
MACCOB            Macro to generate job JCLCOB
MACCOBC           Macro to generate job JCLCOBC
MACCOBII          Macro to generate job JCLCOBII
MACCPLEX          Macro to generate job JCLCPLEX
MACCSCF           Macro to generate job JCLCSCF
MACCSDU           Macro to generate job JCLCSDU
MACDEL            Macro to generate job JCLDEL
MACDEMO           Macro to generate DEMOFILE CLIST
MACDIAG           Macro to generate job JCLDIAG
MACDIAGX          Macro to generate job JCLDIAGX
MACDOC            Macro to generate job JCLDOC
MACDUMP           Macro to generate job JCLDUMP
MACEMP            Macro to generate job JCLEMP
MACEXIT           Macro to generate job JCLEXIT
MACFFDI           Macro to generate job JCLFFDI
MACFORT           Macro to generate job JCLFORT
MACFRDB           Macro to generate S2KFRDB CLIST
MACFRDBH          Macro to generate S2KFRDB help file
MACF5CNT          Macro to generate job JCLF5CNT
MACGCBGO          Macro to generate job JCLGCBGO
MACGCOB           Macro to generate job JCLGCOB
MACGDEF           Macro to generate job JCLGDEF
MACGDESC          Macro to generate job JCLGDESC
MACGENCB          Macro to generate job JCLGENCB
MACGENIH          Macro to generate Genius help file
MACGNIUS          Macro to generate Genius CLIST
MACGPL1           Macro to generate job JCLGPL1
MACINST           Macro to generate job JCLIST
MACLINK           Macro to generate job JCLLINK
MACMU             Macro to generate job JCLMU
MACMUDEP          Macro to generate job JCLMUDEP
MACMUPLX          Macro to generate job JCLMUPLX
MACPEP            Macro to generate job JCLPEP
MACPERS           Macro to generate job JCLPERS
MACPL1            Macro to generate job JCLPL1
MACPL1C           Macro to generate job JCLPL1C
MACPROCL          Macro to generate job JCLPROCL
MACRELNK          Macro to generate job JCLRELNK
MACSAS2K          Macro to generate SASS2K CLIST
MACSCF            Macro to generate job JCLSCF
MACSET            Macro to generate job JCLSET
MACSRT            Macro to generate table entries DFHSRT
MACSS2KH          Macro to generate SASS2K help file
MACSVC            Macro to generate job JCLSVC
MACS2K            Macro to generate S2K CLIST
MACS2KH           Macro to generate S2K help file
MACS2KLN          Macro to generate job JCLS2KLN
MACS2OP           Macro to generate job JCLS2OP
MACUIDZ           Macro to generate job JCLUIDZ
MACVALED          Macro to generate job JCLVALED
MACVALID          Macro to generate job JCLVALID
MACVSAM           Macro to generate job JCLVSAM
MACXAUTH          Macro to generate job JCLXAUTH
MACXBUF           Macro to generate job JCLXBUF
MACZAP            Macro to generate job JCLZAP
MAC2KFR           Macro to generate S2KFREE CLIST
MAC2KFRH          Macro to generate S2KFREE help file
MAPAID            Macro
MQXALCAT          Macro to generate job JCLALCAT
MQXDIGIT          Macro
MQXFKZAP          Macro to generate job JCLQXZAP
MQXFKZPC          Macro to generate job JCLQXPFC
MQXFKZPT          Macro to generate job JCLQXPFT
MQXQUEX           Macro to generate QUEX CLIST
MQXQUEXH          Macro to generate QUEXH help file
MQXQUVB           Macro to generate QUVB CLIST
MQXQUVBH          Macro to generate QUVBH help file
MQXZAP            Macro to generate job JCLQXZAP
MRIASMC           Assembler validation source program
MRISVC            Macro for SVC assembly
MUABEND           Assembler interface program
MUDRIVER          Assembler interface program
MUPLINT$          Assembler interface program
MUPOSTAB          Assembler interface program
MUSVC             Assembler interface program
NLERRORS          Macro
OAID              Macro
OPENWAIT          Assembler program for special zap 161
OUTBLD            CICS Command Editor module
OUTTERM           CICS Command Editor module
PARSE             Macro for XBUF assembly
PERSDEFN          Command File to create PERSONNEL database
PERSLDER          Loader string data for PERSONNEL database
PLIINPUT          Input records to drive PLEX validation programs
PLXCOMA           Macro
PLXCOMC           Macro
PLXCOMP           Macro
PLXFRMT           CICS command-level PLEX module
PLXINIT           CICS command-level PLEX module
PLXPBLD           CICS command-level PLEX module
PLXSHUT           Termination logic for PLXSTOP
PLXSTOP           Stop S2K for Procedural Language Users
PLXTERM           CICS command-level PLEX module
PL1CCL            PL/I command-level validation program
POSTAB            Macro
PRELNK            Macro used for configuring executable modules SYS2K
                  and S2KPLI; associated macros are ENDLNK and GROUP
PUBDEFN           Command File to create PUBLISHERS database
PUTONQ            Macro for SVC assembly
QUEXPCT           CICS PCT entries
QUEXPPT           CICS PPT entries
ROLBACK1          Command File for rollback validation
ROLBACK2          Command File for rollback validation
ROLBACK3          Command File for rollback validation
RSETCOM           Macro
SASASCE           Assembler source program for Assembler PLEX test
SASCBCE           COBOL source program for COBOL PLEX test
SASFOCE           VS FORTRAN R2 (and greater) source program for FORTRAN
                  PLEX test
SASPLCE           PL/I source program for PL/I PLEX test
SCFCOMM           Macro
SCFDRVR           CICS command-level SCF module
SCFERROR          CICS command-level SCF module
SCFINTF           CICS command-level SCF module
SCFPGBD           CICS command-level SCF module
SCFPGMG           CICS command-level SCF module
SCFTERM           CICS command-level SCF module
SETBTEXT          S2KSETI parameters
SETCTEXT          S2KSETI parameters
SETEXIT           Macro to enable and address one or more user exits
SETMODE           CICS Command Editor module
SETMTEXT          S2KSETI parameters
SETQTEXT          S2KSETI parameters
SETREV            Assembler macro used during assembly of ALC routines
SETSTACE          Macro
SETUPCI           Macro
SVCADR$           Assembler interace program
SZ                SYSTEM 2000 special zaps
S2ABEND           Macro
S2GMAIN           Macro
S2IDUSR           Macro
S2INLOC           Macro
S2KADRC           SVC communication module
S2KATTCH          Assembler interface program
S2KCICS           Linkage control statements to link S2KCICS
S2KCUSE           Assembler source for CICS user module
S2KDLT            CICS Command Editor module
S2KDSPL           CICS Command Editor module
S2KEDTRT          CICS Command Editor module
S2KEND            CICS Command Editor module
S2KEPROC          CICS Command Editor module
S2KERR            CICS Command Editor module
S2KEXIN           Source for S2KEXIN to implement user exit methodology
S2KEX07           User-exit source to specify multiple local hold buffer
                  size
S2KEX13           User-exit source to inspect input SCF records
S2KEX42           User-exit source to clean up resources acquired by
                  user exits
S2KFIND           CICS Command Editor module
S2KGET            CICS Command Editor module
S2KGLOAD          PL/I source program for COBOL load program
S2KGUNLD          PL/I source program for COBOL unload program
S2KINS            CICS Command Editor module
S2KIVJCL          Macro to generate all installation JCL
S2KLIST           CICS list transaction module
S2KLISTD          CICS Command Editor module
S2KMDFY           CICS Command Editor module
S2KOSCRN          CICS interface screen input utility program
S2KPFKY           CICS user PF key definition module
S2KPGBLD          Macro
S2KPLC            Assembler interface program
S2KPLITC          COBOL command-level validation program
S2KPLR$           Assembler interface program
S2KPL1            PL/I command-level validation program
S2KPTR            CICS Command Editor module
S2KRESET          CICS command-level utility programm
S2KRETRN          CICS Command Editor module
S2KSAVE           CICS Command Editor module
S2KSBMT           CICS Command Editor module
S2KSCR            CICS Command Editor module
S2KSEND           CICS Command Editor module
S2KSETPF          CICS Command Editor module
S2KSRTRR          Assembler interface program
S2KSVC            Macro
S2KTRMZX          Additional Network Error Program statements
S2KTRM32          Additional Network Error Program statements
S2KUEXP           PL/I command-level program to enable Task Control
                  Program
S2KUEXST          COBOL command-level program to enable Task Control
S2KUGEN           Macro
S2KUPROC          Macro
S2KVCON           Assembler interface program
S2LOCK            Macro
S2RTRN            Macro
S2TWRIT           Macro
TERMS2K           Assembler interface program
TESTRW1           Command File for Report Writer validation
TGEN              Macro
TRACER            Macro
TTACG00           Tuning Tools
TTACG000          Tuning Tools
TTACG01           Tuning Tools
TTACG02           Tuning Tools
TTACG03           Tuning Tools
TTACG04           Tuning Tools
TTACG05           Tuning Tools
TTACG06           Tuning Tools
TTACT             Tuning Tools
TTACT0A           Tuning Tools
TTACT0A0          Tuning Tools
TTACT0A1          Tuning Tools
TTACT0A2          Tuning Tools
TTACT0A3          Tuning Tools
TTACT0A4          Tuning Tools
TTACT0A5          Tuning Tools
TTACT0B           Tuning Tools
TTACT0C           Tuning Tools
TTACT0D           Tuning Tools
TTACT0D0          Tuning Tools
TTACT00           Tuning Tools
TTACT01           Tuning Tools
TTACT010          Tuning Tools
TTACT02           Tuning Tools
TTACT020          Tuning Tools
TTACT021          Tuning Tools
TTACT03           Tuning Tools
TTACT04           Tuning Tools
TTACT05           Tuning Tools
TTACT050          Tuning Tools
TTACT051          Tuning Tools
TTACT06           Tuning Tools
TTACT07           Tuning Tools
TTACT08           Tuning Tools
TTAMUSES          Tuning Tools
TTATAPE           Tuning Tools
TTA000            Tuning Tools
TTA002            Tuning Tools
TTA003            Tuning Tools
TTA004            Tuning Tools
TTA005            Tuning Tools
TTA006            Tuning Tools
TTA007            Tuning Tools
TTA008            Tuning Tools
TTA012            Tuning Tools
TTDB              Tuning Tools
TTDB10A           Tuning Tools
TTDB101           Tuning Tools
TTDB102           Tuning Tools
TTDB501           Tuning Tools
TTDIA             Tuning Tools
TTDIA0A           Tuning Tools
TTDIA0A0          Tuning Tools
TTDIA0C           Tuning Tools
TTDIA01           Tuning Tools
TTDIA010          Tuning Tools
TTDIA02           Tuning Tools
TTDIA03           Tuning Tools
TTDIA030          Tuning Tools
TTDIA04           Tuning Tools
TTD0001           Tuning Tools
TTD0002           Tuning Tools
TTD0003           Tuning Tools
TTD0004           Tuning Tools
TTD0005           Tuning Tools
TTD0006           Tuning Tools
TTD0007           Tuning Tools
TTD0008           Tuning Tools
TTD0009           Tuning Tools
TTD0010           Tuning Tools
TTD0011           Tuning Tools
TTD0012           Tuning Tools
TTD0013           Tuning Tools
TTD0014           Tuning Tools
TTD0015           Tuning Tools
TTD0016           Tuning Tools
TTD0017           Tuning Tools
TTD0018           Tuning Tools
TTD0019           Tuning Tools
TTD0020           Tuning Tools
TTD0031           Tuning Tools
TTD0100           Tuning Tools
TTD0101           Tuning Tools
TTD0102           Tuning Tools
TTD0103           Tuning Tools
TTD0200           Tuning Tools  
TTD0201           Tuning Tools
TTD0202           Tuning Tools
TTD0203           Tuning Tools
TTD0204           Tuning Tools
TTD0205           Tuning Tools
TTD0206           Tuning Tools
TTD0207           Tuning Tools
TTD0208           Tuning Tools
TTD0209           Tuning Tools
TTD0210           Tuning Tools
TTD0211           Tuning Tools
TTD0212           Tuning Tools
TTD0213           Tuning Tools
TTD0214           Tuning Tools
TTD0215           Tuning Tools
TTD0216           Tuning Tools
TTD0217           Tuning Tools     
TTD0300           Tuning Tools
TTD0301           Tuning Tools
TTD0302           Tuning Tools
TTD0303           Tuning Tools
TTD0304           Tuning Tools
TTD0399           Tuning Tools
UIDZAP            Zap cards for JCLUIDZ
UPKEEP            Source program for Update Log and Keepfile inspection
USERGEN           Macro
USERID            CICS Command Editor module
USERTWA           Macro
USERVSWA          Macro
VRBTABLE          Macro
XB                Macro for XBUF assembly
XBCACHE           Macro for XBUF assembly
XBDD              Macro for XBUF assembly
XBDDADD           Macro for XBUF assembly
XBDDVER           Macro for XBUF assembly
XBDUAL            Macro for XBUF assembly
XBLKSIZE          Macro for XBUF assembly
XBMEMORY          Macro for XBUF assembly
XBNUM             Macro for XBUF assembly
XBSTAT            Macro for XBUF assembly
XBUF              Macro for XBUF assembly
XBUFCB            Macro for XBUF assembly
XBUFTBL           Sample XBUF table
XBUFX0            Macro for XBUF assembly
XBUFX1            Macro for XBUF assembly
XBUFX2            Macro for XBUF assembly
XBXBADD           Macro for XBUF assembly
XBXBVER           Macro for XBUF assembly
XEQUREGS          Macro
XKCREQ            Task Control Program user exit

Top of Document   Top of Appendix

Appendix D - Library S2K.R121.CNTL

These members are added to your CNTL library when you run job JCLS2KIV.

------------------------------------------------------------------------
Member
Name              Description
------------------------------------------------------------------------
DEMOFILE          CLIST to set up demo database files
DFHSRT            CICS table for System Recovery Table
GENIUS            CLIST to execute Genius validation CLISTs
GENIUSH           Help file for Genius
JCLACT            JCL to build Accounting Log files
JCLALCAT          JCL to create QUEXCATALOG database
JCLALLOC          JCL to preallocate validation database files
JCLASM            JCL to validate Assembler PLEX
JCLASMM           JCL to assemble/link assembler validation program
                  MRIASMC
JCLASM1           JCL to assemble/link all interface programs
JCLBACK           JCL to create backup tape
JCLCEDIT          JCL to assemble/link Command Editor programs
JCLCFIND          JCL to execute the CFIND program
JCLCICS           JCL to be added to your CICS startup deck
JCLCIZAP          JCL to zap SVCADR in the CICS interface
JCLCLUZ           JCL to zap userid for S2KEDIT
JCLCL01           JCL to assemble/link interface programs
JCLCL02           JCL to compile/link COBOL command-level programs
JCLCL03           JCL to compile/link PL/I command-level programs
JCLCL04           JCL to assemble/link assembler command-level
                  validation
JCLCNVRT          JCL to convert databases to Release 12.1
JCLCOB            JCL to validate COBOL PLEX
JCLCOBC           JCL to compile/link COBOL command-level programs
JCLCOBII          JCL to compile/link COBOL program
JCLCPLEX          JCL to assemble/link CICS PLEX modules
JCLCSCF           JCL to assemble/link CICS SCF modules
JCLCSDU           JCL to update the CICS DFHCSD File
JCLDEL            JCL to delete validation database files
JCLDIAG           JCL to compile and link DIAG2000
JCLDIAGX          JCL to execute DIAG2000
JCLDOC            JCL to print installation instructions
JCLDUMP           JCL to execute the DUMPXX program
JCLEMP            JCL to create EMPLOYEE database
JCLEXIT           JCL to assemble exits 7, 14 and 32
JCLFFDI           JCL to copy a field fix distribution to disc
JCLFORT           JCL to validate FORTRAN PLEX (VS FORTRAN R2 and
                  greater)
JCLF5CNT          JCL to execute the RECHAIN program
JCLGCBGO          JCL to execute the generated COBOL unload and load
                  programs
JCLGCOB           JCL to compile and link the generated COBOL unload
                  programs
JCLGDEF           JCL to define a database using DESCRIBE/DEFINE output
JCLGDESC          JCL to create files for DESCRIBE and DESCRIBE/DEFINE
                  output
JCLGENCB          JCL to generate the COBOL unload and load programs
JCLGPL1           JCL to compile and link S2KGLOAD and S2KGUNLD
JCLINST           JCL to allocate and unload all delivery media files
JCLLINK           JCL to link S2KCICS and zap SVC number
JCLMU             JCL to initialize Multi-User software
JCLMUDEP          JCL to validate Multi-User software
JCLMUPLX          JCL to validate Multi-User PLEX
JCLPEP            JCL to assemble DFHPEP
JCLPERS           JCL to create PERSONNEL database
JCLPL1            JCL to validate PL/I PLEX
JCLPL1C           JCL to compile/link PL/I command-level programs
JCLPROCL          JCL to copy CLISTs, JCL procs, and help files to site
                  libraries
JCLQXPFC          JCL to zap QueX PF key settings for CICS
JCLQXPFT          JCL to zap QueX PF key settings for TSO
JCLQXZAP          JCL to zap Multi-User SVC number in QueX
JCLRELNK          JCL to clear the IDR table in a load module
JCLSCF            JCL to validate SCF and RW
JCLSET            JCL to execute S2KSETI utility
JCLSVC            JCL to assemble and install Multi-User SVC (SVC
                  Multi-User only)
JCLS2KLN          JCL to execute the PRELNK macro
JCLS2OP           JCL to execute the S2OP program
JCLVALID          JCL to list the contents of the VALID library
JCLVSAM           JCL to create a VSAM Command Editor PF key file
JCLXAUTH          JCL to install XMS SYSTEM 2000 code (XMS Multi-User
                  only)
JCLXBUF           JCL to create an XBUF table
JCLZAP            JCL to apply zap for Multi-User SVC number
MUPARM            Multi-User execution parameters
NLPARM            Execution parm data set for validation
QUEX              CLIST to execute the QueX software
QUEXH             QueX CLIST help file
QUVB              CLIST to execute the QueX User View Builder
QUVBH             QUVB CLIST help file
RWPARM            Execution parm data set for RW validation without USI
SASS2K            CLIST to execute SAS software and allocate SYSTEM 2000
                  files
SASS2KH           Help file for SASS2K CLIST
SASS2KP           JCL proc to execute SAS software and allocate
                  SYSTEM 2000 files
S2K               CLIST to execute SYSTEM 2000 software
S2KFRDB           CLIST to free database files
S2KFRDBH          Help file for S2KFRDB CLIST
S2KFREE           CLIST to free non-database SYSTEM 2000 files
S2KFREEH          Help file for S2KFREE CLIST
S2KH              Help file for S2K CLIST
S2KMUP            JCL proc to execute SYSTEM 2000 Multi-User interface
S2KSUP            JCL proc to execute SYSTEM 2000 software

Top of Document   Top of Appendix

Appendix E - Library S2K.R121.VALID

------------------------------------------------------------------------
Member
Name        Description
------------------------------------------------------------------------

ASMVAL      Output from Assembler PLEX validation

COBVAL      Output from COBOL PLEX validation

FORTVAL     Output from FORTRAN PLEX validation

PL1VAL      Output from PL/I PLEX validation

SCFVAL      Output from SCF validation

Top of Document   Top of Appendix