Prerequisites for IMS - ODBA

Verify APF Authorization if required.
If your system has a security manager like RACF installed, and you wish for all sessions to be authorized, set CNXNOPREAUTHORIZE to 0.
If CNXNOPREAUTHORIZE is set to 0, the following is required:

Verify that IMS.RESLIBL and the optional IMSUTIL.SHPSLMD0 (zero) are APF authorized.
The CONNX load library will need to be APF authorized

IMS must be configured for ODBA access. Please refer to IBM IMS manuals for details on configuring IMS for ODBA.
CONNX uses the AERTDLI API. When connecting to a database, CONNX uses the APSB function which requires RRS be running.
The TCP/IP started task must be running.
The IBM IMS TCP/IP sockets interface, including IMS configuration files, programs, maps, and transactions, must be installed.
Both the install PC client and the target host (OS/390 / z/OS) must have FTP enabled.
CONNX fully supports the IMS add-on product IMS Library Integrity Utilities for z/OS to make the importing of metadata easier. If you wish to use this feature, verify that the utilities are installed on your system. Note: This feature is optional.
Create a DRA table for each IMS subsystem that will be accessed by CONNX. Please take special note of the MAXTHRD parameter. This value should be set to the maximum number of concurrent CONNX connections you intend to make. Following is some sample JCL that can be used to create a DRA table:

//IBMUSERC JOB ACCT,REGION=32M,MSGLEVEL=(1,1),

// CLASS=A,MSGCLASS=H,NOTIFY=&SYSUID

/*JOBPARM LINES=9999

//*REGION=32M

//*

//*********************************************************************

//* IVP IMS 8.1

//*

//* SKELETON: DFSIXSE9

//*

//* FUNCTION: DEFINE DRA START-UP TABLE FOR USE BY CICS/DBCTL

//*********************************************************************

//*

//************************************************************@SCPYRT**

//* *

//* LICENSED MATERIALS - PROPERTY OF IBM *

//* *

//* RESTRICTED MATERIALS OF IBM *

//* *

//* 5655-C56 *

//* *

//* (C) COPYRIGHT IBM CORP. 1989,2002 *

//* *

//************************************************************@ECPYRT**

//*

//*********************************************************************

//ASMDRA PROC MBR=DFSIVP10

//*

//ASM EXEC PGM=ASMA90,PARM='OBJECT,NODECK'

//SYSPRINT DD SYSOUT=*

//SYSLIB DD DISP=SHR,DSN=IMS810.ADFSMAC

// DD DISP=SHR,DSN=SYS1.MACLIB

//SYSLIN DD UNIT=3390,DISP=(,PASS,DELETE),SPACE=(CYL,(1,1)),

// DCB=(RECFM=F,LRECL=80,BLKSIZE=80)

//SYSUT1 DD UNIT=3390,DISP=(,DELETE,DELETE),SPACE=(CYL,(1,1))

//SYSUT2 DD UNIT=3390,DISP=(,DELETE,DELETE),SPACE=(CYL,(1,1))

//SYSUT3 DD UNIT=(3390,SEP=(SYSLIB,SYSUT1,SYSUT2)),

// DISP=(,DELETE,DELETE),SPACE=(CYL,(1,1))

//*

//LKED EXEC PGM=IEWL,COND=(0,LT,ASM),

// PARM='NCAL,LET,LIST,XREF'

//SYSPRINT DD SYSOUT=*

//SYSLIN DD DISP=(OLD,DELETE,DELETE),

// DSN=*.ASM.SYSLIN,VOL=REF=*.ASM.SYSLIN

//SYSLMOD DD DISP=SHR,

// DSN=IMS810.SDFSRESL(&MBR)

//SYSUT1 DD UNIT=(3390,SEP=(SYSLMOD,SYSLIN)),

// DISP=(,DELETE,DELETE),SPACE=(CYL,(1,1))

// PEND

//*********************************************************************

//*

//* THE FOLLOWING STEP ASSEMBLES AND LINK-EDITS INTO IMS RESLIB

//* THE DEFAULT PARAMETERS USED BY THE IMS CONTROL REGION - IVP3

//*

//*DFSPZPIV EXEC PROC=ASMDRA,MBR=DFSPZPIV

//DFSIVP10 EXEC PROC=ASMDRA,MBR=DFSIVP10

//ASM.SYSIN DD *

PZP TITLE 'DATABASE RESOURCE ADAPTER STARTUP PARAMETER TABLE'

*DFSPZP00 CSECT

DFSIVP10 CSECT

**********************************************************************

* *

* MODULE NAME: DFSPZP00 *

* *

* DESCRIPTIVE NAME: DATABASE RESOURCE ADAPTER (DRA) *

* STARTUP PARAMETER TABLE. *

* *

* FUNCTION: TO PROVIDE THE VARIOUS DEFINITIONAL PARAMETERS *

* FOR THE COORDINATOR CONTROL REGION. THIS *

* MODULE MAY BE ASSEMBLE BY A USER SPECIFYING *

* THEIR PARTICULAR NAMES, ETC. AND LINKEDITED *

* INTO THE USER RESLIB AS DFSPZPXX . WHERE XX *

* IS EITHER 00 FOR THE DEFAULT, OR ANY OTHER ALPHA- *

* NUMERIC CHARACTERS. *

* *

* KEYWORDS FOR THE DFSPRP MACRO: *

* DSECT=NO-A DSECT STATEMENT FOR PRP WILL NOT BE *

* GENERATED (LABEL DFSPRP WILL BE ON DS 0D). *

* *

* FUNCLV= DEFAULT (1). ADAPTER FUNCTIONAL LEVEL. *

* *

* DDNAME= 1 TO 8 CHARACTER DD NAME TO BE USED WITH *

* DYNAMIC ALLOCATION OF THE DBCTL RESLIB. *

* DEFAULT (CCTLDD). *

* *

* DSNAME= 1 TO 44 CHARACTER DATASET NAME OF THE *

* DBCTL RESLIB. *

* DEFAULT (IMS.SDFSRESL). *

* *

* DBCTLID=XXXX-NAME OF THE DBCTL REGION *

* DEFAULT = SYS1 *

* *

* USERID=XXXXXXXX-NAME OF THE USER REGION *

* *

* MINTHRD=XXX-MINIMUM NUMBER OF THREADS TO BE *

* AVAILABLE (MAXIMUM NUMBER IS 255) *

* DEFAULT = 1 *

* *

* MAXTHRD=XXX-MAXIMUM NUMBER OF THREADS TO BE *

* AVAILABLE (MAXIMUM NUMBER IS 255) *

* DEFAULT = 1 *

* *

* TIMER=XX-IDENTIFY TIMER VALUE IN SECONDS (DEFAULT 60) *

* *

* FPBUF=XXX-NUMBER OF FAST PATH BUFFERS TO BE ALLOCATED *

* AND FIXED PER THREAD (DEFAULT 00) *

* *

* FPBOF=XXX-NUMBER OF FAST PATH OVERFLOW BUFFERS TO BE *

* ALLOCATED PER THREAD (DEFAULT 00) *

* *

* SOD=X-OUTPUT CLASS TO BE USED FOR SNAP DUMP OF *

* ABNORMAL THREAD TERMINATIONS (DEFAULT A) *

* *

* TIMEOUT=XXX-DRATERM TIMEOUT VALUE IN SECONDS(DEFLT 60)*

* *

* CNBA=XXXX - TOTAL FP NBA BUFFERS FOR CCTL *

* *

* AGN=XXXXXXXX-1 TO 8 CHARACTER APPLICATION GROUP NAME *

* *

* LOCATION: PRIVATE STORAGE, USER KEY *

* *

* THIS MODULE CONTAINS NO EXECUTABLE CODE. *

* *

**********************************************************************

EJECT

DFSPRP DSECT=NO, X

FUNCLV=1, X CCTL FUNCTION LEVEL X

DDNAME=CCNXDD, XXXXXXXX DDN FOR CCTL RESLIB DYNALOC X

DSNAME=IMS810.SDFSRESL, X

DBCTLID=IVP1, NAME OF DBCTL REGION X

USERID=, XXXXXXXX NAME OF USER REGION X

MINTHRD=001, XXX MINIMUM THREADS X

MAXTHRD=100, XXX MAXIMUM THREADS X

TIMER=60, XX IDENTIFY TIMER VALUE - SECS X

FPBUF=001, XXX FP FIXED BFRS PER THREAD X

FPBOF=001, XXX FP OVFLW BFRS PER THREAD X

SOD=H, X SNAP DUMP CLASS X

TIMEOUT=060, XXX DRATERM TIMEOUT IN SECONDS X

CNBA=001, XXX TOTAL FP NBA BFRS FOR CCTL X

AGN=IVP XXXXXXXX APPLICATION GROUP NAME

END

//*

//* DBCTLID=, XXXX NAME OF DBCTL REGION X

//* USERID=CNXODBA, XXXXXXXX NAME OF USER REGION X

The PCB is accessed by name and not by the relative PCB number within the PSB. The PCB can be named in two ways:

1. Add a label to each PCB macro line (columns 1-8). We recommend you use this method.
2. Add a PCBNAME= parameter to the PCB macro.

Regenerate each of the modified PSBs so the PSBLIB reflects the identifier for each PCB.
Set parameter SCHDTYP=PARALLEL (default is SERIAL) in macro APPLCTIN. This is an ODBA requirement. You can find APPLCTIN in IMSGEN PDS member DFSIXSC1. An example of DFSIXSC1 can be found at http://www.ibm.com/support/knowledgecenter/SSEPH2_14.1.0/com.ibm.ims14.doc.ins/ims_dbcdbctl.htm.

Refer to the following links for more information on connecting IMS to ODBA:

Document Number: SG24-6794-00

http://www.redbooks.ibm.com/abstracts/sg246794.html

Verifying TCP/IP Connectivity

Before you install CONNX on your IMS server, we recommend that you verify the TCP/IP connectivity to your OS/390 z/OS system. To verify connectivity:

Open a Command Prompt window.
On the task bar, click Start and then click Run
Type or select:

ping hostname

where hostname is the TCP/IP symbolic address or dotted numeric address.

A successful ping (connectivity) will generate output in the command window similar to the following:

Pinging 123.123.123.012 with 32 bytes of data:

Reply from 123.123.123.012: bytes=32 time=10ms TTL=63

Reply from 123.123.123.012: bytes=32 time<10ms TTL=63

Ping statistics for 123.123.123.012:

Packets: Sent = 4, Received = 4, Lost = 0 (0% loss),

Approximate round trip times in milli-seconds:

Minimum = 0ms, Maximum = 10ms, Average = 2ms