[Top] [Previous] [Next] [End of Book]

Chapter 3 . Installing BEA Connect TCP for CICS


System Requirements

This chapter lists the hardware and software requirements for BEA Connect TCP for CICS and provides instructions for installing the software.

Host Requirements (Hardware)

The following are the hardware requirements for the system on which you plan to install BEA Connect TCP for CICS:

Host Requirements (Software)

The following are the software requirements for the system on which you plan to install BEA Connect TCP for CICS:

BEA TUXEDO Platform Requirements (Hardware)

The BEA TUXEDO platform must include at least one UNIX node connected to MVS with FTP capability.

BEA TUXEDO Platform Requirements (Software)

The following are the software requirements for the BEA TUXEDO platform:


Installation

Prerequisite

Verify that all block sizes in the supplied JCL are appropriate for the device types being used. By default, 3380 is assumed.

Step 1

Allocate a temporary dataset on MVS DASD for the installation job as shown in the example below:

Data Set Name:	YOURHLQ.TEMP.INSTALL
Volume serial:nnnnn (Blank for authorized default volume)
Generic unit: (Generic group name or unit address)
Space units: TRACK (BLKS, TRKS, CYLS, KB, MB or BYTES)
Primary quantity: 85 (In above units)
Secondary quantity:5 (In above units)
Directory blocks:0 (Zero for sequential data set)
Record format: FB
Record length: 80
Block size: 6160
Expiration date: (YY/MM/DD, YYYY/MM/DD YY.DDD,
YYYY.DDD in Julian form DDDD for
retention period in days or blank)
Enter "/" to select option
Allocate Multiple Volumes

Note: You can specify either the Volume Serial parameter or the Generic Unit parameter, but not both.

Step 2

Verify that the release level of your software meets the following criteria:

Ensure that your installation workstation is connected to MVS through TCP/IP, and is capable of running FTP.

Step 3

  1. Mount the installation CD-ROM on your UNIX system or insert the CD-ROM into the drive on a Windows NT system.

  2. Change directories to the /cdrom/unixmf/cics/jcl directory if you are on a UNIX system. For a Windows NT system, change directories to D:\ntmf\cics\jcl where D: is the CD-ROM drive.

  3. FTP the file called INSTALL to the temporary dataset created in step 1.

    For example:

    % ftp mvs-node-name
    Connected to mvs-node-name.
    Name (mvs-node-name:unix-id): tso-id
    331 Send password please.
    Password: tso-password
    230 tso-id is logged on.
    Remote system type is OS/MVS.
    ftp> put INSTALL "dataset name allocated in step 1"
    200 Port request OK.
    125 Storing data set "dataset name allocated in step 1"
    2749 bytes sent in 0.00 seconds (555.12 Kbytes/s)
    ftp> quit
    221 Quit command received. Goodbye.

Step 4

Note: This is an instream PROC; the variables are at the end of the PROC.

  1. Modify the JOBCARD to your standards.

  2. Modify the variable "YOURHLQ." If you intend to rename them, modify the variables "JCL," "OBJECT," and "SOURCE."

  3. Submit the revised temporary data.This JCL will create four partitioned datasets based on the "high-level-qualifier" you have specified as the value of the inline procedure parameter (&HLQ) in the JCL.

    The INSTALL JCL includes the name "BEATCPC" as part of the dataset name.

    For example:

    HLQ='YOURHLQ'
    "YOURHLQ".BEATCPC.CONTROL
    "YOURHLQ".BEATCPC.JCL
    "YOURHLQ".BEATCPC.OBJECT
    "YOURHLQ".BEATCPC.SOURCE
    "YOURHLQ".BEATCPC.INCLUDE
    "YOURHLQ".BEATCPC.PLKED

Step 5

  1. Upload all the files on the distribution medium to the partitioned datasets allocated by the job INSTALL in Step 4, using FTP transmission mode.

For example:

% ftp mvs-node-name
Connected to mvs-node-name.
Name (beavs:tso-id):
331 Send password please.
Password: tso-password
230 tso-id is logged on.
Remote system type is OS/MVS.
ftp> prompt off
Interactive mode off.

  1. Upload the BEATCPC CONTROL files.

    ftp> lcd /cdrom/unixmf/cics/BEATCPC.CONTROL
    Local directory now /cdrom/unixmf/cics/BEATCPC.CONTROL
    ftp> cd 'YOURHLQ.BEATCPC.CONTROL'
    250 "'YOURHLQ.BEATCPC.CONTROL'" partitioned data set is working directory
    ftp> mput *
    local: CSDU remote: CSDU
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.CONTROL(CSDU)
    250 Transfer completed successfully.
    5740 bytes sent in 0.01 seconds (747.10 Kbytes/s)
    local: VCON remote: VCON
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.CONTROL(VCON)
    250 Transfer completed successfully.
    1148 bytes sent in 0.00 seconds (704.20 Kbytes/s)
    local: VREQ remote: VREQ
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.CONTROL(VREQ)
    250 Transfer completed successfully.
    1148 bytes sent in 0.00 seconds (696.33 Kbytes/s)
    local: VSAMDEFS remote: VSAMDEFS
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.CONTROL(VSAMDEFS)
    250 Transfer completed successfully.
    3940 bytes sent in 0.01 seconds (759.06 Kbytes/s)
    local: VSVC remote: VSVC
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.CONTROL(VSVC)
    250 Transfer completed successfully.
    1148 bytes sent in 0.00 seconds (800.78 Kbytes/s)

  2. Upload the BEATCPC JCL files.

    ftp> lcd /cdrom/unixmf/cics/BEATCPC.JCL
    Local directory now /cdrom/unixmf/cics/BEATCPC.JCL
    ftp> cd 'YOURHLQ.BEATCPC.JCL'
    250 "'YOURHLQ.BEATCPC.JCL'" partitioned data set is working directory.
    ftp> mput *
    local: BLDVSAM remote: BLDVSAM
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(BLDVSAM)
    250 Transfer completed successfully.
    2214 bytes sent in 0.00 seconds (563.49 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(CMPA)
    250 Transfer completed successfully.
    local: CMPA remote: CMPA
    2413 bytes sent in 0.0056 seconds (4.2e+02 Kbytes/s)
    local: CMPBC remote: CMPBC
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(CMPBC)
    250 Transfer completed successfully.
    5248 bytes sent in 0.01 seconds (821.84 Kbytes/s)
    local: CMPL remote: CMPL
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(CMPL)
    250 Transfer completed successfully.
    3936 bytes sent in 0.00 seconds (787.17 Kbytes/s)
    local: CMPL1 remote: CMPL1
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(CMPL1)
    250 Transfer completed successfully.
    2426 bytes sent in 0.00 seconds (929.48 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(CMPLKED)
    250 Transfer completed successfully.
    local: CMPLKED remote: CMPLKED
    1846 bytes sent in 0.0034 seconds (5.3e+02 Kbytes/s)
    local: CMPLM remote: CMPLM
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(CMPLM)
    250 Transfer completed successfully.
    1558 bytes sent in 0.00 seconds (878.46 Kbytes/s)
    local: CSDUPD remote: CSDUPD
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(CSDUPD)
    250 Transfer completed successfully.
    984 bytes sent in 0.00 seconds (771.22 Kbytes/s)
    local: MAKA remote: MAKA
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(MAKA)
    250 Transfer completed successfully.
    1312 bytes sent in 0.00 seconds (836.87 Kbytes/s)
    local: MAKBC remote: MAKBC
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(MAKBC)
    250 Transfer completed successfully.
    1066 bytes sent in 0.00 seconds (790.44 Kbytes/s)
    local: MAKL0 remote: MAKL0
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(MAKL0)
    250 Transfer completed successfully.
    4592 bytes sent in 0.01 seconds (816.68 Kbytes/s)
    local: MAKL1 remote: MAKL1
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(MAKL1)
    250 Transfer completed successfully.
    4182 bytes sent in 0.01 seconds (772.46 Kbytes/s)
    local: MAKLA remote: MAKLA
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(MAKLA)
    250 Transfer completed successfully.
    2050 bytes sent in 0.00 seconds (928.12 Kbytes/s)
    local: MAKLM remote: MAKLM
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(MAKLM)
    250 Transfer completed successfully.
    2214 bytes sent in 0.00 seconds (940.87 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(MAKL2)
    250 Transfer completed successfully.
    local: MAKL2 remote: MAKL2
    1591 bytes sent in 0.0031 seconds (4.9e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(MAKL3)
    250 Transfer completed successfully.
    local: MAKL3 remote: MAKL3
    1643 bytes sent in 0.013 seconds (1.3e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.JCL(MAKLKED)
    250 Transfer completed successfully.
    local: MAKLKED remote: MAKLKED
    4466 bytes sent in 0.0084 seconds (5.2e+02 Kbytes/s)

  3. Upload the BEATCPC SOURCE files.

    ftp> lcd /cdrom/unixmf/cics/BEATCPC.SOURCE
    Local directory now /cdrom/unixmf/cics/BEATCPC.SOURCE
    ftp> cd 'YOURHLQ.BEATCPC.SOURCE'
    250 "'YOURHLQ.BEATCPC.SOURCE'" partitioned data set is working directory.
    ftp> mput *
    local: BEACCLN1 remote: BEACCLN1
    200 Port request OK.
    125 Storing data set YOURLHQ.BEATCPC.SOURCE(BEACCLN1)
    250 Transfer completed successfully.
    10578 bytes sent in 0.01 seconds (1013.85 Kbytes/s)
    local: BEACCT remote: BEACCT
    200 Port request OK.
    125 Storing data set YOURLHQ.BEATCPC.SOURCE(BEACCT)
    250 Transfer completed successfully.
    11480 bytes sent in 0.01 seconds (939.02 Kbytes/s)
    local: BEACFG remote: BEACFG
    200 Port request OK.
    125 Storing data set YOURLHQ.BEATCPC.SOURCE(BEACFG)
    250 Transfer completed successfully.
    9430 bytes sent in 0.01 seconds (926.46 Kbytes/s)
    local: BEACIC01 remote: BEACIC01
    200 Port request OK.
    125 Storing data set YOURLHQ.BEATCPC.SOURCE(BEACIC01)
    250 Transfer completed successfully.
    2132 bytes sent in 0.00 seconds (931.14 Kbytes/s)
    local: BEACIC02 remote: BEACIC02
    200 Port request OK.
    125 Storing data set YOURLHQ.BEATCPC.SOURCE(BEACIC02)
    250 Transfer completed successfully.
    2214 bytes sent in 0.00 seconds (939.64 Kbytes/s)
    local: BEACSVR1 remote: BEACSVR1
    200 Port request OK.
    125 Storing data set YOURLHQ.BEATCPC.SOURCE(BEACSVR1)
    250 Transfer completed successfully.
    6478 bytes sent in 0.01 seconds (892.02 Kbytes/s)
    local: BEAPCT remote: BEAPCT
    200 Port request OK.
    125 Storing data set YOURLHQ.BEATCPC.SOURCE(BEAPCT)
    250 Transfer completed successfully.
    10496 bytes sent in 0.01 seconds (919.94 Kbytes/s)
    200 Port request OK.
    125 Storing data set YOURLHQ.BEATCPC.SOURCE(T09CONFG)
    250 Transfer completed successfully.
    local: T09CONFG remote: T09CONFG
    1804 bytes sent in 0.0048 seconds (3.7e+02 Kbytes/s)

  4. Upload the BEATCPC OBJECT files.

    Note: You must set binary mode on.

    ftp> binary
    200 Representation type is IMAGE.
    ftp> lcd /cdrom/unixmf/cics/BEATCPC.OBJECT
    Local directory now /cdrom/unixmf/cics/BEATCPC.OBJECT
    ftp> cd 'YOURHLQ.BEATCPC.OBJECT'
    250 "'YOURHLQ.BEATCPC.OBJECT'" partitioned data set is working directory.
    ftp> mput *
    local: BEACFG remote: BEACFG
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEACFG)
    250 Transfer completed successfully.
    6240 bytes sent in 0.00 seconds (1466.96 Kbytes/s)
    local: BEACIC00 remote: BEACIC00
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEACIC00)
    250 Transfer completed successfully.
    47200 bytes sent in 0.01 seconds (4518.55 Kbytes/s)
    local: BEACIC01 remote: BEACIC01
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEACIC01)
    250 Transfer completed successfully.
    480 bytes sent in 0.00 seconds (648.34 Kbytes/s)
    local: BEACIC02 remote: BEACIC02
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEACIC02)
    250 Transfer completed successfully.
    320 bytes sent in 0.00 seconds (465.03 Kbytes/s)
    local: BEAEVTC remote: BEAEVTC
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEAEVTC)
    250 Transfer completed successfully.
    12480 bytes sent in 0.00 seconds (5292.01 Kbytes/s)
    local: BEAMCON remote: BEAMCON
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEAMCON)
    250 Transfer completed successfully.
    3360 bytes sent in 0.00 seconds (2635.54 Kbytes/s)
    local: BEAMMNU remote: BEAMMNU
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEAMMNU)
    250 Transfer completed successfully.
    960 bytes sent in 0.00 seconds (1092.66 Kbytes/s)
    local: BEAMREQ remote: BEAMREQ
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEAMREQ)
    250 Transfer completed successfully.
    3440 bytes sent in 0.00 seconds (2898.51 Kbytes/s)
    local: BEAMSVC remote: BEAMSVC
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEAMSVC)
    250 Transfer completed successfully.
    3200 bytes sent in 0.00 seconds (2755.73 Kbytes/s)
    local: BEAPCON remote: BEAPCON
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEAPCON)
    250 Transfer completed successfully.
    57760 bytes sent in 0.03 seconds (1783.77 Kbytes/s)
    local: BEAPMNU remote: BEAPMNU
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEAPMNU)
    250 Transfer completed successfully.
    28240 bytes sent in 0.01 seconds (4888.87 Kbytes/s)
    local: BEAPREQ remote: BEAPREQ
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEAPREQ)
    250 Transfer completed successfully.
    76640 bytes sent in 0.11 seconds (654.59 Kbytes/s)
    local: BEAPRERQ remote: BEAPRERQ
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEAPRERQ)
    250 Transfer completed successfully.
    26640 bytes sent in 0.01 seconds (4792.86 Kbytes/s)
    local: BEAPSVC remote: BEAPSVC
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEAPSVC)
    250 Transfer completed successfully.
    72080 bytes sent in 0.08 seconds (906.96 Kbytes/s)
    local: BEAREQST remote: BEAREQST
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEAREQST)
    250 Transfer completed successfully.
    27280 bytes sent in 0.00 seconds (6746.17 Kbytes/s)
    local: BEASHUT remote: BEASHUT
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEASHUT)
    250 Transfer completed successfully.
    12160 bytes sent in 0.00 seconds (2400.44 Kbytes/s)
    local: BEASKIBM remote: BEASKIBM
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.OBJECT(BEASKIBM)
    250 Transfer completed successfully.
    11600 bytes sent in 0.00 seconds (4920.99 Kbytes/s)
    local: BEASKINT remote: BEASKINT
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.O

  5. Upload the BEATCPC INCLUDE files.

    ftp> lcd /cdrom/unixmf/cics/include
    ftp> cd '"YOURHLQ".BEATCPC.INCLUDE'
    250 "'YOURHLQ.BEATCPC.INLUDE'" partitioned data set is working directory
    ftp> mput *
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.PINCLUDE'(CLIENT)
    250 Transfer completed successfully.
    local: CLIENT remote: CLIENT
    3736 bytes sent in 0.0081 seconds (4.5e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.PINCLUDE'(CLIENTH)
    250 Transfer completed successfully.
    local: CLIENTH remote: CLIENTH
    4450 bytes sent in 0.0092 seconds (4.7e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.PINCLUDE'(TWACOPY)
    250 Transfer completed successfully.
    local: TWACOPY remote: TWACOPY
    2786 bytes sent in 0.0051 seconds (5.4e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ".BEATCPC.PINCLUDE'(TWAINCL)
    250 Transfer completed successfully.
    local: TWAINCL remote: TWAINCL
    2804 bytes sent in 0.0053 seconds (5.1e+02 Kbytes/s)

  6. Upload the BEATCPC PLKED files.

    Note: Note: You must set binary mode on.

    ftp> binary
    200 Representation type is Image
    ftp> lcd /cdrom/unixmf/plked
    ftp> cd '"YOURHLQ".BEATCPC.PLKED'
    250 "'"YOURHLQ.BEATCPC.PLKED'" partitioned data set is working directory
    ftp> mput *
    200 Port request OK.
    125 Storing data set "YOURHLQ.BEATCPC.PLKED(BEACIC00)
    250 Transfer completed successfully.
    local: BEACIC00 remote: BEACIC00
    64560 bytes sent in 0.7 seconds (90 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ.BEATCPC.PLKED(BEACIC0I)
    250 Transfer completed successfully.
    local: BEACIC0I remote: BEACIC0I
    58960 bytes sent in 0.3 seconds (1.9e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ.BEATCPC.PLKED(BEAPCON)
    250 Transfer completed successfully.
    local: BEAPCON remote: BEAPCON
    56560 bytes sent in 0.22 seconds (2.5e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ.BEATCPC.PLKED(BEAPMNU)
    250 Transfer completed successfully.
    local: BEAPMNU remote: BEAPMNU
    26880 bytes sent in 0.11 seconds (2.4e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ.BEATCPC.PLKED(BEAPREQ)
    250 Transfer completed successfully.
    local: BEAPREQ remote: BEAPREQ
    78480 bytes sent in 0.36 seconds (2.2e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ.BEATCPC.PLKED(BEAPRERQ)
    250 Transfer completed successfully.
    local: BEAPRERQ remote: BEAPRERQ
    49840 bytes sent in 0.23 seconds (2.1e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ.BEATCPC.PLKED(BEAPSVC)
    250 Transfer completed successfully.
    local: BEAPSVC remote: BEAPSVC
    71760 bytes sent in 0.31 seconds (2.2e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ.BEATCPC.PLKED(BEAREQ0I)
    250 Transfer completed successfully.
    local: BEAREQ0I remote: BEAREQ0I
    51520 bytes sent in 0.24 seconds (2.1e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ.BEATCPC.PLKED(BEAREQST)
    250 Transfer completed successfully.
    local: BEAREQST remote: BEAREQST
    53280 bytes sent in 0.47 seconds (1.1e+02 Kbytes/s)
    200 Port request OK.
    125 Storing data set "YOURHLQ.BEATCPC.PLKED(BEASHUT)
    250 Transfer completed successfully.
    local: BEASHUT remote: BEASHUT
    12000 bytes sent in 0.065 seconds (1.8e+02 Kbytes/s)

Step 6

The default names for BEA Connect TCP for CICS Mapsets, Programs, Trnids, and Vsams are listed in the tables below. If you prefer a different naming convention, use the procedure for changing names included below each table.

The names in the following table are located in PDS "YOURHLQ".BEATCPC.SOURCE(BEACFG)

Name Type Description

BEAM

Transid

Main Menu

BEAPMNU

Program

"

BEAMMNU

Mapset

"

BEAC

Transid

Connection Administration

BEAPCON

Program

"

BEAMCON

Mapset

"

BEAR

Transid

Requester Administration

BEAPREQ

Program

"

BEAMREQ

Mapset

"

BEAS

Transid

Service Name Administration

BEAPSVC

Program

"

BEAMSVC

Mapset

"

BEAVCON

Vsam

Connection Table

BEAVREQ

Vsam

Requester Table

BEAVSVC

Vsam

Service Name Table

BEAPRERQ

Program

Pre-requester

BREQ

Transid

To start Requester

BEAL

TDQid

Log Message TD queue

To change any of the default names shown in the table above complete the following steps.

  1. Modify Program (BEACFG) located in PDS "YOURHLQ".BEATCPC.SOURCE

  2. Recompile with JCL (MAKBC) located in PDS "YOURHLQ".BEATCPC.JCL

  3. Modify file (CSDU) located in PDS "YOURHLQ".BEATCPC.CONTROL

  4. Modify file (VCON) located in PDS "YOURHLQ".BEATCPC.CONTROL

  5. Modify file (VREQ) located in PDS "YOURHLQ".BEATCPC.CONTROL

  6. Modify file (VSVC) located in PDS "YOURHLQ".BEATCPC.CONTROL

The names in the following table are located in PDS "YOURHLQ".BEATCPC.CONTROL(CSDU)

Name Type Description

BEAH

Transid

Handler

BEACIC00

Program

"

BEAREQST

Program

Requester

BDWN

Transid

Shutdown BEA Connect TCP

BEASHUT

Program

"

To change any of the default names shown in the table above, modify the file (CSDU) located in PDS "YOURHLQ".BEATCPC.CONTROL

Step 7

Define the CICS Table Entries (PCTs, PPTs, FCTs). In the inline procedure in CSDUPD (from the PDS "YOURHLQ".BEATCPC.CONTROL)

In the inline procedure in VDSU (from the PDS "YOURHLQ".BEATCPC.CONTROL), modify the GROUP (YOUR-GRP).

In the inline procedure in CSDUPD (from the PDS "YOURHLQ".BEATCPC.JCL), complete the following steps:

  1. Modify the JOBCARD to your standards.

  2. Modify the SYSIN DSN=YOURHLQ.BEATPC.CONTROL

  3. Submit CSDUPD.

  4. Verify the results.

Step 8

Define the CICS Vsam Files (Connections, Requesters, Service Names). In the inline procedure in VCON (from the PDS "YOURHLQ".BEATCPC.CONTROL), modify the dataset name "YOURHLQ.BEATCPC.BEAVCON".

In the inline procedure in VREQ (from the PDS "YOURHLQ".BEATCPC.CONTROL), modify the dataset name "YOURHLQ.BEATCPC.BEAVREQ".

In the inline procedure in VSVC (from the PDS "YOURHLQ".BEATCPC.CONTROL), modify the dataset name "YOURHLQ.BEATCPC.BEAVSVC".

In the inline procedure in BLDVSAM (from the PDS "YOURHLQ".BEATCPC.JCL), complete the following steps:

  1. Modify the following dataset names:

  2. Submit BLDVSAM.

  3. Verify the results.

Step 9

Provide information needed for controlling client access. (Handler Load Tables).

  1. Modify Program (BEACIC01) for (Account and Password) as shown below:

             PRINT GEN
    *
    BEACCT TYPE=INITIAL
    *
    BEACCT TYPE=ENTRY,
    ACCOUNT=A00,
    PASSWD=B00
    *
    BEACCT TYPE=ENTRY,
    ACCOUNT=A01,
    PASSWD=B01
    *
    BEACCT TYPE=ENTRY,
    ACCOUNT=A02,
    PASSWD=B02
    *
    BEACCT TYPE=ENTRY,
    ACCOUNT=1234567890ABCDEF,
    PASSWD=1234567890ABCDEF
    *
    BEACCT TYPE=ENTRY,
    ACCOUNT=22222222,
    PASSWD=BBBBBB
    *
    BEACCT TYPE=FINAL
    END

  2. Modify Program (BEACIC02) for ((Program & Commarea) as shown below:

             PRINT GEN
    *
    BEAPCT TYPE=INITIAL
    *
    BEAPCT TYPE=ENTRY,
    PROGRAM=PROGRAM1,COMMAREA=1024
    *
    BEAPCT TYPE=ENTRY,
    PROGRAM=PROGRAM2,COMMAREA=2048
    *
    BEAPCT TYPE=ENTRY,
    PROGRAM=PROGRAM3,COMMAREA=4096
    *
    BEAPCT TYPE=ENTRY,
    PROGRAM=PROGRAM4,COMMAREA=20480
    *
    BEAPCT TYPE=ENTRY,
    PROGRAM=BEACSVR1,COMMAREA=44
    *
    BEAPCT TYPE=ENTRY,
    PROGRAM=CICSSRV1,COMMAREA=4096
    *
    BEAPCT TYPE=ENTRY,
    PROGRAM=CICSSRV2,COMMAREA=4096
    *
    BEAPCT TYPE=FINAL
    END

    Note: Before you go on to the next step, we recommend that you check the items listed below in PROCS CMPA, CMPBC, CMPL, and CMPLM in the nodename.JCL PDS. You may need to modify them to meet your standards.

Step 10

Compile and link the Handler Load tables (BEACIC01) and (BEACIC02). In the inline procedure in MAKA (from the PDS "YOURHLQ".BEATCPC.JCL), complete the following steps:

  1. Modify the JOBCARD to your standards.

  2. Modify the variables YOURHLQ, PDSSRCE, and LNKLIB for your PDS

    Note: LNKLIB is where your CICS region executable binary file resides.

  3. Submit MAKA.

  4. Verify the results.

Step 11

Pre-Link/Link the CICS Admin maps (MainMenu, Connection, Requester, Service Name). In the inline procedure in MAKLM (from the PDS "YOURHLQ".BEATCPC.JCL"), complete the following steps:

  1. Modify the JOBCARD to your standards.

  2. Modify the variables YOURHLQ, PDSOBJS and LNKLIB for your PDS.

    Note: LNKLIB is where your CICS region executable binary file resides.

  3. Modify the variable PROG, if you renamed mapsets.

  4. Submit MAKLM

  5. Verify the results.

Step 12

Pre-Link/Link the CICS TCP Pgms (Pre-Requester and Shutdown). In the inline procedure in MAKL0 (from the PDS "YOURHLQ".BEATCPC.JCL"), complete the following steps:

  1. Modify the JOBCARD to your standards.

  2. Modify the variables YOURHLQ, PDSOBJS, TCPLIB and LNKLIB for your PDS.

    Note: LNKLIB is where your CICS region executable binary file resides.

  3. Modify the INCLUDE OBJECT(Pgm), if you renamed programs.

  4. Modify the SYSIN NAME Pgm(R), if you renamed programs.

  5. Submit MAKL0

  6. Verify the results.

Step 13

Pre-Link/Link the CICS Admin Pgms (MainMenu, Connection, Requester, Service Name). In the inline procedure in MAKL1 (from the PDS "YOURHLQ".BEATCPC.JCL"), complete the following steps:

  1. Modify the JOBCARD to your standards.

  2. Modify the variables YOURHLQ, PDSOBJS, TCPLIB and LNKLIB for your PDS.

    Note: LNKLIB is where your CICS region executable binary file resides.

  3. Modify the INCLUDE OBJECT(Pgm), if you renamed programs.

  4. Modify the SYSIN NAME Pgm(R), if you renamed programs.

  5. Submit MAKL1

  6. Verify the results.

Step 14

Note: If you are using TCP for INTERLINK CPT process this step.

Pre-Link/Link the CICS TCP Pgms (Requester and Handler). In the inline procedure in MAKL2 (from the PDS "YOURHLQ".BEATCPC.JCL"), complete the following steps:

  1. Modify the JOBCARD to your standards.

  2. Modify the variables YOURHLQ, PDSOBJS and LNKLIB for your PDS.

    Note: LNKLIB is where your CICS region executable binary file resides.

  3. Modify the INCLUDE OBJECT(Pgm), if you renamed programs.

  4. Modify the SYSIN NAME Pgm(R), if you renamed programs.

  5. Submit MAKL2

  6. Verify the results.

    Note: A sample entry for the configuration file for INTERLINK is located in "YOURHLQ".BEATCPC.SOURCE(T09CONFG).

Step 15

Note: If you are using TCP for IBM SOCKETS process this step.

Pre-Link/Link the CICS TCP Pgms (Requester and Handler). In the inline procedure in MAKL3 (from the PDS "YOURHLQ".BEATCPC.JCL"), complete the following steps:

  1. Modify the JOBCARD to your standards.

  2. Modify the variables YOURHLQ, PDSOBJS, TCPLIB and LNKLIB for your PDS.

    Note: LNKLIB is where your CICS region executable binary file resides.

  3. Modify the INCLUDE OBJECT(Pgm), if you renamed programs.

  4. Modify the SYSIN NAME Pgm(R), if you renamed programs.

  5. Submit MAKL3

  6. Verify the results.

Step 16

Note: If you do NOT have the C 370 compiler this procedure will allow you to Linkedit the PreLinked objects.

Link the Prelinked objects of the following programs.

In the inline procedure in MAKLKED (from the PDS "YOURHLQ".BEATCPC.JCL"), complete the following steps:

  1. Modify the JOBCARD to your standards.

  2. Modify the variables YOURHLQ, TCPLIB and LNKLIB for your PDS.

    Note: LNKLIB is where your CICS region executable binary file resides.

  3. Modify the INCLUDE OBJECT(Pgm), if you renamed programs.

  4. Modify the SYSIN NAME Pgm(R), if you renamed programs.

  5. Submit MAKLKED

  6. Verify the results.

Step 17

Log on to your CICS region to install and verify the components you set up for BEA CONNECT TCP for CICS.

Step 18

  1. Add the following entries to the CICS DCT.

    Entry Link

    BEALOG DFHDCT TYPE=SDSCI,

    +00450000

    DSCNAME=BEALOG,

    +00460000

    BLKSIZE=136,

    +00470000

    RECSIZE=132,

    +00480000

    RECFORM=VARUNB,

    +00490000

    TYPEFLE=OUTPUT,

    +00500000

    BUFNO=1

    +00510000

    BEAL DFHDCT TYPE=EXTRA,

    +00690000

    DESTID=BEAL,

    +00700000

    DSCNAME=BEALOG

    +00710000

  2. Assemble and link the DCT.

Step 19

  1. Modify the CICS start-up JCL.

  2. Add the BEA Connect load library to the DFHRPL concatenation.

  3. Add the following DD statement to CICS file concatenation:

       //BEALOG DD SYSOUT=*, DCB=(DSORG=PS, RECFM=V, BLKSIZE=136)

The following is an example of a CICS start-up JCL:

//CICSREG JOB
//CICSCNTL EXEC PGM=IDCAMS,REGION=1M
//SYSPRINT DD SYSOUT=*
//SYSIN DD DISP=SHR,DSN=CICS410.SYSIN(DFHRCYES)
//DTCNTL EXEC PGM=IDCAMS,REGION=1M
//SYSPRINT DD SYSOUT=*
//SYSIN DD DISP=SHR,DSN=CICS410.SYSIN(DFHRCNO)
//*
// CICS EXEC PGM=DFHSIP, REGION=32M, TIME=1439, COND=(1,NE,CICSCNTL),
// =START=COLD,SYSIN,SEC=NO,GRPLIST=ETPLIST
// STEPLIB DD DISP=SHR,DSN=CICS410.SVTSC.SDFHAUTH
// DD DISP=SHR,DSN=CICS410.SDFHAUTH
// DD DISP=SHR,DSN=MASTCAT.MQM112.SCSQAUTH
// DD DISP=SHR,DSN=COB2140.COB2CICS.MODLIB
// DD DISP=SHR,DSN=C370.SEDCLINK
// DD DISP=SHR,DSN=ADLE370.V1R3M0.SCEECICS
// DD DISP=SHR,DSN=ADLE370.V1R3M0.SCEERUN
// DFHRPL DD DISP=SHR,DSN=CICS410.SVTSC.SDFHLOAD
// DD DISP=SHR,DSN=CICS410.SDFHLOAD
// DD DISP=SHR,DSN=BEA.BEA100.BEALOAD *BEA Connect
// DD DISP=SHR,DSN=TCPIP.V3R1.SEZALINK
// DD DISP=SHR,DSN=TCPIP.V3R1.SEZATCP
// DD DISP=SHR,DSN=MQM112.SCSQCICS
// DD DISP=SHR,DSN=MQM112.SCSQLOAD
// DD DISP=SHR,DSN=COB2140.COB2CICS
// DD DISP=SHR,DSN=MASTCAT.COB2140.COB2LIB
// DD DISP=SHR,DSN=MASTCAT.PLI230.PLILINK
// DD DISP=SHR,DSN=C370.SEDCLINK
// DD DISP=SHR,DSN=ERW121.SERWLOAD
// DD DISP=SHR,DSN=ADLE370.V1R3M0.SCEECICS
// DD DISP=SHR,DSN=ADLE370.V1R3M0.SCEERUN
// SYSIN DD DISP=SHR,DSN=CICS410.CICS.SYSIN(TCICS)
// DFHCSD DD DISP=SHR,DSN=CICS410.DFHCSD
// DFHCMACD DD DISP=SHR,DSN=CICS410.DFHCMACD
// DFHJ01A DD DISP=SHR,DSN=CICS410.CICS.DFHJ01A
// DFHJ01B DD DISP=SHR,DSN=CICS410.CICS.DFHJ01B
// DFHJ01X DD DISP=SHR,DSN=CICS410.CICS.DFHJ01X
// DFHAUXT DD DISP=SHR, DSN=CICS410.CICS.DFHAUXT, DCB=BUFNO=5
// DFHBUXT DD DISP=SHR, DSN=CICS410.CICS.DFHBUXT, DCB=BUFNO=5
// DFHDMPA DD DISP=SHR,DSN=CICS410.CICS.DFHDMPA
// DFHDMPB DD DISP=SHR,DSN=CICS410.CICS.DFHDMPB
// DFHRSD DD DISP=SHR,DSN=CICS410.CICS.DFHRSD
// DFHGCD DD DISP=SHR,DSN=CICS410.CICS.DFHGCD
// DFHLCD DD DISP=SHR,DSN=CICS410.CICS.DFHLCD
// DFHXRMSG DD DISP=SHR, DSN=CICS410.CNTL.CICS.DFHXRMSG
// DFHXRCTL DD DISP=SHR,DSN=CICS410.CNTL.CICS.DFHXRCTL
// DFHTEMP DD DISP=SHR,DSN=CICS410.CNTL.CICS.DFHTEMP
// DFHINTRA DD DISP=SHR,DSN=CICS410.CNTL.CICS.DFHINTRA
// DFHJACD DD DISP=SHR,DSN=CICS410.CICS.DFHJACD
// DFHJPDS DD DISP=SHR,DSN=CICS410.DFHJPDS
// DFHJOUT DD SYSOUT=(A,INTRDR)
// *CEEMSG DD DSN=CEE120.CICSDCT.CEEMSG,DISP=SHR ** AD/CYC LE/370
// *CEEOUT DD DSN=CEE120.CICSDCT.CEEOUT,DISP=SHR ** AD/CYC LE/370
// DFHCXRF DD SYSOUT=X
// MQMMSG DD SYSOUT=*
// LOGUSR DD SYSOUT=*, DCB=(DSORG=PS,RECFM=V, BLKSIZE=136)
// MSGUSR DD SYSOUT=*, DCB=(DSORG=PS,RECFM=V, BLKSIZE=136)
// TCPDATA DD SYSOUT=*, DCB=(DSORG=PS,RECFM=V, BLKSIZE=136)
// BEALOG DD SYSOUT=*, DCB=(DSORG=PS,RECFM=V, BLKSIZE=136) ** BEA Connect
// COUT DD SYSOUT=*, DCB=(DSORG=PS,RECFM=V, BLKSIZE=137)
// PLIMSG DD SYSOUT=*, DCB=(DSORG=PS,RECFM=V, BLKSIZE=137)
// COUT DD SYSOUT=*, DCB=(DSORG=PS,RECFM=V, BLKSIZE=137)
// SYSABEND DD SYSOUT=*
// TRACEOUT DD SYSOUT=*
// PRINTER DD SYSOUT=*,DCB=BLKSIZE=121
// *
// PRTDMPA EXEC PGM=DFHDUP, PARM=SINGLE, REGION=0M, COND=(1,NE,DTCNTL)
// STEPLIB DD DSN=CICS410.SDFHLOAD,DISP=SHR
// SYSIN DD DUMMY
// DFHDMPDS DD DISP=SHR,DSN=CICS410.CICS.DFHDMPA
// DFHTINDX DD SYSOUT=*
// SYSPRINT DD SYSOUT=*
// DFHPRINT DD SYSOUT=*
// *
// PRTDMPB EXEC PGM=DFHDUP, PARM=SINGLE, REGION=0M, COND=(1,NE,DTCNTL)
// STEPLIB DD DSN=CICS410.SDFHLOAD,DISP=SHR
// SYSIN DD DUMMY
// DFHDMPDS DD DISP=SHR,DSN=CICS410.CICS.DFHDMPB
// DFHTINDX DD SYSOUT=*
// SYSPRINT DD SYSOUT=*
// DFHPRINT DD SYSOUT=*
// *
// * PRTAUXT EXEC PGM=DFHTUP, REGION=0M, COND=(1,NE,DTCNTL)
// * STEPLIB DD DSN=CICS410.SDFHLOAD,DISP=SHR
// * DFHAUXT DD DISP=OLD,DSN=CICS410.CICS.DFHAUXT
// * DFHAXPRT DD SYSOUT=*
// * DFHAXPRM DD DUMMY
// *
// PRTBUXT EXEC PGM=DFHTUP, REGION=0M, COND=(1,NE,DTCNTL)
// STEPLIB DD DSN=CICS410.SDFHLOAD,DISP=SHR


List of Distribution Files and Members

The following tables list and describe the members that make up each distribution partitioned dataset.

BEATCPC.DIST.CONTROL

Member Description

CSDU

Del/Def Parameters for (PCTs, PPTs, FCTs)

VCON

Del/Def Parameters for (Vsam Connections)

VREQ

Del/Def Parameters for (Vsam Requesters)

VSVC

Del/Def Parameters for (Vsam Service Names)

BEATCPC.DIST.JCL

Member Description

INSTALL

Jcl to Create the installation PDS files on Mainframe.

BLDVSAM

Jcl to Del/Def Vsam files (BEAVCON, BEAVREQ, BEAVSVC).

CSDUPD

Jcl to Del/Def CICS (PCTs, PPTs, FCTs).

CMPA

Proc to Compile/link ASM program (Load Tables).

MAKA

Jcl to Compile/link ASM program (Load Tables).

CMPBC

Proc to Compile/link C program (Configuration).

MAKBC

Jcl to Compile/link C program (Configuration).

CMPLM

Proc to Link CICS Mapsets(TCP Admin).

MAKLM

Jcl to Link CICS Mapsets(TCP Admin).

CMPL

Proc to PreLink/Link Pgm objects.

MAKL0

Jcl to PreLink/Link Pgm objects(PreRequester, Shutdown).

MAKL1

Jcl to PreLink/Link Pgm objects(TCP Admin).

MAKL3

Jcl to PreLink/Link Pgm objects(Requester, Handler). -IBM SOCKET-

CPML1

Proc to PreLink/Link Pgm objects(Requester, Handler). -INTERLINK-

MAKL2

Jcl to PreLink/Link Pgm objects(Requester, Handler). -INTERLINK-

CMPLKED

Proc to Link the PreLinked PLKED.

MAKLKED

Jcl to Link the PreLinked PLKED.

BEATCPC.DIST.OBJECT

Member Description

BEACFG

Object of Name Configuration (Files, Maps, Pgms, Trns)

BEACICSC

Object of CICS Commands (Read, Write)

BEACIC00

Object of Program Handler (Replaces OTPCIC00)

BEACIC01

Object of Load table (ACCT,PASSWD)

BEACIC02

Object of Load table (Pgm commarea)

BEAEVTC

Object of CICS Event Commands (Enq, Deq, Post)

BEAMCON

Object of Mapset Admin Connections

BEAMMNU

Object of Mapset Admin Main Menu

BEAMREQ

Object of Mapset Admin Requesters

BEAMSVC

Object of Mapset Admin Service Names

BEAPCON

Object of Program Admin Connections

BEAPMNU

Object of Program Admin Main Menu

BEAPREQ

Object of Program Admin Requesters

BEAPRERQ

Object of Program Pre Requesters

BEAPSVC

Object of Program Admin Service Names

BEAREQST

Object of Program Requester

BEASHUT

Object of Program Shutdown

BEASKIBM

Object of Program for IBM Sockets

BEASKINT

Object of Program for Interlink Sockets

EBCASC

Object of Program for EBCDIC to ASCII conversion.

BEATCPC.DIST.SOURCE

Member Description

BEACFG

Program Name Configuration (Files, Maps, Pgms, Trns)

BEACIC01

Program Load Table Inbound (Account and Password)

BEACIC02

Program Load Table Inbound (Program and Commarea)

BEACCLN1

Program Sample Test Client

BEACSVR1

Program Sample Test Server

BEACCT

Macro Authentication Control For BEACIC01

BEAPCT

Macro Program Control For BEACIC02

T09CONFG

Macro of BEAH Transid for -INTERLINK-

BEATCPC.DIST.INCLUDE

Member Description

CLIENT

Copybook for COBOL CICS Client Request/Response Header

CLIENTH

Include for C CICS Client Request/Response Header

TWACOPY

Copybook for COBOL CICS Server TWA Message size.

TWAINCL

Include for C CICS Server TWA Message size.

BEATCPC.DIST.PLKED

Member Description

BEACIC0I

Prelinked object of Handler -INTERLINK-

BEACIC00

Prelinked object of Handler -IBM SOCKET-

BEAPCON

Prelinked object of Admin Connections

BEAPMNU

Prelinked object of Admin(Main Menu)

BEAPREQ

Prelinked object of Admin(Requesters)

BEAPRERQ

Prelinked object of Pre-Requester

BEAPSVC

Prelinked object of Admin(Service Names)

BEARQST

Prelinked object of Requester -IBM SOCKET-

BEAREQ0I

Prelinked object of Requester -INTERLINK-

BEASHUT

Prelinked object of Shutdown



[Top] [Previous] [Next] [End of Book]