> For the complete documentation index, see [llms.txt](https://docs.editran.onesait.com/llms.txt). Markdown versions of documentation pages are available by appending `.md` to page URLs; this page is available as [Markdown](https://docs.editran.onesait.com/documentacion-editran/ibm-editran-v5.3-cics-en/tcp/cics.-resource-definition-for-tcp-ip.md).
# CICS. resource definition for TCP/IP
## Editran transaction definition
Transids ZTBA (or other listener) and ZTBB must have the highest priority, as well as the already existing ZTB0 (Editran core), in order to speed up transmission.
Check transids ZTBA, ZTBB, ZTBZ in the PCTCEDA member of the jcls lib.
## Editran program definition
Check the PPTCEDA member of the jcls lib, ZTBPOT\*\* progs
## Relinking instructions
The ZTBPOTCC and ZTBPOTCD programs are already relinked with INDRA's TCP libraries. However, if they do not work correctly, they must be relinked in the installation itself.
```
EDIT KI.EGDC.ZTBP.JCLS(JLKTCPI) - 01.03 Columns 00001 00072
Command ===> Scroll ===> CSR
****** ***************************** Top of Data ******************************
000001 //KI0F6AEA JOB (EGDC,KIT,,199),'RELINK TCP/IP',MSGCLASS=H,CLASS=A,
000002 // NOTIFY=&SYSUID
000003 //*--------------------------------------------------------------------*
000004 //* RELINK COBOL PROGRAM THAT CALLS A C FUNCTION *
000005 //*--------------------------------------------------------------------*
000006 //LKED EXEC PGM=HEWL,REGION=1500K,
000007 // PARM=('MAP,LIST,RMODE=ANY,AMODE=31')
000008 //SYSLIB DD DSN=CEE.SCEELKED,DISP=SHR
000009 // DD DSN=CICS410.SDFHLOAD.SITO,DISP=SHR
000010 // DD DSN=TCPIP.SEZALINK,DISP=SHR
000011 // DD DSN=TCPIP.SEZATCP,DISP=SHR
000012 //LCOBOLII DD DSN=KI.EGDC.ZTBP.LOAD31,DISP=SHR
000013 //SYSPRINT DD SYSOUT=*
000014 //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(5,5))
000015 //SYSLMOD DD DSN=KI.EGDC.ZTBP.LOAD31,DISP=SHR
000016 //SYSLIN DD *
000017 INCLUDE SYSLIB(EDCSTART)
000018 INCLUDE SYSLIB(IGZEBST)
000019 INCLUDE SYSLIB(@@CBL2C)
000020 INCLUDE SYSLIB(@@C2CBL)
000021 INCLUDE SYSLIB(EZACICAL)
000022 INCLUDE SYSLIB(EZASOKET)
000023 INCLUDE LCOBOLII(ZTBPOTCD)
000024 ENTRY ZTBPOTCD
000025 NAME ZTBPOTCD(R)
000026 /*
****** **************************** Bottom of Data ****************************
```
The error described is reflected in the following sequence:
```
SYSTEM LOG:
STC01465 00000090 +DFHSR0001 BMCIDATR An abend (code 0C4/AKEA) has occurred at offset
X'00001B76' in program ZTBPOTCD.
STC01465 00000090 +DFHME0116 BMCIDATR 345
345 00000090 (Module:DFHMEME) CICS symptom string for message DFHSR0001 i
345 00000090 PIDS/565501800 LVLS/410 MS/DFHSR0001 RIDS/DFHSRP PTFS/UN9491
345 00000090 AB/S00C4 AB/UAKEA RIDS/ZTBPOTCD ADRS/00001B76
STC01465 00000090 +DFHDU0205 BMCIDATR A SYSTEM DUMP FOR DUMPCODE: SR0001 , WA
SUPPRESSED BY THE DUMP TABLE OPTION FOR THIS DUMPCODE
STC01465 00000090 +CEE1000S LE/370 INTERNAL ABEND. ABCODE = 4087 REASON = 0000008
******************************** BOTTOM OF DATA ********************************
```
CICS LOG:
```
DFHDU0207I 20/05/99 16:38:10 BMCIDATR Transaction and system dumps for dumpcode: 4039 were suppressed by the DUMP TABLE OPTION FOR THIS DUMPCODE.
DFHDU0207I 20/05/99 16:38:10 BMCIDATR Transaction and system dumps for dumpcode: 4087 were suppressed by the DUMP TABLE OPTION FOR THIS DUMPCODE.
DFHAC2236 20/05/99 16:38:10 BMCIDATR Transaction ZTBB abend 4087 in program ZTBPOTCD term ZTB3 backout successful.
```
---
# Agent Instructions
This documentation is published with GitBook. GitBook is the documentation platform designed so that both humans and AI agents can read, navigate, and reason over technical content effectively. Learn more at gitbook.com.
## Querying This Documentation
If you need additional information that is not directly available in this page, you can query the documentation dynamically by asking a question.
Perform an HTTP GET request on the current page URL with the `ask` query parameter, and the optional `goal` query parameter:
```
GET https://docs.editran.onesait.com/documentacion-editran/ibm-editran-v5.3-cics-en/tcp/cics.-resource-definition-for-tcp-ip.md?ask=&goal=
```
`ask` is the immediate question: it should be specific, self-contained, and written in natural language.
`goal` is optional and describes the broader end goal you are ultimately trying to accomplish on behalf of the user. GitBook uses it to tailor the answer towards what is most useful for that goal.
The response will contain a direct answer to the question and relevant excerpts and sources from the documentation.
Use this mechanism when the answer is not explicitly present in the current page, you need clarification or additional context, or you want to retrieve related documentation sections.