It is possible to activate four DCAM drivers in one Entire Net-Work node by using different driver names (DCAM, ICAM, DCM1, and DCM2). This feature can be useful if different MAXBLK values are needed; i.e., each DRIVER statement can contain a different MAXBLK value. See the following example:
1st driver's name DCAM
MAXBLK=receive-buffer-size-A
DCAM link statements ...
2nd driver ICAM with APPNAME different from the one in the DCAM driver
MAXBLK=receive-buffer-size-B
ICAM link statements ...
The following parameter must be specified for a link to a VTAM Entire Net-Work partner application via TRANSIT-CD:
SYSCODE=Y
The following parameters must be specified on a LINK statement:
LOGMODE=logmode_table_name
This parameter specifies a LOGMODE table that is used from VTAM Entire Net-Work as bind parameters (see TRANSIT-CD documentation).
LMPEO=NO
XSYSP EINSATZ=HOST,PRONAM=ZE01R7 *
PRONR=1,REGNR=7 *
* SUBAREA=1, *TCD*
* SSCPID=1, *TCD*
* CDRMNAME=SIEGAT *TCD*
...
* XSTAT STATNAM=NETWRK1,STATTYP=AP, *TCD*
* IBMNAM=NETWRK1,IBMTYP=AP,PACING=1 *TCD*
...
XSYSP EINSATZ=HOST/BCAM,PRONAM=ZE18R6, *
PRONR=18,REGNR=6 *
* SUBAREA=19, *TCD*
* SSCPID=19, *TCD*
* CDRMNAME=SIEHOST *TCD*
* PARTCDRM=(SIEGAT) *TCD*
...*
XSTAT STATNAM=NETWRK2,STATTYP=AP, *TCD*
* IBMNAM=NETWRK2,IBMTYP=AP,PACING=1 *TCD*
....
NODE NETWRK1,BUFFERS=(16K,32K,128K)
DRIVER VTAM APP=NETWRK1,MAXRU=FB,PA=EYEAPPLE
LINK TONW2 VTAM,APP=NETWRK2,LOGMODE=LOGLU0,-
MAXRU=FB,LMPEO=NO
NETWRK VBUILD TYPE=APPL
NETWRK1 APPL AUTH=(ACQ,NVPACE),PARSESS=YES,PRTCT=EYEAPPLE, *
SONSCIP=YES
NODE NETWRK2,BUFFERS=(16K,32K,128K)
DRIVER DCAM
LINK TONW1 DCAM,PTNNAME=NETWRK1,PRONAME=ZE01R7,-
ACQUIRE=YES,SYSCODE=YES,COMPRMSG=NO
Note:
The lines beginning with '*' are definitions for TRANSIT-CD.
MODETAB
LOGMLU0 MODEENT LOGMODE=LOGMLU0,TYPE=1, X
FMPROF=3,TSPROF=3,ENCR=NO, X
PRIPROT=X'70',SECPROT=X'70', X
COMPROT=X'0000',SSNDPC=0,SRCVPC=0, X
RUSIZES=X'8989',PSNDPAC=0, X
PSERVIC=X'000000000000000000000000'
MODEEND END

where:
| SIEHOST | BS2000/OSD host with DCAM/ICAM driver. |
| OS390HOST | OS/390 or z/OS host with VTAM driver. |
/SET-LOGON-PARAMETERS -
/ USER-ID = *NO,-
/ ACCOUNT = *NONE,-
/ JOB-CLASS = *STD,-
/ JOB-NAME = NETWORK
/MODIFY-TEST-OPTIONS -
/ DUMP = YES
/ASS-SYSOUT-
/ TO = LST-NETWORK
/ASS-SYSOUT-
/ TO = LST-NETWORK
/SET-FILE-LINK -
/ LINK-NAME = BLSLIB01, -
/ FILE-NAME = WCP&VERSION..LIB
/SET-FILE-LINK - &* add a file link for ADARUN.
/ LINK-NAME = DDLIB, -
/ FILE-NAME = &ADALIB
/START-PROGRAM -
/ FROM = *MODULE(LIB = &ADALIB, ELEM = ADARUN, PROG = ANY,-
/ RUN-MOD = ADV(ALT-LIB = YES))
ADARUN PROG=NETWRK,DBID=1234
/EOF
NODE SIEHOST,BUFFERS=(4K,4K,512K)
*
DRIVER DCAM,ISO=N,ACCEPTUI=N
LINK OS390HOST DCAM,PRONAME=ZE01R7,SYSCODE=Y
/EXIT-JOB -
/ MODE = NORMAL,-
/ SYS-OUT = NONE