> 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/copy-of-privado-editran-v5.3-cics/tcp/cics.-definicion-de-recursos-para-tcp-ip.md).
# CICS. definición de recursos para TCP/IP
## Definición de transacciones Editran
Las transid ZTBA (u otros listener) y ZTBB, deben tener máxima prioridad, así como la ya existente ZTB0 (núcleo editran), para así agilizar la transmisión.
Revise las transid ZTBA, ZTBB, ZTBZ en el miembro PCTCEDA de la lib de jcls.
## Definición de programas Editran
Revise el miembro PPTCEDA de la lib de jcls, progs ZTBPOT\*\*
## Relinkedicciones
Los programas ZTBPOTCC Y ZTBPOTCD ya van relinkados con las librerías TCP de INDRA. Sin embargo, si no funcionan correctamente deben relinkarse en la propia instalación.
```
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 PROGRAMA COBOL QUE LLAMA A UNA FUNCION C *
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 ****************************
```
El error descrito se refleja en la siguiente secuencia:
```
LOG DE SISTEMA:
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 ********************************
```
LOG DE CICS:
```
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/copy-of-privado-editran-v5.3-cics/tcp/cics.-definicion-de-recursos-para-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.