Home

EDITRAN/IP 5.1

1. 10 24 INDRA Todos los derechos reservados EDITRAN IP 5 1 EDITRAN IP 5 1 CICS Manual de usuario 1 REQUERIMIENTOS 1 REQUERIMIENTOS Para la instalaci n se han seguido las definiciones correspondientes a la versi n de TCPIP V3R2 y EDITRAN 4 1 Los requerimientos m nimos son 05 390 R3 05 390 V2R4 TCP IP Version 3 Release 2 requiere CICS ESA Version 3 3 or later perferible 4 1 TCP IP for MVS Version 3 Release 2 or later MVS ESA Version 4 3 or higher En TCP IP 3 2 para OS 390 2 3 and 2 4 asegurese de tener la Release 32C TCP IP 3 2 para MVS con el Enhancements Kit FMID JTCP32C EDITRAN ha utilizado en la programaci n la forma de Sockets Extended API COBOL PL I Assembler Language Note Some of the security features require CICS ESA 4 1 or higher Debe definirse el CICS nombre del started task y el grupo por defecto al que pertenece al segmento OMVS DEFINE USER CICSSITD OMVS UID O HOME DEFINE GROUP STCUSR OMVS GID 4 La documentaci n sobre ERRNO RETCODE y mensajes de error en la TCPCICS proporcionados por las macros utilizadas para SOCKET EXTENDIDOS se encuentra disponible en el apendice C del manual IBM TCP IP for MVS CICS TCP IP Socket Interface Guide and Reference Document Number SC31 7131 03 Program number 5655 HAL File Number S370 4300 30xx 50 Ver tambi n Document Number SC31 8518 00 Si no aparece el errno correspondiente
2. 5 X 05 Error en ZTBA server padre Error macro TAKESOCKET X 05 Error en ZTBB 6 server child X OD Error macro FCNTL X 00 Error en ZTBB 6 cliente X 05 Error en ZTBB 6 server child X OE Error macro SELECTEX X 00 Error en ZTBB 6 cliente Se intentaban enviar datos de usuario X 01 Error en ZTBB cliente Se enviaron datos de usuario y se esperaba recibirlos X 02 Error en ZTBB 6 cliente Error de select by write en tr fico de datos X 03 Error en ZTBB 6 cliente Error de select by read en tr fico de datos X 05 Error en ZTBB server child Se recibieron datos de usuario y se intentan reenviar Error en ZTBB server child Se recibieron datos de usuario no se reeenviaron y se estaba en select by read 07 Error en ZTBB server child Error de select by write trafico de datos X 08 Error en 2 server child Error de select by read en tr fico de datos X 09 Error en ZTBA server padre durante espera de conexiones Error en ZTBA server padre durante espera de paso de socket X 0F Error macro READ X 05 Error en ZTBB 6 cliente server child al intentar leer de la red X 10 X xx Error macro WRITE X 00 Error en ZTBB cliente Se intentaban enviar datos de usuario 01 Error en 2 6 cliente Se intentaban enviar datos trafico de datos X 05 Error en ZTBB 6 server child Entraron datos de usuario y se in
3. 8 3 DEFINICION DE PROGRAMAS EDITRRALNN 8 3 RELINKEDICCIONESU N I Aaa N DER 8 3 EDITRAN P DESCRIPCI N DE CAMPOS Y FORMATOS USUARIO 9 1 DIAGRAMAS DE FLUJO 9 1 CONSULTA DE LA TRAZA X 9 2 MENSAJES DE ERROR TIPO X20 9 5 MENSAJES DE LIBERACION TIPO X13 9 11 CAMPOS EDITRAN P PERFILES 9 13 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACION6S 10 14 RELACCIONES ENTRE LAS PARAMETRIZACIONES NECESARRIAS 10 14 DESCRIPCION DE PARAMETRIZACIONES NECESARRIAS 10 16 EJEMPLO PRACTICO Y CONCLUSION6S 10 18 CONSIDERACIONES SOBRE EL ESPACIO DE BUFF8R 10 23 TRAZAS TCP IP DE
4. S PROPIET NUM CARACTERISTICAS DE LA LINEA Nie xx enr I R 100099940 001 172 022 071 129 07777 100099940 002 ASANJOSEXP INDRA ES 07777 Las lineas IP remotas constan de IP PUERTO REMOTO el registro de sesi n se indica el tipo de conexi n I IP El remoto puede tener ese tipo de conexi n 6 tambi n proxy Tambi n se indican las l neas remotas ip INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 9 13 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACIONES 10 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACIONES 10 1 RELACCIONES ENTRE LAS PARAMETRIZACIONES NECESARIAS PROCEDIMIENTO DE ARRANQUE DE TCP TCPIPROC JOB MSGLEVEL 1 STARTING EXEC TCPIPROC XXPROFILE DD DSN SW TCPIP SEZAPARM CPUBPROF DISP SHR XXSYSTCPD DD DSN SW TCPIP SEZAPARM TCPDATAB DISP SHR FICHERO PROFILE SW TCPIP SEZAPARM CPUBPROF PORT 7777 TCP CICSSITD 7 CICS Socket KEEPALIVEOPTIONS INTERVAL 2 ENDKEEPALIVEOPTIONS DEVICE LOSAB4 LCS 1002 LINK OSAB4TCP IBMTR 0 LOSAB4 HOME 192 168 172 088 OSABATCP GATEWAY 192 168 1172 OSAB4TCP 1500 0 PARAMETROS BUFFER DATABUFFERPOOLSIZE 2 4 Y TCPSENDBUFFERSIZE TCPRECEIVEBUFFERSIZE EN POSTERIORES FICHERO TCPDATA SW TCPIP SEZAPARM TCPDATAB TCPIPJOBNAME TCPIPB NSINTERADDR 172 29 2 41 NSINTERADDR 192 168 1 30 NSPORTADDR 53 ARRANQUE DE CICS DFHRPL DD DSN TCPIP SEZATCP
5. EDITRAN IP 5 1 TCP IP Documentaci n T cnica CICS Manual de usuario e Instalaci n INDRA 07 de enero de 2015 EDITRAN IP 5 1 CICS Manual de usuario NDICE 1 1 1 1 2 2 2 1 2 2 2 3 2 4 3 3 1 3 2 3 3 3 4 4 4 1 4 2 8 1 8 2 8 3 9 1 9 2 9 3 9 4 9 5 10 10 1 10 2 10 3 10 4 10 5 REQUERIMIENTO S ria 1 1 Conocimiento de la conectividad ip 1 1 Problemas detectados 1 2 05390 V2R4 PROCEDIMIENTOS Y FICHEROS 2 1 PROCEDIMIENTO DE ARRANQUE DE TCP 05390 V2R4 2 1 FILE PROFILE 0S390 V2R4 TCPIP DESA TCPPARMS PROFILE6 2 3 FILE TCPDATA 0S390 V2R4 TCPIP DESA TCPPARMS TCPDATA 2 5 ARRANQUE DEL CICS 05390 02 4 2 6 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS 3 1 PROCEDIMIENTO DE ARRANQUE DE TCP 0S390
6. L II AMODE 31 L II AMODE 31 KKKKKKKKKKKKKKKKKKKK EE SCEERUN DISP SHR DSN DB2 V3R1MO SDSNLOAD DISP SHR DSN CICS410 SDFHAUTH SITO DISP SHR EXPL EXA 1439 200 SISTEMAS CLASS G TIME 1439 EVEL 1 1 USER SIT DD DSN TCPIP DESA SEZALINK DISP SHR J BRR RRR KK KKK KK KR RAR KK RR RR k k k k k k k k k k k k k k k k k k k k k KG k k k KG LP LIBRERIAS DE MODULOS CARGABLES J BRR RRR KKK KR KK KR k k k KKK A A k Ck kk kk kk k k ke KC ROG k k GG 5 DFHRPL DD DSN CEE SCEECICS DISP SHR 6 DD DSN CEE SCEERUN DISP SHR DD DSN CICS410 SDFHLOAD SITO DISP SHR 8 DD DSN CICS410 SDFHEXCI SITO DISP SHR 9 DD DSN KI SGDC SSASST LOAD7003 DISP SHR 0 DD DSN KI SGDC SSASST LOADEURO DISP SHR 3 1 DD DSN KI SGDC DSO LOADV1RO DISP SHR 1 2 DD DSN KI EGDC LOADINCI DISP SHR 1 13 DD DSN KI EGDC ZTBP LOAD31 DISP SHR 4 DD DSN KI SGDC SSASST LOADV1RO DISP SHR 6 5 DD DSN KI EGDC EDI LOAD31 DISP SHR 6 DD DSN KI EGDC INT LOAD DISP SHR 3 7 DD DSN CICS410 SIST MODULOS DISP SHR 1 8 DD DSN KI GCDA CIFRADO LOAD DISP SHR 6 9 DD DSN KI EGDC APL LOAD31 DISP SHR 6 20 DD DSN KI EGDC ZTBP LOAD31 DISP SHR 0 21 DD DSN KI SGDC SNPACH LOADV1RO DISP SHR 7 22 DD DSN SYS1 SYSVIEW V72 LOADLIB DISP SHR 23 DD DSN KI EIDC ZTBG LOAD VSE DISP SHR 24 DD DSN CW LOAD DISP SHR 25 DD DSN TCPIP SEZATCP DISP SHR J BR
7. Ga sai ni qa Rd qam i n s Cas Gant te les a ses 4 XXIEBEDIT EXEC PGM IEBEDIT COND EVEN 5 XXSYSPRINT DD SYSOUT 6 XXSYSUT1 DD DISP SHR DSN SYSB PROCLIB BMCIDRTO 7 XXSYSUT2 DD SYSOUT A INTRDR DCB BLKSIZE 80 8 XXSYSIN DD DUMMY 9 XXBMCIDATR EXEC PGM DFHSIP REGION 110M TIME 1440 XX PARM SI END 0 XXSYSIN DD DSN BMCI DAT4 JCL DAT4D DISP SHR 1 XXSTEPLIB DD DSN CICS410 DESA SDFHAUTH DISP SHR 2 XX DD DSN BMCI DAT4 LOAD DISP SHR 3 Xx DD DSN DB2DI RCTDAT4 LOADLIB DISP SHR 4 XX DD DSN SYSB DSN310 SDSNLOAD DISP SHR 6 XX DD DSN CEE SCEERUN DISP SHR 7 XX DD DSN SYS1 CSSLIB DISP SHR 8 XX DD DSN PERSER V3RO TCELOAD DISP SHR 9 XX DD DSN PERSER V3RO0 LMKLOAD DISP SHR 20 XX DD DSN TCPIP DESA SEZALINK DISP SHR 21 XXDFHRPL DD DSN CICS410 DESA SDFHLOAD DISP SHR 229 DD DSN CEE SCEECICS DISP SHR 23 XX DD DSN C SCEERUN DISP SHR 24 XX DD DSN CODE DESA SEQAMOD DISP SHR 25 XX DD DSN SYSB DSN310 SDSNLOAD DISP SHR 26 XX DD DSN BMCI SISTEMAS LOAD DISP SHR QU EX DD DSN BMCI DAT4 LOAD DISP SHR 28 XX DD DSN DESAD CICS OBJETOS DISP SHR 29 XX DD DSN DESAD CICS LOADMAP DISP SHR 30 XX DD DSN DESAD RUTI OBJETOS DISP SHR 31 XX DD DSN DESAP CICS OBJETOS DISP SHR 32 XX DD DSN DESAP CICS LOADMAP DISP SHR 330 XX DD DSN DESAP RUTI OBJETOS DISP SHR 34 XX DD DSN SYSB CEMT CICS3 LOADLIB DISP SHR 35 XX DD DSN PERSER V3R0 TCELOAD DISP SHR 36 XX DD DSN PERSER V3RO0 LMKLOAD DISP SHR 37 XX DD DSN CAI INTERTES V5R4 CACICS41 DIS
8. EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de campos y formatos USUARIO 501 SO2DI 001 095614 00 501 502 001 095614 S STC T O DE CONEXION SO1DI SO2DI TCP001 095614 S TCP 07777 OB 0002 SO1DI SO2DI 001 095615 E TCP 07777 20 027C 07 00 SO1DI SO2DI TCP001 095615 E TCP 07777 13 027C 0002 FF OC este caso se ha enviado al remoto un paquete de solicitud de llamada x 0B en columna comentario y S en columna S y el proceso cliente ha respondido con 2 mensajes entrantes x 13 y x 20 en columna comentario y en columna S El primero de ellos x 13 es una indicaci n de liberaci n y el segundo una indicaci n de error Seleccionando el primero x llamada saliente 16 06 2004 CONSULTA DE FICHEROS EDITRAN 5 1 10 01 26 CONSULTA DE TRAZA SESION TRAZA SO1DI SO2DI 001 FECHA SSAAMMDD 20040616 HORA HHMMSS 095614 ENTRADA SALIDA 5 Til Pat uds ax aos t DIL Sd VV Rie VV E3C3D7400B00021E61000000000000000000F0F3F0C90000000000000000000FC0A3315000 9994305443503030310A000000000000000000000000000000000040404000000000404040 40404040404040404040404040404040404040404040404040404040404040404040404040 404040404040404040404040404040404040D6F4F3F9F0C200000000000000000000000000 00000000000000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000
9. N COPIAS N COPIAS I I 1 HI Qe 1 OS l 1mdo 1 E IHOA 1 HIND 1 1 1 N 1 I I El 1 E 1 gt H m m E ET I 0 Ame LS I a El 1 H Ey ia aor 1 Ax o Hor H Rl E fi A ZN UE bdo amp dn Hoo x O Et Q4 E4 Ew O iG O Et m FC m m i H HH O ZQ Ed NHEOIZBHOnHdHlBhRB INA I OnmMHoUNn S EE us e e a E 4 I M eser m as 1 lt z 5 Q 1 El EE 1 E m o m pm n 1 ES 1 ON 1 H 1 ay E I lt El E4 5 I z 1 H 72 RS nA eL b 52 1 1 1 1 1 1 1 a H oo m ud m mHo AQ El HOA Ji d lt E Nm d Em By Lo N rn N GETHOSTBYNAME SETSOCKOPT FCNTL CONNECT gt SETSOCKOPT TAKESOCKET GIVESOCKET START ZTBB gt RETRIEVE SELECTEX WRITE USER gt ACCEPT EAD WRITE TS ZTBRXXXX AR gt gt 5 vl Eas dox lt b X d HEX IVAX I E H ff m H f lt lt E
10. EDITRAN IP 5 1 CICS Manual de usuario 3 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS COLA TD J BRR RRR KK RRR KK RR RR KC KC RR k k k k k k k k k k k k k k k k 41 DDEITD DD DSN KI EIDC EITD DISP SHR 42 NXC1INTR DD SYSOUT A INTRDR 43 NXCEINTR DD SYSOUT A INTRDR PP s J BRR RRR KKK KR KR RK k k k kk kk kk kk A k k k k k k k k k k k k ke ke kk KG k k k k M FICHEROS DE TRACE J BRR RRR RRR KKK KK KK k k k k k k k k kk kk KC RAR k k k k k k k k k k k k k k k k k 44 DFHAUXT DSN KI SNCE TRACE SITD DISP SHR 45 EDI1INTR DD SYSOUT A INTRDR 46 ZTBlINTR DD SYSOUT A INTRDR 47 ZTB2INTR DD DSN KI EIDC ZTBG INTR DISP MOD 48 ZTB1INTR DD SYSOUT A INTRDR J BRR RRR KKK KR KK KR KK KK KR A RR k k A KKK k k ke 49 TCPCICS DD SYSOUT H DCB DSORG PS RECFM V BLKSIZE 136 50 SYSTCPD DD DSN SW TCPIP SEZAPARM TCPDATAB DISP SHR KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK ko ko ko ko ko ko ko 77 TERMINALES SECUENCIALES SIUE X J BR RRR RRR KKK KR KR KR k k Kk Ck kk kk KC KC KC A A A Ck kk kk kk KC k k A A k k k k k k k k k k k k ke IIR 77 51 DD UNIT VIO SPACE TRK 1 52 CIEG2 DD UNIT VIO SPACE TRK 1 99 UNIG1 DD UNIT VIO SPACE TRK 1 100 UNIG2 DD UNIT VIO SPACE TRK 1 J BRR RRR KR KR KKK KK KK KK RR RK A RRA A k k k k k k k k k k k RK k k 71 TERMINALES SECUENCIALES EDITRAN KKK KKK
11. Error en macro read diagn stico x OF Error en ZTBB cliente server child al intentar recibir los datos de usuario errno del read 61 ECONNREFUSED la petici n de conexi n ha sido rechazada Se muestran a continuaci n los significados de dichos mensajes x20 X 01 X xx Error macro INITAPI Error en ZTBB cliente Error en ZTBA server padre X 02 Error macro GETCLIENTIID Error en ZTBA server padre X 03 Error macro SOCKET Error en ZTBB cliente Error en ZTBA server padre X 04 Error macro SETSOCKOPT Error en ZTBB cliente Error en opci n SO REUSEADDR Error en ZTBB 6 cliente Error en opci n SO KEEPALIVE Error en ZTBB server child Error en opci n SO REUSEADDR Error en ZTBB server child Error en opci n SO KEEPALIVE X 05 Error macro BIND Error en ZTBA server padre X O6 Error macro LISTEN Error en ZTBA server padre 07 Error macro GETHOSTBYNAME X 00 y X 01 Error en ZTBB 6 cliente X00 Error al resolver la ip de conexi n X01 EDITRAN Proxy Error al resolver la ip destino X 08 Error macro GETHOSTNAME INDRA Todos los derechos reservados EDITRAN IP 5 1 Pag 9 6 EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de campos y formatos USUARIO X 05 Error en ZTBA server padre X 09 X 00 Error en ZTBB 6 cliente Error macro ACCEPT X 05 Error en ZTBA server padre X OB
12. RESP NOTIFICACION 00 CICSO1 CICSO2 TCP PRUTCP 40030 E SAR RESP NOTIFICACION 00 501 502 TCP PRUTCP 40049 E E11 PETICION LIBERACION CICSO1 CICSO2 TCP PRUTCP 40049 S SAB SOL LIBERACION 02 502 501 TCP PRUTCP 40050 E SAB SOL LIBERACION 02 502 501 TCP PRUTCP 40050 S 01055 13 0F85 0000 00 OF CICSO1 CICSO2 TCP PRUTCP 40051 E TCP 07777 13 OEEE 0000 00 OF 00000000000000000000000000000 172115 E TCP 07777 20 0000 15 09 El significado de la traza previa es el siguiente por ejemplo para el segundo mensaje En las columnas S y Comentario aparece un mensaje entrante E y se trata de un mensaje x OB indicaci n de llamada En la columna NSM LU aparece el puerto remoto en ste caso 1055 x 41F En la columna Comentario aparece un 0 85 3973 en decimal que es en realidad el numero de tarea CICS transid ZTBB que trata la indicaci n de conexi n Es importante resaltar que si en un tiempo muy corto dicho n mero va pegando saltos muy grandes nos encontraremos con que el CICS se encuentra muy cargado est ejecutando muchas tareas simult neamente Si se detectan problemas en el CICS revise la parametrizaci n de la definici n CICS a VTAM en concreto el par metro EAS n mero de comunicaciones activas simult neamente y la relaci n de los par metros Tclass de las transacciones con el par metro CMXT de la SIT las transid se pueden apuntar a una clase y en la SIT se limita en
13. 193522 T0 ETH1 1500 HOST Default Route All packets to an unknown destination are routed E through this route Network First Hop Link Name Packet Size Subnet Mask Subnet Value DEFAULTNET 192 168 172 254 OSABATCP DEFAULTSIZE 0 orouted Routing Information if you are using orouted comment out the GATEWAY statement and update the BSDROUTINGPARMS statement to reflect your installation configuration and remove the semicolon R Link Maxmtu Metric Subnet Mask Dest Addr BSDROUTINGPARMS false TR1 2000 0 255 255 255 0 0 ETH1 1500 0 255 255 255 0 0 FDDI1 DEFAULTSIZE 0 2953255429540 0 INDRA Todos los derechos reservados EDITRAN IP 5 1 Pag 3 4 EDITRAN IP 5 1 CICS Manual de usuario 3 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS ENDBSDROUTINGPARMS Use TRANSLATE to specify the hardware address of a specific IP address See the Customization and Administration Guide for more information 7 TRANSLATE A null translate statement issues the warning message EZZ03231 Turn off all tracing If tracing is to be used change the following line To trace the configuration component for example change the line to ITRACE ON CONFIG 1 ITRACE OFF The ASSORTEDPARMS NOFWD will prevent the forwarding of IP packets between different networks If NOFWD is not specified IP packets will be forwarded between networks when this host is a gateway ASSORTEDPARMS NOFWD ENDASSORTEDPARMS NOFWD issues
14. 8B 32 3579 0 00 0 1 TCPIPROC MSGLEVEL 1 2 STARTING EXEC TCPIPROC 3 XXTCPIP PROC MODULE TCPIP PARMS NOSPIE CTRACE CTIEZAOO XX XX TCP IP for MVS XX SMP E Distribution Name EZAEBO1G XX XX 5655 HAL C Copyright IBM Corp 1989 1996 XX All rights reserved XX US Government Users Restricted Rights XX Use duplication or disclosure restricted XX by GSA ADP Schedule Contract with IBM Corp XX See IBM Copyright Instructions XX XX XX NOSPIE must be specified in the PARMS above so TCPIP can run XX authorized APAR PN65950 XX XX Added new CTRACE keyword to specify default Component XX Trace SYS1 PARMLIB member See amp PARMS definition above XX for CTRACE CTIEZA00 specification XX 4 XXTCPIP EXEC PGM EZAINMAN XX PARM amp MODULE ERRFILE SYSERR HEAP 512 amp PARMS XX REGION 17M TIME 1440 IEFC6531 SUBSTITUTION JCL PG REGION 17M TIME 1440 M EZAINMAN PARM TCPIP ERRFILE SYSERR H 5 XXSTEPLIB DD DSN TCPIP DESA SEZATCP DISP SHR 6 XXSYSMDUMP DD SYSOUT XX XX The SYSPRINT SYSERR SYSERROR and SYSDEBUG DDs can specify dataset name or SYSOUT All of these DDs support the use XX of alternate data sets which are specified by replacing the XX DD name prefix SYS with SY1 SY2 or SY3 XX Output will cycle from the primary to the alternate data sets XX and around again as each data set fills XX XX SYSPRINT contains runtime diag
15. Error en ZTBB Server child Siendo cliente se intenta hacer link programa control EDITRAN TX EDITRAN PR y da un error X 02 Error en ZTBB server child Siendo server child se intenta hacer link a programa control EDITRAN TX EDITRAN PR y da un error Error en ZTBA server padre al intentar arrancar server child ZTBB X 15 Otros ZTBZ distribuidor de server 01 Error en ZTBZ 6 distribuidor de server Error de apertura de fichero EZACONFG Error en ZTBZ distribuidor de server Error de lectura de fichero EZACONFG Error en ZTBZ 6 distribuidor de server Error de start transid a server padre X 04 Error en ZTBZ distribuidor de server No existen server padre en EZACONFG no tiene SECEXIT EDITRAN 16 Otros Errores ZTBA 6 Server padre X 01 Bombing en ZTBA 6 server padre Se ha alcanzado el n mero m ximo de conexiones simult neas entrantes a un puerto tcp Revise par metro de entorno local NRO CONEX SIMULT LISTENER X 02 Error en ZTBA server padre Error al escribir write ts queue ZTBPQTCC Error en ZTBA 6 server padre Error al reescribir rewrite ts queue ZTBPQTCC Error en ZTBA server padre Error de apertura de fichero EZACONFG X 05 Error en ZTBA server padre Error de lectura de fichero EZACONFG gt 2 lt gt Error ZTBA 6 server padre Ya existe un server padre activo para el INDRA Todos los derechos reservados
16. IEWL PARM LIST MAP XREF REGION 512K COND 4 LT SYSPRINT DD SYSOUT SYSUT1 DD SPACE CYL 5 1 DISP NEW PASS UNIT SYSDA SYSLMOD DD DSNAME amp amp LOADSET PGM1 DISP MOD PASS UNIT SYSDA 29 SPACE TRK 1 1 1 Zu DCB DSORG PO RECFM U BLKSIZE 32760 SYSLIN DD DSNAME amp amp OBJSET DISP OLD DELETE THIS STEP EXECUTES THE INITIALIZATION PROGRAM FILELOAD EXEC PGM LINK SYSLMOD COND 4 LT EZACONFG DD DSNAME CICS TCP CONFIG DISP OLD Atenci n al jcl En el que proporciona IBM no aparece PGM1 en SYSLMOD INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 4 2 EDITRAN IP 5 1 CICS Manual de usuario 4 FICHERO DE CONFIGURACION CICS Y LISTENER 4 1 DEFINICION FICHERO EZACONFG PARAMETRO CICS Para ver modificar etc el fichero desde CICS se invoka a la transid EZAC por ejemplo si hemos seleccionado EZAC ALTER nos muestra el siguiente menu EZAC ALTER ENTER ONE OF THE FOLLOWING CROS Enter Yes No LLSTENER gt Enter Yes No Si introducimos YES al valor CICS nos muestra un nuevo men para saber de que CICS se trata En el mismo seleccionamos tal valor aunque por defecto muestra el del CICS propio EZAC ALTER CICS ENTER ALL FIELDS APPLID gt BMCIDATR APPLID of CICS System A continuaci n nos vuelve a mostrar una pantalla con par metros que se pueden modificar Los
17. KKK KKK KKK KKK Sk ko ko x 000001 KIOF6AEA JOB EGDC KIT 199 RELINK TCP IP MSGCLASS H CLASS A 000002 NOTIFY amp 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 5 50 1 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 KKKKKK KKK KK KKK KKK k k k k k k k kk k kk kk Bottom of Data KKKKKKKKKK KKK KKK KKK KK KKK KKK El error descrito se refleja en la siguiente secuencia LOG DE SISTEMA Indra Todos derechos reservados IP51USIC 07 01 2015 Pag 8 3 EDITRAN IP 5 1 CICS 5 01465 00000090 STC01465 345 345 345 STC01465 00
18. activos para que stos ltimos finalicen ordenadamente 5 Fichero EZACONFG se definen en el ejemplo a trav s de la transid EZAC 5 1 Registros CICS En el mismo se asocia el nombre del monitor de teleproceso a la pila a la que se engancha address space del TCP esto es al nombre que aparece en el TCPIPJOBNAME de la pila con la que se conecta el CICS par metro del TCPDATA Tambi n se define el destino DCT par metro ERRORTD Si se definen registros CICS que no corresponden al monitor de teleproceso sobre el que estamos el EZACONFG deber ser el mismo en los CICS definidos 5 2 Registros LISTENER Se asocian siempre a un CICS determinado es decir podr amos tener 2 iguales asociados a distintos CICS n los mismos se incluye la transid EDITRAN y el puerto por el que va a escuchar Se pueden definir por tanto a un mismo registro CICS varias transid EDITRAN con distinto nombre pero asociadas al mismo programa y escuchando por puertos distintos El fichero EZACONFG se define mediante jcl y se modifica v a transid EZAC 6 PPT Se definen los programas ZTBPOTCC Programa server padre listener ZTBPOTCD Programa server child 6 cliente ZTBPOTCZ Programa que arrancar las distintas copias de ZTBPOTCC seg n las transid definidas con los mismos ZTBPO201 Nucleo EDITRAN INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 10 17 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIENTO DEFINICIONES AC
19. hubiera sido posible la resoluci n del DNS por no disponer de un servidor de nombres Si el servidor que soluciona el DNS es el 002 002 002 001 se habr n realizado 2 llanadas a 2 servidores de nombres primero al asociado a la direcci n 002 002 002 002 y luego al que resuelve 002 002 002 001 Un monitor de teleproceso no puede estar enganchado a 2 pilas tcp a la vez Dos monitores de teleproceso pueden convivir con la misma pila TCP pero no pueden arrancar simult neamente dos listener sobre el mismo puerto Esto es lo mismo que arrancar dentro de un monitor de teleproceso 2 transid distintas sobre el mismo puerto Tambi n es lo mismo que intentar arrancar 2 veces el mismo listener en cuyo caso la propia programaci n EDITRAN no lo va a permitir aunque tampoco lo permitir a la interfaz de sockets pues ya existe otro activo sobre el mismo puerto Tampoco es posible que un CICS est como servidor en una PILA y como cliente en otra En las actuaciones como servidor en la macro BIND no se utiliza la direcci n IP local de modo que un listener quedar a escuchando por un puerto a todas las direcciones IP de una pila de arranque DIRECCION 00000000 del PUERTO XXXXX En la pila se pueden incluir adem s VIPAS Virtual ip address Sin embargo no se le ve mucha utilidad a que una VIPA una OSA quiera ser escuchada por un puerto y otra VIPA OSA ser escuchada por otro distinto del anterior La soluci n implementada pasa porque ambas escuchan por am
20. is an SNA Link DEVICE SNALUO SNAIUCV SNALINK 10000000 SNALINK INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 3 3 EDITRAN IP 5 1 CICS Manual de usuario 3 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS LINK SNA1 1 SNALUO HOME Internet IP addresses of each link in the host NOTE To use this home statement update the ipaddress and linknames to reflect your installation configuration and remove the semicolon HOME 192 168 172 088 OSABATCP The PRIMARYINTERFACE statement is used to specify which interface is the primary interface If PRIMARYINTERFACE is not specified then the first link in the HOME Statement is the primary interface as usual NOTE To use this primary statement update the and linkname to reflect your installation configuration and remove the semicolon PRIMARYINTERFACE OSABATCP IP routing information for the host All static IP routes should be added here NOTE To use this GATEWAY statement update the addresses and links to reflect your installation configuration and remove the semicolon GATEWAY Direct Routes Routes that are directly connected to my interfaces Network First Hop Link Name Packet Size Subnet Mask Subnet Value 192 168 172 OSABATCP 1500 0 Indirect Routes Routes that are reachable through routers on my network Network First Hop Link Name Packet Size Subnet Mask Subnet Value z 199 12 2 130 50 10 1 1 2000 0 105654
21. n mero de transid de cada una de las clases n la SIT est el par metro MXT para indicar el n mero de transid CICS En algunos casos aparecen unos d gitos que se corresponden con el CNID identificador de aplicaci n en caso de solicitud de llamada para que devuelva lo mismo en llamada aceptada INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 9 2 EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de campos y formatos USUARIO Otros tipos de mensaje son x OF llamada aceptada x 13 liberaci n y x 20 error adem s del propio x 0B que si tiene sentido S significa solicitud de llamada Si seleccionamos el segundo mensaje traza expandida vemos el contenido completo de la llamada entrante entre otras cosas aparecen los campos anteriormente descritos x OB x 041F y x OF85 Tambi n aparecen los datos de usuario de la sesi n EDITRAN x CO DA y el IP Address remoto 192 168 172 088 cuyo dns es ampurdan indra es Todos ellos van precedidos en ste caso por la cabecera TCP x E3C3D740 que aparece la columna MSJE 14 03 2000 GESTION DE EDITRAN EDITRAN 12 14 29 CONSULTA DE LA TRAZA VERSION 5 1 SESION TRAZA CICSO2 CICSO1 TCP PRUTCP FECHA SSAAMMDD 20000314 HORA HHMMSS 140027 ENTRADA SALIDA E E3C3D7400B0000041F0F8500000000000000000000000000000000000000000FC0A3310000 9994305052555443500A4040404040404040404040404040404040404040000000C9404040 40404040404040404040404040
22. not be appended to the host name DOMAINORIGIN TEL INDRA ES NSINTERADDR specifies the IP address of the name server LOOPBACK 127 0 0 1 specifies your local name server If a name Server will not be used then do not code an NSINTERADDR statement Comment out the NSINTERADDR line below This will cause all names to be resolved via site table lookup NSINTERADDR 127 0 0 1 INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 3 7 EDITRAN IP 5 1 CICS Manual de usuario 3 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS NSINTERADDR 172 29 2 41 SERVIDOR DE DNS NSINTERADDR 192 168 1 30 SERVIDOR DE DNS NSPORTADDR specifies the foreign port of the name server 53 is the default value NSPORTADDR 53 f RESOLVEVIA specifies how the resolver is to communicate with the name server TCP indicates use of TCP virtual circuits UDP indicates use of UDP datagrams The default is UDP RESOLVEVIA TCP RESOLVERTIMEOUT specifies the time in seconds that the resolver will wait to complete an open to the name server either UDP or TCP The default is 30 seconds RESOLVERTIMEOUT 30 RESOLVERUDPRETRIES specifies the number of times the resolver should try to connect to the name server when using UDP datagrams The default is 1 RESOLVERUDPRETRIES 1 TRACE RESOLVER will cause a complete trace of all queries to and responses from the name server or site tables to be written to the user s cons
23. nuevo espacio disponible probablemente no habr a ninguna ralentizaci n En la SIT y definici n del arranque de CICS a VTAM se define el numero maximo de tareas simultaneas En el ejemplo anterior hab a 18 SIMULTANEAS y habr a que afiadir nucleos simultaneos procesos EDITRAN G procesos de time out etc INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 10 23 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACIONES 10 5 TRAZAS TCP IP DE BUFFER En alguna entidad se ha conseguido sacar una traza de buffer en la que se observa la ventana de env o y recepci n y se puede hacer un c lculo de utilizaci n de buffer Se refleja a continuaci n y unicamente a efectos informativos sin soporte alguno por parte de EDITRAN los pasos que dicha entidad ha seguido para sacar dicho trace al parecer es necesario disponer de IPCS En el manual OS 390 V2R6 0 eNetwork CS IP Diagnosis aparece el procedimiento de IP Packet Trace Hay otro tipo de trace denominado Component Trace cuyo procedimiento es muy similar a ste Los pasos que se siguen son 1 Arrancar el trace TCP IP V TCPIP proc arranque TCPIP CMD O DSN data set name data set name Fichero o miembro de librer a que debe contener las siguientes instrucciones PKTTRACE ON PKTTRACE FULL remota 2 Arrancar el external writer TRACE CT WTRSTART TRTCP1 WRAP SYS1 PROCLIB TRTCP1 Este miembro
24. procedimiento de arranque que tira de un PROFILEOO1 Y DE UN TCPDATAOO 1 1 1 El PROFILEOO1 tiene PORT 7777 contra 5002 y un home con las direcciones 111 111 111 111 asociada a una OSA11 y 111 111 111 112 asociada a una OSA12 1 1 2 El TCPDATAOO tiene un TCPIPJOBNAME TCPIP001 y no tiene NSINTERADDR 1 2 PILAOO2 tiene un procedimiento de arranque que tira de un PROFILEOO2 Y DE UN 002 1 2 1 El PROFILEOO2 no tiene PORT y tiene un home con la direcci n 222 222 222 222 asociada a la 05 21 1 2 2 El TCPDATAOO2 tiene un TCPIPJOBNAME TCPIPOO2 un NSINTERADDR 002 002 002 002 y otro NSINERADDR 002 002 002 001 Tenemos 2 CICS 5001 Y 5002 con las siguientes caracter sticas 2 1 CICSOO1 En el arranque apunta TCPDATAOO2 2 2 CICSOOZ En el arranque apunta a TCPDATAOO2 Tenemos 1 2 ficheros de configuraci n EZACONFG En el ejemplo se definen 2 CONFGOO1 para 5001 y CONFGOO 2 para 5002 con las siguientes caracter sticas todas las transid est n asociadas al programa ZTBPOTCC 3 1 CONFGOO1 Un registro CICS APPLID 5001 TCPADDR TCPIPOO1 3 2 CONFGOO1 Un registro CICS APPLID 5001 TRANID ZTBQ PORT 7777 3 3 CONFGOO1 Un registro CICS APPLID 5001 TRANID ZTBR PORT 7778 3 4 CONFGOO1 Un registro CICS APPLID 5001 TRANID ZTBS PORT 7779 3 5 CONFGOO1 Un registro CICS APPLID 5001 TRANID ZTBY PORT 7779 3 6 CONFGOO2 Un registro CICS APPLID CICS00
25. recomendados para EDITRAN son EZAC ALTER CICS OVERTYPE TO ENTER APPLID gt BMCIDATR APPLID of CICS System TCPADDR gt TCPIPROC Name of TCP Address Space NTASKS gt 025 Number of Reusable Tasks DPRTY gt 000 DPRTY value for ATTACH CACHMIN gt 010 Minimum Refresh Time for Cache CACHMAX gt 020 Maximum Refresh Time for Cache CACHRES gt 005 Maximum number of Resolvers ERRORTD gt TCPI TD Queue for Error Messages SMSGSUP gt NO EN CICS TS 2 2 INDRA Todos los derechos reservados EDITRAN IP 5 1 Pag 4 3 EDITRAN IP 5 1 CICS Manual de usuario 4 FICHERO DE CONFIGURACION CICS Y LISTENER 4 2 DEFINICION FICHERO EZACONFG PARAMETRO LISTENER Para la transid que actua como LISTENER seguiremos los mismos pasos que anteriormente seleccionando por LISTENER ZTBA u otras asociadas al programa ZTBPOTCC y llegaremos a un men con los valores recomendados por EDITRAN El cambio con respecto a fase 0 es que debe codificarse para conexiones TCP nativas SECEXIT EDITRAN Si codifica LISTENER para PROXY debe codificar SECEXIT EDITR PR Si codifica LISTENER para TX debe codificar SECEXIT EDITR TX EZAC ALTER LISTENER OVERTYPE TO ENTER APPLID gt BMCIDATR APPLID of CICS System TRANID gt ZTBA Transaction Name of Listener PORT gt 07777 Port Number of Listener IMMEDIATE gt NO Immediate Startup Yes No BACKLOG gt 020 Backlog Value for Listener NUMSOCK gt 100 Number of Sockets in L
26. the informational message EZZ03341 Define the VTAM parameters required for the Telnet server 7 BEGINVTAM Define logon mode tables to be the defaults shipped with the latest level of VTAM TELNETDEVICE 3278 2 E T3270PC 24 line screen default of NSX32702 TELNETDEVICE 3279 2 E NSX32702 24 line screen default of NSX32702 TELNETDEVICE 3278 3 E NSX32703 32 line screen default of NSX32702 TELNETDEVICE 3279 3 E NSX32703 32 line screen default of NSX32702 TELNETDEVICE 3278 4 E NSX32704 48 line screen default of NSX32702 TELNETDEVICE 3279 4 E NSX32704 48 line screen default of NSX32702 TELNETDEVICE 3278 5 E NSX32705 132 column screen default of NSX327 TELNETDEVICE 3279 5 E NSX32705 132 column screen default of NSX327 Define the LUs to be used for general users DEFAULTLUS 00001 00002 TCPO0003 TCP00004 00005 00006 00007 00008 TCP00009 TCPO00010 ENDDEFAULTLUS LUSESSIONPEND On termination of a Telnet server connection the user will revert to the DEFAULTAPPL DEFAULTAPPL TUBESB Set the default application for all Telnet Sessions to allow CLSDST Pass LINEMODEAPPL TSB Send all line mode terminals directly to TSO ALLOWAPPL SAMON QSESSION SAMON appl does CLSDST Pass to next appl ALLOWAPPL TSO DISCONNECTABLE Allow all users access to TSO applications TSO is multiple applications all beginning with TSO so use the to get
27. 000000000000000 El significado de los nuevos campos es L nea 1 columnas 9 x 13 tipo de mensaje indicaci n de liberaci n L nea 1 columnas 27 30 x FFOC Causa FF diagn stico OC ver errores x13 en este manual en concreto quiere decir que se produce un error en el proceso cliente anterior al env o de datos de usuario hasta la macro connect incluida Esta liberaci n viene acompa ada de un mensaje x20 previo que indica el error producido macros iniciales tcp previas al env o recepci n de user data En definitiva la situaci n de error comentada se corresponde con que el dns de perfiles no exist a en el servidor de nombres de forma que fue imposible hacer el connect pues no se sab a la ip remota Para trazas de m s detalle de INDRA codificar sistema operativo EDIP versi n sistema operativo spaces MULT y N mero cvcs m ximos 999 En este caso se crean cola ts ZTBPEDIP versi n sistema operativo spaces colas TS ZTBH MMSS minuto y segundo versi n sistema operativo MULT con datos sobre escrituras y lecturas de la red a ser analizados por INDRA En el caso de ZTBPEDIP es una nica ts cuyo contenido son todas las sesiones IP En el caso de ZTBH se graban adem s TODAS LAS MACROS 9 3 MENSAJES DE ERROR TIPO X20 Los mensajes x20 indican errores en el proceso Como ejemplo en la traza se muestran de la siguiente manera en TCP llevan clave TCP en TX llevan clave ETX y
28. 0000000000000000000000000 00000000404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 00E24040400000404040F0F9F5F6F1F4404040404040 El paquete que se ha enviado es el siguiente L nea 1 columnas 9 x OB tipo de mensaje solicitud de llamada Linea 1 columnas 11 14 x 0002 identificador que asigna EDITRAN L nea 1 columnas 15 18 1 61 puerto remoto 7777 L nea 1 columnas 37 42 timer especificado en sesi n 030 segundos L nea 1 columnas 66 en adelante longitud de user data y user data L nea 4 columna 37 dns a llamar 04390B Si pulsamos PF2 vemos los caracteres representables ER AS rar E A SN O ME Or E 0301 ELE rm l cRS6 04390B S 095614 HORA DE PROCESO DE MENSAJE 095614 LONGITUD DE MENSAJE TRATADO 000226 El siguiente mensaje es una indicaci n de error x 20 Si lo seleccionamos 16 06 2004 CONSULTA DE FICHEROS EDITRAN 5 1 12 56 41 CONSULTA DE TRAZA SESION TRAZA SO1DI SO2DI 001 FECHA SSAAMMDD 20040616 HORA HHMMSS 095615 ENTRADA SALIDA E p Za E3C3D7402000021E61027C00000700000000F0F3F0C900000001000
29. 00000000FC0A3315000 9994305443503030310A000000000000000000000000000000000040404000000000404040 INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 9 4 EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de campos y formatos USUARIO 40404040404040404040404040404040404040404040404040404040404040404040404040 404040404040404040404040404040404040D6F4F3F9F0C200000000000000000000000000 El significado de los nuevos campos es L nea 1 columnas 9 x 20 tipo de mensaje indicaci n de error Linea 1 columnas 19 22 x 027C identificador de tarea L nea 1 columnas 27 30 x 0700 Causa 07 diagn stico OO ver errores x20 en este manual en concreto quiere decir error en macro gethostbyname L nea 1 columnas 45 60 errno y retcode de la macro en concreto 00000001 y 00000000 que indica que el dns no ha sido resuelto El siguiente mensaje es una indicaci n de liberaci n x 13 Si lo seleccionamos 16 06 2004 CONSULTA DE FICHEROS EDITRAN 5 1 13 03 22 CONSULTA DE TRAZA SESION TRAZA SO1DI SO2DI TCP001 FECHA SSAAMMDD 20040616 HORA HHMMSS 095615 ENTRADA SALIDA E n ya Mp a cC RN E rU E3C3D7401300021E61027C0000FF0C000000F0F3F0C90000000000000000000FC0A3315000 9994305443503030310A000000000000000000000000000000000040404000000000404040 40404040404040404040404040404040404040404040404040404040404040404040404040 404040404040404040404040404040404040D6F4F3F9F0C200000000000
30. 000090 00000090 00000090 00000090 00000090 STCO1465 00000090 Manual de usuario 8 CICS DEFINICION DE RECURSOS PARA TCP IP DFHSRO001 BMCIDATR An abend code 0C4 AKEA X 00001B76 in program ZTBPOTCD DFHME0116 BMCIDATR 345 Module DFHMEME CICS symptom string for message DFHSROO01 i PIDS 565501800 LVLS 410 MS DFHSRO001 RIDS DFHSRP PTFS UN9491 AB S00C4 AB UAKEA RIDS ZTBPOTCD ADRS 00001B76 has occurred at offset DFHDUO205 BMCIDATR A SYSTEM DUMP FOR DUMPCODE 5 0001 WA SUPPRESSED BY THE DUMP TABLE OPTION FOR THIS DUMPCODE CEE1000S LE 370 INTERNAL ABEND ABCODE 4087 REASON 0000008 KOK KK RK RK ckckckckckckck ck kk KK kk k kk k BOTTO LOG DE CICS DFHDUO207I 20 05 99 16 38 10 BMCIDAT suppressed by the DUMP TABLE OPTION FO DFHDUO207I 20 05 99 16 38 10 BMCIDAT suppressed by the DUMP TABLE OPTION FO M OF DATA N X XkXkX kk kk kk kk kk KK kk Kk KK Transaction and system dumps for dumpcode 4039 were R THIS DUMPCODE Transaction and system dumps for dumpcode 4087 were R THIS DUMPCODE DFHAC2236 20 05 99 backout successful Indra Todos derechos 16 38 10 BMCIDATR Transaction ZTBB abend 4087 in program ZTBPOTCD term ZTB3 reservados IP51USIC 07 01 2015 Pag 8 4 9 EDITRAN p Descripci n de campos y formatos USUARIO EDITRAN IP 5 1 CICS Manual de usuario EDITRAN p Descripci n de campos y formatos USUARIO 9 DIAGRAMAS DE FLUJO 9 1 N COPIAS N COPIAS N COPIAS
31. 10 1492 0 255 0 0 0 0 0 0 10 10 0 0 10 ETH10 1492 0 255 0 0 0 12 0 0 200 10 0 0 10 ETH10 1492 0 DEFAULTNET LO TT ETH11 1492 0 TRANSLATE NOTRACE SCREEN ASSORTEDPARMS NOFWD No IP forwarding MESSAGECASE MIXED Mensajes de TCP IP en mayusculas y minusculas TCPIPSTATISTICS Manda a OUTPUT ciertas estadisticas ENDASSORTEDPARMS BEGINVTAM ABENDRETRY MSGO7 3278 2 D4B32782 3279 2 D4B32782 3278 3 D4B32783 3279 3 D4B32783 3278 4 D4B32784 3279 4 D4B32784 3278 5 D4B32785 3279 5 D4B32785 3278 2 E NSX32702 3279 2 E NSX32702 3278 3 E NSX32703 3279 3 E NSX32703 3278 4 E NSX32704 3279 4 E NSX32704 3278 5 E NSX32705 3279 5 E NSX32705 LUGROUP INTERNAS NUIH7001 NUIH7016 ENDLUGROUP IPGROUP RECTORA ENTIDAD 255 255 0 0 10 0 0 0 ENDIPGROUP LUMAP INTERNAS RECTORA ALLOWAPPL USSTCP USTCPINO RECTORA USSTCP USTINDRA REDINDRA USSTCP USTCPIN1 ENDVTAM START OSA10 START OSA11 START OSA20 START OSA21 Okck ck k k ck ck k ck ck k ck kc k amp k kk k k k k k k k k k k lt k Bottom of Data INDRA Todos los derechos reservados EDITRAN IP 5 1 Pag 2 4 EDITRAN IP 5 1 CICS Manual de usuario 2 05390 V2R4 PROCEDIMIENTOS Y FICHEROS 2 3 FILE TCPDATA 0S390 V2R4 TCPIP DESA TCPPARMS TCPDATA En el fichero hlq TCPIP DATA no hay que hacer ninguna entrada especial aunque hay que chequear el par metro TCPIPJOBNAME que se ha introducido en el arranque del TCP Este par metro es el nombre del procedimiento de arranque d
32. 2 TEPADDR TCPIPOO2 3 7 CONFGOO2 Un registro CICS APPLID CICS002 TRANID ZTBQ PORT 7777 3 8 CONFGOO2 Un registro CICS APPLID 5002 TRANID ZTBR PORT 7778 3 9 CONFGOO2 Un registro CICS APPLID 5002 TRANID ZTBT PORT 7779 Tenemos 2 EDITRAN 4 1 EDICICSOO1 En entorno TCPNAME apunta a 002 y en API TCP ZTBB 4 2 EDICICSOO2 entorno TCPNAME apunta TCPIPOO1 y API TCP a ZTBB Si se arrancan los listener en ambos CICS PLT transid ZTBZ transid EZAO start LISTENER siempre y cuando se hayan arrancado los sockets for cics se van a enganchar los siguientes procesos 1 La transid ZTBQ de 5001 se tendr a que quedar escuchando llamadas entrantes por el puerto 7777 de la direcci n 111 111 111 111 y 111 111 111 112 puesto que en el registro CICS del EZACONFG se especific TCPIPOO1 y por tanto tira de la PILAOO1 que tiene dicho TCPIPJOBNAME TCPIPOO1 en su TCPDATAOO sacando la direcci n local de la macro HOME del PROFILEOO1 Sin embargo como en dicha PILAOO1 se especifica en el PROFILEOO1 el PORT 7777 asignado a 5002 no va a ser posible la activaci n del LISTENER descrito puesto que est asignado a otro CICS ERRNO 13 6 permiso denegado Si un remoto llama a dicha direcci n y puerto le dar un error de connect 61 no existe LISTENER activo INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 10 19 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIEN
33. 404040404040404040404040404040404040404040404040 404040404040404040F1F9F24BF1F6F84BF1F7F24BF0F8F800000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000011819497A499 8481954B89958499814B85A240404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 01B34040400000404040F1F4F0F0F2F7404040404040 PF2 SWITCH HEXADECIMAL CARACTER Si se pulsa PF2 se visualiza en car cter 14 03 2000 GESTION DE EDITRAN EDITRAN 12 14 29 CONSULTA DE LA TRAZA VERSION 5 1 SESION TRAZA 502 501 TCP PRUTCP FECHA SSAAMMDD 20000314 HORA HHMMSS 140027 ENTRADA SALIDA E Y A A ed Be Le luu I 192 168 172 088 ampurdan indra es 140027 HORA DE PROCESO DE MENSAJE 140027 LONGITUD DE MENSAJE TRATADO 000435 PF2 SWITCH HEXADECIMAL CARACTER A continuaci n se especifica un trace con errores 16 06 2004 CONSULTA DE FICHEROS EDITRAN 5 1 09 56 17 CONSULTA DE TRAZA SESION FECHA 16 06 2004 SEL SESION HORA S MSJE NSM LU T COMENTARIO INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 9 3
34. 7777 La ficha SYSTCPD apunta al TCPDATA y es fundamental si queremos hacer connect via DNS Las librerias LE370 deben estar por delante de las de TCP INDRA Todos los derechos reservados EDITRAN IP 5 1 Pag 2 7 EDITRAN IP 5 1 CICS Manual de usuario 3 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS 3 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS 3 1 PROCEDIMIENTO DE ARRANQUE DE TCP 0S390 V2R5 6 000001 TCPIPB PROC PARMS CTRACE CTIEZBOO 000003 Communication Server 390 000004 SMP E Distribution Name 2 016 000006 5647 01 Copr IBM Corp 1991 1997 000007 All rights reserved 000008 US Government Users Restricted Rights 000009 Use duplication or disclosure restricted 000010 by GSA ADP Schedule Contract with IBM Corp 000011 See IBM Copyright Instructions 000014 TCPIP EXEC PGM EZBTCPIP 000015 PARM amp PARMS 000016 REGION 32M TIME 1440 000018 The C runtime libraries should be in the system s link list 000019 or add them via a STEPLIB definition here If you add 000020 them via a STEPLIB they must be APF authorized with DISP SHR 000022 STEPLIB DD DSN TCPIP SEZALINK DISP SHR 000023 DD DSN TCPIP SEZALNK2 DISP SHR 000025 SYSPRINT contains run time diagnostics from TCPIP It may be 000026 a data set or SYSOUT 000027 ALGPRINT contains run time diagnostics from TCPIP s Autolog 000028 task It should be SYSOUT 000029 SYSERROR co
35. DISP SHR ZTB1INTR DD SYSOUT A INTRDR KK KK kk Ck kk kk kk A A A Sk kk kk kk kk kk KKK k k TCPCICS DD SYSOUT H DCB DSORG PS RECFM V BLKSIZE 136 SYSTCPD DD DSN SW TCPIP SEZAPARM TCPDATAB DISP SHR E E E RR kkk kkk kkk TABLA DCT DFHDCT TYPE SDSCI DSCNAME TCPCICS DFHDCT TYPE EXTRA DESTID TCPI DSCNAME TCPCICS x x x X INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 10 14 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACIONES TABLA PLT Entradas en la PLTPI despu s de la DFHDELIM DFHPLT TYPE ENTRY PROGRAM EZACIC20 DFHPLT TYPE ENTRY PROGRAM ZTBPOTCI Entradas en la PLTSD antes de la DFHDELIM DFHPLT TYPE ENTRY PROGRAM EZACIC20 DFHPLT TYPE ENTRY PROGRAM ZTBPOTCF FICHERO DE CONFIGURACION EZACONFG EZAC DEFINE CICS APPLID gt CICSSITD TCPADDR gt TCPIPB ERRORTD gt TCPI EZAC DEFINE LISTENER APPLID gt CICSSITD TRANID gt ZTBA PORT gt 07777 SECEXIT gt EDITRAN EDITRAN ENTORNO LOCAL API TCP ZTBB PLTINI TCP ZTBZ CAMPOS TCP IP TCPNAME TCPIPB TIME OUT USER DATA 55 020 NRO CONEX SIMULT LISTENER 020 USAR SERVER DNS EN LLAM ENT TO MILISEG ENVIOS 001 999 100 BUFFER ENVIO TX LISTENER 999900 BUF ENVIO TCP PX LISTENER 000000 BUFFER RECEP TX LISTENER 000000 BUF RECEP TCP PX LISTENER 000000 EDITRAN SESION DE
36. EDITRAN IP 5 1 Pag 9 8 EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de campos y formatos USUARIO puerto especificado enqbusy 07 Error 2 6 Server padre No existe registro EZACONFG 6 tiene SECEXIT EDITRAN Abend en ZTBA X 15 X17 Otros Errores ZTBB cliente 6 server child xo1 Error en ZTBB actuando como server child No han llegado los datos de usuario en el tiempo especificado en entorno local par metro TIME OUT USER DATA MAX MSS Error ZTBB actuando como cliente No se han enviado datos de usuario la red cuando se va a leer Llega un mensaje de la red no tiene sentido pues el EDI remoto no toma iniciativas Da un error de lectura en este ultimo caso viene acompafiado de otro mensaje con el errno de error en la lectura que puede ser zeros si se cae la conexi n X 04 Error en ZTBB actuando como server child en protocolo TCP IP no en TX PR Se han recibido datos de usuario se han pasado al n cleo v se va a leer de la red Llega un mensaje de la red no tiene sentido pues el EDI remoto no toma iniciativas Da un error de lectura en este ltimo caso viene acompa ado de otro mensaje con el errno de error en la lectura que puede ser zeros si se cae la conexi n X 05 Error en ZTBB actuando como cliente 6 server child En el caso del cliente se han enviado user data a la red y se est a la espera de respuesta En el cas
37. ELOPEPOOLSIZE 200 32768 RCBPOOLSIZE 50 SCBPOOLSIZE 256 SKCBPOOLSIZE 256 SMALLDATABUFFERPOOLSIZE 1200 TCBPOOLSIZE 256 TINYDATABUFFERPOOLSIZE 500 UCBPOOLSIZE 100 INFORM PDTSCO2 PDTSCO5 ENDINFORM KEEPALIVEOPTIONS INTERVAL 2 ENDKEEPALIVEOPTIONS OBEY SISTEMA NMD PDTSCO2 PDTSCO5 ENDOBEY ARPAGE 5 SYSCONTACT DEPARTAMENTO COMUNICACIONES ENDSYSCONTACT SYSLOCATION ENTIDAD PILOTO ENDSYSLOCATION DATASETPREFIX TCPIP DESA INTERNALCLIENTPARMS PORT 23 NACTIVE 3600 1 hora timeout TIMEMARK 600 SCANINTERVAL 120 SMFINIT 200 SMF Logging del Telnet Server SMFTERM 201 SMF Logging del Telnet Server SMFEXIT llama a la exit TCPTNSMF pasa a SOLVE y graba en SMF ENDINTERNALCLIENTPARMS SMFPARMS 003 004 005 LOADEXIT llama a TCPCNSMF exit pasa y graba AUTOLOG ENDAUTOLOG PORT 23 TCP INTCLIEN TELNET SERVER 7777 TCP BMCIDATR CICS SOCKET PUERTO EDITRAN NO OBLIGATORIO DEVICE OSA10 LCS 7000 LINK ETH10 ETHERNET 0 05 10 DEVICE OSA1 LCS 7002 LINK ETH11 ETHERNET 1 OSA11 DEVICE OSA20 LCS 7500 LINK ETH20 ETHERNET 0 OSA20 DEVICE OSA2 LCS 7502 LINK ETH21 ETHERNET 1 OSA21 HOME 0 0 188 ETH10 188 ETH11 186 ETH20 186 ETH21 S OOO or o INDRA Todos los derechos reservados EDITRAN IP 5 1 Pag 2 3 EDITRAN IP 5 1 CICS Manual de usuario 2 05390 V2R4 PROCEDIMIENTOS Y FICHEROS GATEWAY Network First Hop Link Name Packet Size Subnet Mask Subnet Value 10 ETH
38. HE FOLLOWING JOB DEFINES AND THEN LOADS THE VSAM FILE USED FOR CICS TCP CONFIGURATION THE JOBSTREAM 72 CONSISTS OF THE FOLLOWING STEPS Ny 1 DELETE A CONFIGURATION FILE IF ONE EXISTS xy 2 DEFINE THE CONFIGURATION FILE TO VSAM ard 3 ASSEMBLE THE INITIALIZATION PROGRAM 4 LINK THE INITIALIZATION PROGRAM RIS 5 EXECUTE THE INITIALIZATION PROGRAM TO LOAD THE FILE CONFIG JOB MSGLEVEL 1 1 THIS STEP DELETES AN OLD COPY OF THE FILE IF ONE IS THERE DEL EXEC PGM IDCAMS SYSPRINT DD SYSOUT SYSIN DD DELETE CICS TCP CONFIG PURGE ERASE THIS STEP DEFINES THE NEW FILE DEFILE EXEC PGM IDCAMS SYSPRINT DD SYSOUT SYSIN DD DEFINE CLUSTER NAME CICS TCP CONFIG VOLUMES CICSVOL CYL 1 1 MBED RECORDSIZE 150 150 FREESPACE 0 15 NDEXED DATA NAME CICS TCP CONFIG DATA KEYS 16 0 NDEX NAME CICS TCP CONFIG INDEX THIS STEP ASSEMBLES THE INITIALIZATION PROGRAM PRGDEF EXEC PGM IEV90 PARM OBJECT TERM REGION 1024K SYSLIB DD DISP SHR DSNAME SYS1 MACLIB DISP SHR DSNAME TCPV32 SEZACMAC SYSUT1 DD UNIT SYSDA SPACE CYL 5 1 SYSUT2 DD UNIT SYSDA SPACE CYL 2 1 SYSUT3 DD UNIT SYSDA SPACE CYL 2 1 SYSPUNCH DD DISP SHR DSNAME NULLFILE SYSLIN DD DSNAME amp amp OBJSE
39. KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK 77 101 DATSI DD DSN KI SNCE CICSSITD DATSI DISP SHR 102 DATSO DD DSN KI SNCE CICSSITD DATSO DISP SHR 103 BATCI DD DSN KI SNCE CICSSITD BATCI DISP SHR 104 BATCO DD DSN KI SNCE CICSSITD BATCO DISP SHR 105 CBC1I DD UNIT VIO SPACE TRK 1 106 CBC10 DD UNIT VIO SPACE TRK 1 107 XPFCDUMP DD SYSOUT 108 XPFCLOG DD SYSOUT 109 XPFCPARM DD DSN CA SYSVIEW V72 PARMLIB DISP SHR KOR KR k k k k ck ck ck ck ck ck k k k k k k k kk kk kk kk BOTTOM OF DATA X X XXX kk kk KK KKK ck k ck KKK La ficha SYSTCPD apunta al TCPDATA y es fundamental si queremos hacer connect v a DNS Las librer as LE370 deben estar por delante de las de TCP INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 3 10 EDITRAN IP 5 1 CICS Manual de usuario 4 FICHERO DE CONFIGURACION CICS Y LISTENER 4 FICHERO DE CONFIGURACION CICS Y LISTENER El fichero de configuraci n EZACONFG guarda informaci n sobre requerimientos CICS Sockets Para ello se pasa un jcl que lo crea inicializa pasa la macro EZACICD etc y por ltimo a partir de la transid EZAC se puede modificar La macro de configuraci n pone una sentencia CICS por cada monitor de teleproceso y una sentencia LISTENER por cada transid que asociemos a cada puerto KR k k k k k k k RR k k k k k k k k k k k k k K k k k k k k kk k k K k K K k k K k k KOK A Y T
40. LARACIONES para conexiones TCP ZTBPOTCI Pit de inicio ZTBPOTCF Plt de finalizaci n y Progamas IBM 7 PCT Se definen ZTBB programa ZTBPOTCD se codifica en entorno EDITRAN como TRANSID API TCP ZTBZ programa ZTBPOTCZ ZTBA 6 XXXX programa ZTBPOTCC y transacciones IBM EZAC EZAO y las que se requieran 10 3 EJEMPLO PRACTICO Y CONCLUSIONES Se ha buscado un ejemplo muy complejo para poder encontrar las relacciones necesarias y verificar los puntos de funcionamiento err neo por lo que se recomienda su no implementaci n PILA DE ARRANQUE PILA DE ARRANQUE PILAO01 PROFILE 001 PORT 7777 TCP CICS002 HOME OSA11 111 111 111 111 111 111 111 112 OSA12 ARRANQUE DE 5001 SYSTCPD TCPDATAOO2 FICH EZACONFG CONFG001 CICS 5001 001 LISTENER ZTBQ PORT 7777 ZTBR 7778 EDITRAN 5001 REGISTRO ENTORNO TCPNAME TCPIPOO2 PORT EDITRAN IP 5 1 PILAOO2 PROFILE 002 HOME 05 21 222 222 222 222 TONNATANNYD ARRANQUE DE CICS002 SYSTCPD TCPDATAOO2 FICH CONFGOO 2 EZACONFG CICS CICS002 002 PORT LISTENER ZTBQ 7777 EDITRAN CICS002 REGISTRO ENTORNO 001 INDRA Todos los derechos reservados Pag 10 18 1 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACIONES Tenemos 2 PILAS TCP PILAOO1 Y PILAOO2 con las siguientes caracter sticas 1 1 PILAOO1 tiene un
41. Men 0 Source DSNAME CUALIF 1 CUALIFn TRACETC1 Message Routing PRINT TERMINAL Men 2 7 1 D Component SYSTCPDA GMT Local L Report Type FULL Options PACKETTRACE Men 2 7 1 S Salir de IPCS En el DATA SET IPCSPRNT obtenemos el trace formateado INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 10 25 25 indra Centros de Competencia eCommerce Avda de Bruselas 35 28108 Alcobendas Madrid Espana T 34 91 480 80 80 T 34 91 480 50 00 www indracompany com
42. N amp amp EDITRA2 DISP DELETE DELETE UNIT BMVIO XX SPACE TRK 1 68 XXBATCO DD DSN amp amp EDITRA3 DISP DELETE DELETE UNIT BMVIO XX SPACE TRK 1 69 XXZTB1I DD DUMMY 70 XXZTB1O DD DUMMY 79 XXTMONCNTL DD DSN TMONCICS V2ROD CNTL DISP SHR 80 XXSYSABEND DD SYSOUT A 81 XXSYSMDUMP DD SYSOUT 82 XXSYSUDUMP DD SYSOUT I 83 XXDFHCXRF DD SYSOUT 84 XXLOGUSR DD SYSOUT X DCB DSORG PS RECFM V BLKSIZE 136 85 XXMSGUSR DD SYSOUT X DCB DSORG PS RECFM V BLKSIZE 136 86 XXLISTA DD SYSOUT J DCB DSORG PS RECFM V BLKSIZE 136 87 XXMSGCSNE DD SYSOUT X DCB DSORG PS RECFM V BLKSIZE 136 88 XXCEEMSG SYSOUT X DCB DSORG PS RECFM V BLKSIZE 161 89 XXCEEOUT SYSOUT X DCB DSORG PS RECFM V BLKSIZE 136 90 XXTCPCICS DD SYSOUT X DCB DSORG PS RECFM V BLKSIZE 136 91 SYSTCPD DD DSN TCPIP DESA TCPPARMS TCPDATA DISP SHR 92 XXDB2ST DD SYSOUT DCB RECFM V BLKSIZE 136 OUTPUT OUT1 93 XXOUT1 OUTPUT CLASS S FORMDEF A10111 COPIES 2 94 XXIEBEDIT 95 XXSYSPRINT 96 XXSYSUT1 97 XXSYSUT2 98 XXSYSIN EXEC PGM IEBEDIT COND EVEN DD SYSOUT DD DISP SHR DSN SYSB PROCLIB BMC DD DUMMY DRT1 DD SYSOUT A INTRDR DCB BLKSIZE 80 En la TCPCICS se van visualizando los mensajes TCP EZY12611 03 08 99 09 02 29 EZACICO3 ATTACH SUCCESSFUL TCB ADDRESS 008A26F8 TERM TRAN ZTBA TASK 0000449 EZY12911 03 08 99 09 02 29 LISTENER TRANSACTION ZTBA TASKID 0000449L ACCEPTING REQUESTS VIA PORT
43. O TCPI DEBE CORRESPONDERSE CON LA DEFINICION DE EZACONFG PARA CICS PARAMETRO ERRORTD PUESTO QUE DE OTRA FORMA NO APARECEN LOS MENSAJES EL DSCNAME APARECE EN ARRANQUE DE CICS INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 5 1 EDITRAN IP 5 1 CICS Manual de usuario 6 ARRANQUE CAIDA AUTOM SOCKETS FOR CICS TCP IP A TRAVES DE PLT 6 ARRANQUE CAIDA AUTOM SOCKETS FOR CICS TCP IP A TRAVES DE PLT 1 Arranque AUTOMATICO PLTPI Para arrancar automaticamente hacer la siguiente entrada en la PLTPI despu s de la DFHDELIM DFHPLT TYPE ENTRY PROGRAM EZACIC20 DFHPLT TYPE ENTRY PROGRAM ZTBPOTCI 2 Caida AUTOMATICA PLTSD Hacer la siguiente entrada antes de la DFHDELIM DFHPLT TYPE ENTRY PROGRAM ZTBPOTCF DFHPLT TYPE ENTRY PROGRAM EZACIC20 En la PLT de inicio se arrancar n los sockets for CICS y una vez hecho sto se llamar al programa ZTBPOTCI que arrancar una transid ZTBZ Dicha transid a partir del EZACONFG arrancar todos los LISTENER que existan todos los asociados al monitor de teleproceso donde se ejecute la ZTBZ y que contengan el par metro SECEXIT EDITRAN de modo que no se requiere actuaci n manual para activar los mismos Es obligado llamar a la ZTBZ con dicho nombre y no se ha incluido en perfiles EDITRAN P puesto que si en la plt de inicio se realizan accesos a ficheros para sacar el nombre de la transid a arrancar es muy probable que surjan errores de acceso y lectura a ficheros
44. P SHR 38 XX DD DSN CAI CATSS5 L9808 TSSRPL DISP SHR 41 XX DD DSN BMMQ UTIL LOAD DISP SHR 42 XX DD DSN BMMQ UTIL COPYMAP DISP SHR 43 XX DD DSN TCPIP DESA SEZATCP DISP SHR 44 XX DD DSN EDITRAN V40 OBJETOS DISP SHR 45 XXIEFRDER DD DUMMY 46 XXDFHSNAP DD SYSOUT X OUTLIM 0 47 XXDFHTEMP DD DSN BMCI DAT4 DFHTEMP DISP SHR 48 XXDFHINTRA DD DSN BMCI DAT4 DFHINTRA DISP SHR 49 XXDFHAUXT DD DSN BMCI DAT4 DFHAUXT DISP SHR 50 XXDFHBUXT DD DSN BMCI DAT4 DFHBUXT DISP SHR 51 XXDFHJO1A DD DSN BMCI DAT4 DFHJO1A DISP SHR 52 XXDFHJO2A DD DSN BMCI DAT4 DFHJ02A DISP SHR 53 XXDFHJO1B DD DSN BMCI DAT4 DFHJ01B DISP SHR 54 XXDFHJO2B DD DSN BMCI DAT4 DFHJ02B DISP SHR 55 XXDFHJO1X DD DSN BMCI DAT4 DFHJ01X DISP SHR 56 XXDFHRSD DD DSN BMCI DAT4 DFHRSD DISP SHR 57 XXDFHLCD DD DSN BMCI DAT4 DFHLCD DISP SHR 58 XXDFHGCD DD DSN BMCI DAT4 DFHGCD DISP SHR 59 XXDFHDMPA DD DSN BMCI DAT4 DFHDMPA DISP SHR 60 XXDFHDMPB DD DSN BMCI DAT4 DFHDMPB DISP SHR 61 XXDFHCSD DD DSN BMCI DATR DFHCSD CICS41 DISP SHR 62 XXBATCHRDR DD SYSOUT X INTRDR 63 XXDFHJOUT DD SYSOUT X INTRDR 64 XXMOMMSG DD SYSOUT X XX XX DESTINO PARA EDITRAN XX 65 XXEDIIINTR DD SYSOUT A INTRDR 66 XXZTB1INTR DD SYSOUT A INTRDR XX FICHE INDRA Todos los derechos reservados ROS PARA EDITRAN EDITRAN IP 5 1 P g 2 6 EDITRAN IP 5 1 CICS Manual de usuario 2 05390 V2R4 PROCEDIMIENTOS Y FICHEROS XX 67 XXBATCI DD DS
45. R RRR RRR kk KKK KK RK KR A k k k k k k k k k k k k k k k kk k k k Ge 77 FICHEROS DE REARRANQUE J BRR KR KKK KR k k k k KK RR k k k k k k k k k k k k k k k k k k k k k k k k k k KG GG 26 DFHRSD DD DSN CICS410 DFHRSD SITD DISP SHR 27 DFHGCD DD DSN CICS410 DFHGCD SITD DISP SHR 28 DFHLCD DD DSN CICS410 DFHLCD SITD DISP SHR 29 DFHJO1A DSN CICS410 JOURNAL1 SITD DISP SHR p oU hls FICHEROS DE DUMP J BRR RRR RRR RRR RK RR k k k k k k k k RR k k k k k k k k k k k k k k k k 30 DFHDMPA DD DSN CICS410 DFHDMPA SITD DISP SHR 31 DFHDMPB DD DSN CICS410 DFHDMPB SITD DISP SHR J 5E K K K RR k k KK KK HK kk k k k A k k k k k k k k k k k k k k k k k k k k k k k k k k KK 32 COUT DD SYSOUT DCB RECFM V LRECL 132 BLKSIZE 136 33 SALIDA DD SYSOUT DCB RECFM V LRECL 128 BLKSIZE 136 34 CSDLOG DD SYSOUT DCB RECFM V LRECL 120 BLKSIZE 128 35 CEEMSG DD SYSOUT DCB RECFM V LRECL 161 BLKSIZE 165 36 CEEOUT DD SYSOUT DCB RECFM V LRECL 133 BLKSIZE 137 J RRR RRR KKK RARA KK KKK KC KC KC KC KOC KR KC CK k k k KG GG k k FICHEROS DEL 1 5 37 DMPTABLA DD DSN CICS410 DMPTABLA SITD DISP SHR 38 DFHINTRA DD DSN CICS410 DFHINTRA SITD DISP SHR 39 DFHTEMP DD DSN CICS410 DFHTEMP SITD DISP SHR 40 DFHCSD DD DSN CICS410 DFHCSD SITD DISP SHR J BRR RR RRR KKK KR KR AR RR k k k k RR k k k k k k k k k k KG k k k KG INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 3 9
46. S H lt Qu 1 A 1 1 1 1 I 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 I 1 1 1 1 1 1 V I V l lt H j El El E Q lt H Pa El 4 2 t 1 1 1 1 1 I 1 1 lt SU X 1 1 1 1 I 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 I 1 1 1 1 1 1 1 1 1 1 1 I 1 1 1 1 1 1 1 1 1 1 1 V M El a 2 E lt x E El x 4 A 1 1 1 1 1 1 1 1 1 1 1 1 I 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 M 1 1 V Ay X Ht d gt lt Nada MAHA lt I WRITE TS ZTBEXXXX WRITE ENVIO RAFAGA SBP WRITE TS ZTBEXXXX WRITE SBR WRITE TS ZTBRXXXX gt SFP SBP WRITE TS lt 2 WRITE lt lt SBR IND LIB SOL LIB CLOSE 2 CLOSE RETURN CLOSE RETURN P g 9 1 EDITRAN IP 5 1 INDRA Todos los derechos reservados EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de campos y formatos USUARIO 9 2 CONSULTA DE LA TRAZA Se ha implementado un protocolo de mensajes de red que es faclimente interpretable por su similitud a X25 con solicitud de llamada XOB aceptaci n XOF y liberaci n X13 El cvc es el n mero de t
47. T DISP MOD PASS UNIT SYSDA SPACE 400 500 50 DCB RECFM FB BLKSIZE 400 LRECL 80 SYSTERM DD SYSOUT SYSPRINT DD SYSOUT SYSIN DD EZACICD TYPE INITIAL Initialize generation environment X PRGNAME EZACICDF Name of the generated program x FILNAME EZACONFG DD name of the configuration file EZACICD TYPE CICS Generate configuration record X APPLID BMCIDATR APPLID of CICS X TCPADDR TCPIPROC Address space name for TCP IP x NTASKS 25 Number of reusable MVS subtasks x DPRTY 00 Priority difference CICS Subtask x CACHMIN 10 Minimum refresh time for CACHE x INDRA Todos los derechos reservados EDITRAN IP 5 1 Pag 4 1 EDITRAN IP 5 1 CICS Manual de usuario 4 FICHERO DE CONFIGURACION CICS Y LISTENER CACHMAX 20 Maximum refresh time for CACHE x CACHRES 5 Maximum number of active resolvers x ERRORTD TCPI Name of TD queue for error messages EZACICD TYPE LISTENER Create Listener Record X APPLID BMCIDATR APPLID of CICS X TRANID ZTBA Use standard transaction ID X PORT 7777 Use port number 7777 x BACKLOG 20 Set backlog value to 20 X TIMEOUT 30 Set timeout value to 30 seconds X GTIMEOT 10 Set givesocket timetout to 10 seconds X TRANTRN NO Translate TRNID Yes No x ACCTIME 60 Timeout Value for ACCEPT x NUMSOCK 100 Support 99 concurrent connections X MINMSGL 4 Minimum input message is 4 bytes EZACICD TYPE FINAL THIS STEP LINKS THE INITIALIZATION PROGRAM LIN EXEC PGM
48. TO DEFINICIONES ACLARACIONES 2 La transid ZTBR de 5001 se engancha correctamente al puerto 7778 de la direcci n 111 111 111 111 y 111 111 111 112 3 La transid ZTBS de CICS001 se engancha correctamente al puerto 7779 de la direcci n 111 111 111 111y 111 111 111 112 4 La transid ZTBY de 5001 NO se engancha correctamente al puerto 7779 de las direcciones anteriores puesto que ya lo tiene la ZTBS de 5001 Da un errno 48 otro proceso ya lo tiene cogido 5 La transid ZTBQ de 5002 se engancha correctamente al puerto 7777 de la direcci n 222 222 222 222 6 La transid ZTBR de 5002 se engancha correctamente al puerto 7778 de la direcci n 222 222 222 222 el 5001 est enganchado a trav s de SU ZTBR al mismo puerto de las direcciones 111 111 111 111y 111 111 111 112 7 La transid ZTBT de CICS002 se engancha correctamente al puerto 7779 de la direcci n 222 222 222 222 el 5001 est enganchado a trav s de SU ZTBS al mismo puerto de de las direcciones 111 111 111 111y 111 111 111 112 8 Los listener de ambos CICS aunque a nivel de EZACONFG tienen un TCPADDR que no coincide con el TCPNAME del entorno de EDITRAN van a funcionar correctamente a pesar de que EDITRAN utiliza en la macro INITAPI el par metro TCPNAME de ENTORNO Sin embargo la interfaz TCPIP hace caso omiso del mismo de momento Esto no ocurre en monitor de teleproceso IMS en cuyo caso la interfaz sigue fielmente lo indicado en EDI
49. TRAN En dicho monitor no existe fichero EZACONFG con lo que la relacci n se produce entre el TCPIPJOBNAME y el par metro de entorno EDITRAN En ste punto tendremos 1 5001 Tiene 2 listener EDITRAN que escuchan las llamadas entrantes que le llegan por las direcciones 111 111 111 111y 111 111 111 112 Dichos listener son 1 1 ZTBR S lo atiende a las llamadas entrantes por dichas direcciones y puerto 7778 1 2 ZTBS S lo atiende a las llamadas entrantes por dichas direcciones y puerto 7779 2 5002 Tiene 3 listener EDITRAN que escuchan las llamadas entrantes que le llegan por la direcci n 222 222 222 222 Dichos listener son 2 1 ZTBQ S lo atiende a las llamadas entrantes por dicha direcci n y puerto 7777 2 2 ZTBR S lo atiende a las llamadas entrantes por dicha direcci n y puerto 7778 2 3 ZTBT S lo atiende a las llamadas entrantes por dicha direcci n y puerto 7779 Dichos listener permanecer n arrancados hasta la caida de CICS hasta la caida de los Sockets for cics Al entrar cualquier llamada por una direcci n y puerto de los descritos las transid asociadas a los mismos aceptar n la llamada y ceder n control a la ZTBB TRANSACCION SERVER CHILD para que sea sta la que est en contacto con el nucleo de EDITRAN y con los extremos remotos de modo que las transid listener quedan unicamente a la espera de nuevas indicaciones de conexi n As por ejemplo si entran 6 llamadas en el 5001 2 de ell
50. TRAN local que rompe protocolo Siempre se produce cuando la llamada es entrante y se han pasado datos de usuario al n cleo el cual no contesta con un mensaje distinto de llamada aceptada 6 liberaci n error interno X O6 Error de lectura de datos de red en cualquier estado Viene acompa ado de un mensaje de error READ 07 Se intentan enviar datos a red y el proceso SELECT de intentar ver el buffer de env o falla Esta liberaci n viene acompa ada de un mensaje x20 previo que indica el error producido X 08 Se intentan enviar datos a red y el proceso WRITE de intentar ver el buffer de env o falla Esta liberaci n viene acompa ada de un mensaje x20 previo que indica el error producido X 09 Se intentan enviar datos a red tr fico de datos pero desde que se ha intentado por vez primera hasta el momento de la liberaci n ha estado el buffer ocupado El tiempo m ximo ha sido especificado en entorno local par metro TIME OUT USER DATA MAX MSS Se estan recibiendo mensajes de control de red como cliente respuesta user data como server child user data original Esta liberaci n viene acompa ada de un mensaje x20 previo que indica el error producido Los errores pueden ser 17 05 La longitud de user data recibida excede de 35 octetos tcp Error interno INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 9 11 EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de camp
51. TRANSMISION TIPOS CONEXION ADMITIDOS I BUFFER TX ENVIO 000000 BUFFER TCP ENVIO 000000 BUFFER TX RECEP 000000 BUFFER TCP RECEP 000000 INDRA Todos los derechos reservados EDITRAN IP 5 1 Pag 10 15 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACIONES 10 2 DESCRIPCION DE PARAMETRIZACIONES NECESARIAS 1 El procedimiento de arranque tcp arranca una pila TCP y tiene 2 ficheros 1 1 Fichero PROFILE En el mismo se asignan 1 1 1 Puertos PORT No es obligatorio hacerlo En caso de que se codifique estaremos asignando permanentemente dicho puerto a un CICS para todas las direcciones IP de la pila sto es todas las llamadas entrantes que lleguen por dicha pila y por dicho puerto se pasar n al CICS que se codifique en dicha macro En CICS tendr que existir un registro en el fichero EZACONFG que contenga una transid EDITRAN ZTBA asignada a dicho puerto Si no se codifica existir en CICS el registro descrito pero no podr estar asignado a un puerto que reservemos para otra cosa sto es si por ejemplo reservamos el puerto 23 para TELNET en CICS no se podr asignar dicho puerto a la transid ZTBA Si queremos enganchar 2 monitores de teleproceso a la misma pila y codificamos la macro PORT no podremos recibir llamadas por dicho puerto por el monitor que no haya sido asignado a la macro 1 1 2 Par metro KEEPALIVE Es conveniente ponerlo bajo 2 3 minutos para que infor
52. V2R5 6 3 1 FICHERO PROFILE 05390 V2R5 6 3 2 FICHERO TCPDATA 05390 V2R5 6 3 7 ARRANQUE DEL CICS 0S390 V2R5 6 3 9 FICHERO DE CONFIGURACION CICS Y LISTENER 4 1 DEFINICION FICHERO EZACONFG PARAMETRO CICS 4 3 DEFINICION FICHERO EZACONFG PARAMETRO LISTENER 4 4 DEFINICION DE TRANSIENT DATA 5 1 ARRANQUE CAIDA AUTOM SOCKETS FOR CICS TCP IP A TRAVES DE PLT 6 1 ARRANQUE CAIDA MANUAL DEL LISTENER CICS TCP IP 7 2 CICS DEFINICION DE RECURSOS PARA TCP P 8 2 DEFINICION DE TRANSACCIONES EDITRAN
53. a a la red y se est a la espera de respuesta En el caso del server child ha llegado conexi n y se est a la espera de que lleguen user data INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 9 9 EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de campos y formatos USUARIO Llega un mensaje distinto de ind lla ind acept ind lib s lo con protocolo TX PR Error interno Error en ZTBB actuando como cliente 6 server child En el caso del cliente se han enviado user data a la red y se est a la espera de respuesta En el caso del server child ha llegado conexi n y se est a la espera de que lleguen user data Llega mensaje XOB que no lleva apuntado byte de proxy xff Error en ZTBB 6 CLIENTE Error desconocido Error en ZTBB 6 server child Error desconocido Abend en ZTBB X 15 INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 9 10 EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de campos y formatos USUARIO 9 4 MENSAJES DE LIBERACION TIPO X13 Son arrancados desde TCP TX PR con destino al nucleo EDITRAN 6 al rev s En el caso de liberaciones TX se intenta respetar la causa diagn stico de red es decir debe consultar las causas y diagn sticos de error x25 En PR se recogen en alg n caso indicando el errno y retcode del proxy En el caso de liberaciones TCP si son como consecuencia de finalizaci n normal de transmisi n se pone cau
54. a conexi n As por ejemplo si tenemos 4 conexiones tendremos 1 4 x tareas en ejecuci n simultanea Si los par metros no son adecuados se ralentiza el CICS INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 10 22 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACIONES 10 4 CONSIDERACIONES SOBRE EL ESPACIO DE BUFFER Es posible controlar el tama o de los buffer de env o y recepci n para ver las definiciones consulte el manual ED51USUC cap tulo 1 3 1 1 3 2 En cuanto a la velocidad de proceso la entidad debe ser la que limite haga una adecuaci n correcta de las parametrizaciones Todo ello tiene relaci n con la r faga de env o de cada sesi n de transmisi n nro de registros enviados entre cada confirmaci n la velocidad de la l na local la velocidad de la l nea remota el nro de procesos simult neos el tamafio de la MTU la longitud de transmisi n etc As por ejemplo si nos conectamos contra un remoto al que le vamos a emitir r fagas de 100 mensajes de 4050 implica que grabaremos unos 400 K en los buffer de emisi n Si a esa sesi n la definimos con buffer de env o tcp O coger el valor que haya en la pila Si no hay nada coger el defecto 16 K y probablemente se ralentizar la transmisi n Si por el contrario hubi ramos codificado 200000 bytes 200 K en el buffer de env o de la sesi n mientras grabamos en el buffer este va sacando y dejando
55. area CICS y la lu es el puerto local remoto dependiendo de si es llamada entrante saliente Se incluye un mensaje x20 para visualizar errores consulte el log con causa diagn stico La documentaci n sobre ERRNO RETCODE y mensajes de error en la TCPCICS proporcionados por las macros utilizadas para SOCKET EXTENDIDOS se encuentra disponible en el ap ndice C del manual IBM TCP IP for MVS CICS TCP IP Socket Interface Guide and Reference Document Number SC31 7131 03 Program number 5655 HAL File Number S370 4300 30xx 50 Ver tambi n Document Number SC31 8518 00 Si no aparece el errno correspondiente puede que el error se trate de 05390 V2R5 OPEN EDITION de modo que venga en F1AF9000 IP Planning and Migration Guide 14 03 2000 GESTION DE EDITRAN EDITRAN 14 00 52 CONSULTA DE LA TRAZA VERSION 5 1 SESION FECHA 14 03 2000 S SESION HORA 5 MSJE NSM LU T COMENTARIO CICSO1 CICSO2 TCP PRUTCP 40026 S TCP 07777 OB 0002 CICSO2 CICSO1 TCP PRUTCP 140027 E TCP 01067 OB OEFO 502 501 TCP PRUTCP 40027 S TCP 01067 OF OEFO 502 501 TCP PRUTCP 140027 E TCP 01055 0F85 502 501 TCP PRUTCP 40027 S 01055 OF 0F85 CICSO1 CICSO2 TCP PRUTCP 40027 E 07777 OF OEEE 0002 CICSO1 CICSO2 TCP PRUTCP 40027 S SAP PET NOTIFICACION 00 CICSO1 CICSO2 TCP PRUTCP 40027 S STN T O DE NOTIFICACION 502 501 TCP PRUTCP 40029 E SAP IND NOTIFICACION 00 502 501 TCP PRUTCP 40029 S SAR
56. arrancado el listener hijo ZTBB y ste no ha contestado al anterior con dicha macro en el tiempo INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 10 21 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACIONES especificado en EZACONFG par metro GIVTIME Si es as revise parametrizaciones de CICS prioridades de transid par metro EAS en la definici n del CICS a VTAM y relacci n entre par metro TCLASS de la PCT y CMXT de la SIT en la SIT est el par metro MXT para indicar el n mero de transid CICS puesto que puede ocurrir que no ha dado tiempo a arrancar la tarea y sto puede producirse tanto por stress de CICS como por parametrizaciones que limitan el n mero de tareas en ejecuci n 7 El par metro EAS en la definici n del CICS a VTAM es el n mero de tareas de comunicaci n en ejecuci n En la PCT se puede apuntar la tarea a una clase de 01 a 10 con el par metro TCLASS y en la SIT con el par metro CMXT se dice el n mero de transid en ejecuci n de cada una de las clases y el CMXT para indicar el n mero total Para TCP hay al menos en ejecuci n permanente un listener hasta caida de CICS SOCKETS for CICS n ZTBB 1 por cada conexi n establecida que mueren cuando acaba la transmisi n y n ZTBO nucleos EDITRAN que se arrancan y mueren por cada r faga de mensaje par metro NUM REG SINCRONISMO de los perfiles de la sesi n EDITRAN que se env a recibe sobre cad
57. as por la direcci n 111 111 111 111 puerto 7778 otras 2 por la direcci n 111 111 111 112 puerto 7778 y otras 2 por la direcci n 111 111 111 111 puerto 77789 se ver n en ejecuci n al menos 8 tareas ZTBR ZTBS y 6 ZTBB Las ZTBB finalizan cuando se libera la conexi n entre ambos extremos A su vez la transid ZTBB es tambi n la transid CLIENTE de EDITRAN de modo que si en ste punto se hubieran realizado 10 llamadas salientes desde CICS se ver an en ejecuci n 18 tareas las anteriores m s otras 10 ZTBB En el proceso cliente tambi n se va a utilizar el TCPNAME de entorno EDITRAN para la macro INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 10 20 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACIONES INITAPI pero como se ha explicado anteriormente hace caso omiso de dicho valor y se engancha a lo que Se haya codificado en el TCPADDR del registro CICS del EZACONFG 2 3 1 1 Otras accciones que podr an ocurrir son Si en EDITRAN de 5001 se define a un remoto con un DNS y no con un ip address y se intenta generar una solicitud de llamada desde CICS sta se resuelve correctamente porque aunque dicho CICS est asociado a la PILAOO1 que no tiene NSINTERADDR en el TCPDATAOO en el arranque de dicho CICS se le referenci que acudiese al TCPDATAOO2 para ste tipo de situaciones Si en dicho arranque se le hubiera seleccionado el TCPDATAOO no
58. at initialization time Remove from the list any tables that are not required If LOADDBCSTABLES is not specified no DBCS tables will be loaded LOADDBCSTABLES JIS78KJ JIS83KJ SJISKANJI EUCKANJI HANGEUL KSC5601 LOADDBCSTABLES TCHINESE BIG5 SCHINESE k k k k k k k k k k k k k k k k k k k ke k k k k k k k ke k K ke ke K K ke ke kc ke K K K K ke ke KO KOR ke KOR K ke e k ke ke e ke ke KK x x End of file KKK KKK KX KK KX KX KKK KKK KKK KKK KKK Sk Sk kx kx kx Bottom of Data KKK KKK KK KKK KKK KK KKK KKK KKK Sk Sk Sk kx kx kx NOTA En 0S390 2 6 afiade s lo un par metro con respecto a 2 5 TRACE SOCKET INDRA Todos los derechos reservados EDITRAN IP 5 1 Pag 3 8 EDITRAN IP 5 1 CICS Manual de usuario 3 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS 3 4 ARRANQUE DEL CICS 0S390 V2R5 6 kk k k k ck ck ck ck ck k ck ck k ck ck k k k k kk k k k k k k k k k K TOP OF DATA XKKKKKKKKKKKKKKKKKKKKKKKKKKKKK KK 1 CICSSITD JOB MSGL MSGC J RRR k k k k k k k k k k k k k k k k k k k k K KK KK 7 L A fip 2 CICSD PARM SIT SP START COLD STEPLIB LASS H Cy Car Dar culi E SNCE COBO EDIREAL COBO EDITRAN COBO S 5E EKK K kk k k k k k k k k k k k k k k k KK KK EXEC PGM DFHSIP TIME 1439 REGION 32M 3 STEPLIB 4 XX DSN C D KKK KK KKK RK KK KKK KKK PRUEBAS DEL SITO L II AMODE 31
59. bos puertos En el router que tiene acceso al host habr a que codificar la VIPA con una direcci n est tica El fichero EZACONFG PUEDE ser Unico y ser actualizado transid EZAC desde un UNICO CICS puesto que en la clave se incluye el NOMBRE del monitor de teleproceso En ste caso requiere ser visto con el mismo DSN por el otro CICS Sin embargo no se pueden arrancar parar los sockets for cics los LISTENER de otro CICS que no sea el propio esto es podremos definir en EZACONFG de 5001 al CICS002 clave CICS y a los LISTENER de 5002 en ste ultimo CICS estar a definido el mismo EZACONFG que en CICSOO1 pero no podr amos activar desde 5001 los sockets for CICS ni los LISTENER de 5002 Estos son activados desde CICSOO la transid EZAO Si queremos asignar otra PILA sin parar el CICS parar amos los LISTENER con EZAO STOP CICS los listener dan un errno 10300 en el log de EDITRAN de modo que con ste comando se paran tambi n los sockets for cics A continuaci n modificamos el registro del CICS correspondiente con EZAC ALTER CICS poniendo en el par metro TCPADDR el nombre del address space del TCP en la nueva pila Tras sto activar amos los sockets for cics EZAO START CICS y por ULTIMO activar amos los listener EZAO START LISTENER 6 ejecutando la ZTBZ Si se produce un errno 121 en MACRO takesocket puede significar que ha entrado una llamada y que el listener principal ZTBA u otros ha
60. buffer size 65535 65535 Udp receive buffer size 65535 65535 PARAMETRO OS390 V2R6 MINIMUN MAXIMUN DEFAULT Tcp send buffer size 256 256K 16384 16K Tcp receive buffer size 256 tcp max receive buffer size 16384 16K Tcp max receive buffer size tcp receive buffer size 512 256K Udp send buffer size 65507 65507 Udp receive buffer size 65507 65507 A partir de EDITRAN 5 1 es posible configurar los buffer de env o y recepci n en los panelee del producto INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 3 6 EDITRAN IP 5 1 CICS Manual de usuario 3 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS 3 3 FICHERO TCPDATA 05390 V2R5 6 BROWSE SW TCPIP SEZAPARM TCPDATAB 01 12 Line 00000000 Col 001 080 Command gt Scroll gt CSR KKKKKKKKKKKKKKKKKKKKKKKKKA AAA AAA Top of Data KKKKKKKKKKKKKKKAKKKKKKKKK AAA kx kx kx kx x A a Name of Data Set TCPIP DATA COPYRIGHT NONE This TCPIP DATA is used to specify configuration A information required by TCP IP client programs i z E Syntax Rules for the TCPIP DATA configuration data set All characters to the right of and including will be treated as a comment b Blanks and end of line are used to delimit tokens c The format for each configuration statement is lt SystemName gt keyword value where lt SystemName gt is optional label that be A y Specifie
61. d before a keyword if present then the keyword value pair will only be recognized if the SystemName matches the node name of the system as defined in the IEFSSNxx PARMLIB member This optional label permits configuration N information for multiple systems to specified in a single gt TCPIP DATA data set P NOTE You should define the SystemName in the IEFSSNxx 2 PARMLIB member to be the same as your JES2 or JES3 2 node name This is required for correct delivery of 2 SMTP mail k k k k k k k k k k k k ck ck ck k k KK k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k K 7 TCPIPJOBNAME specifies the name of the started procedure that was used to start the TCPIP address space TCPIP is the default TCPIPUSERID TCPIPB TCPIPJOBNAME TCPIPB HOSTNAME specifies the TCP host name of this system If not Specified the default HOSTNAME will be the node name specified in the IEFSSNxx PARMLIB member For example if this TCPIP DATA data set is shared between 2 Systems OURMVSNAME and YOURMVSNAME then the following 2 lines will define the HOSTNAME correctly on each system OURMVSNAME HOSTNAME OURTCPNAME YOURMVSNAME HOSTNAME YOURTCPNAME HOSTNAME OS390B DOMAINORIGIN specifies the domain origin that will be appended to host names passed to the resolver If a host name contains any dots then the DOMAINORIGIN will
62. data set is to be 000063 used to obtain the parameters defined by TCPIP DATA 000064 The SYSTCPD DD statement should be placed in the TSO logon 000065 procedure or in the JCL of any client or server executed 000066 as a background task The data set can be any sequential 000067 data set or a member of a partitioned data set PDS 000068 000069 For more information please see Understanding TCP IP Data 000070 Set Names in the Configuration Guide 000071 000072 SYSTCPD DD DSN SW TCPIP SEZAPARM TCPDATAB DISP SHR KR KKK KR KARA RK KK KKK kk k k kk k k kk k Bottom of Data N X X X XkXkk kk kk kk kk KK KKK KKK INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 3 1 EDITRAN IP 5 1 CICS Manual de usuario 3 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS 3 2 FICHERO PROFILE 05390 V2R5 6 BROWSE SW TCPIP SEZAPARM CPUBPROF 01 12 Line 00000000 Col 001 080 Command gt Scroll gt CSR ck ck K k k k k k KKK KK amp k k k k k k k ko k k ko ko k kock ok Top of Data ck k k k k k k k k k k k kk ck Sk ck k k k k k k k k k ko ko ko TCPIP PROFILE TCPIP COPYRIGHT NONE This is a sample configuration file for the TCPIP address space NOTES R The device configuration statements MUST be changed to match your hardware and software configuration 13 The section must be changed to match your VTAM configuration For more information about this fi
63. debe contener TRTCP1 PROC IEFPROC EXEC PGM ITTTRCWR TRCOUTO1 DD DSN CUALIF1 CUALIFn TRACETC1 DISP OLD El trace quedar sin formatear en el DSN representado por TRCOUTO1 3 Conectar el external writer con la pila TCP IP TRACE CT ON COMP SYSTCPDA SUB proc_arranque_TCPIP Reply R nnn WTR TRTCP1 END 4 Reproducir el problema 5 Desconectar el external writer TRACE CT OFF COMP SYSTCPDA SUB 7 proc arranque TCPIP Reply R nnn WTR 2DISCONNECT END No suele pedir esta reply 6 Parar el external writer TRACE CT WTRSTOP TRTCP1 7 Parar el trace TCP IP V TCPIP proc_arranque_TCPIP CMD 0 DSN data_set_name data_set name Fichero o miembro de librer a que debe contener las siguientes instrucciones INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 10 24 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACIONES PKT TRACE OFF 8 Procesar los datos del trace existentes en el data set anterior y obtenerlos en otro data set esto es Crear el DATA SET y asociarlo a la DDNAME IPCSPRNT esto es desde la opci n P 6 de ISPF ejecutar los siguientes comandos tal cual est n 8 1 FREE FI IPCSPRNT 8 2 ALLOCATE DDNAME IPCSPRNT DATASET CUALIF1 CUALIFn PRINT NEW KEEP SPACE 10 5 TRACKS DSORG PS RECFM V B A LRECL 125 BLKSIZE 1254 El nombre del DATA SET puede ser cualquiera lo importante es que quede asociado a la DDNAME IPCSPRINT Desde TSO acceder a IPCS
64. el TCP IP MVS address space El valor por defecto es TCPIP Este par metro se introduce en el menu del entorno local de EDITRAN P par metro TCPNAME i TCPIPIOBNAME par metro TCPIPJOBNAME es el nombre del procedimiento de arranque usado para arrancar el TCP IP MVS address space ck k k k k k k k k k k k k k k k k k k k k k k k k k X X X Top of Data KKK TCPIP DATA DATASETPREFIX TCPIP DESA HOSTNAME HOST03 MESSAGECASE MIXED NSINTERADDR 10 0 0 7 NSPORTADDR 53 RESOLVEVIA UDP RESOLVERTIMEOUT 10 RESOLVERUDPRETRIES 2 TCPIPJOBNAME TCPIPROC KKK kckckck kckck kckck k kck ck k kk k k kk k k k Bottom of Data INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 2 5 EDITRAN IP 5 1 CICS Manual de usuario 2 4 ARRANQUE DEL CICS 0S390 V2R4 2 05390 V2R4 PROCEDIMIENTOS Y FICHEROS 1 BMCIDATR JOB MSGLEVEL 1 2 STARTING EXEC BMCIDATR 3 XXBMCIDATR PROC XX Landi Cani sal Cni rd la id Tani eh rh O tpi Cni dini ani ui uri Qon Gris A ik pii anii pii is ri an Gi un taii ni aii ri i lori ri ond Sh ad init a i Coni i i rl Tri n RECOVER DE THREADS DB2 INDOUBT XX Vati Gat tuni salgan nf ari nt Gur a Qum e Jani es am Ju OR Dani lt Qn Gap Gang CEN ae a a D rd sa Gan Qe die taii ee dan niet an Due
65. en PROXY llevan clave ETT indicando causa x OF diagn stico x 05 000099940000099980AE9994 170338 E TCP 08888 20 3497 OF 05 Seleccion ndolos en algunos casos se puede encontrar informaci n sobre errno retcode TCP IP por ejemplo INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 9 5 EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de campos y formatos USUARIO sasa L 2 2 2222 222223222242 ni Oaks vhs oO ei lui E3C3D74020000222B8349700000F05000000000000000000003DFFFFFFFF00000000000000 00000000000000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000000000000000000000040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 40404040404040404040404040404040404040404040404040404040404040404040404040 00B24040400000404040F1F7F0F3F3F8404040404040 En el caso anterior se muestra el errno x 0000003D 61 y retcode 1 El significado es causa x 05
66. espondencia del DNS pedido devolver n por tanto la direcci n IP a la que se deber hacer el connect 1 2 2 El puerto de los mismos par metro NSPORTADDR 1 2 3 El nombre del address space del tcp en la pila TCPIPJOBNAME Dicho nombre debe coincidir con el miembro BPXPRMXX XX es el sufijo de la SYS1 PARMLIB y con el par metro TCPNAME de la segunda pantalla de entorno de EDITRAN P 2 Arranque de CICS Se definen los siguientes elementos 2 1 Librer as TCP que solucionen llamadas a sockets y que contengan programas IBM INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 10 16 EDITRAN IP 5 1 CICS Manual de usuario 10 RESUMEN FUNCIONAMIENTO DEFINICIONES ACLARACIONES 2 2 DCSNAME de la tabla de destinos extraparticion Se incluir por tanto una DCT con dicho nombre Sirve para generar mensajes de salida TCP 2 3 Una SYSTCPD que apunta a un FICHERO TCPDATA en principio deber a ser el mismo al que apunta el procedimiento de la pila TCP Sirve para apuntar a las direcciones de los servidores de nombres par metro NSINTERADDR Dicho TCPDATA no tiene porqu ser el de la pila a la que est asociado el CICS Las llamadas a sta SYSTCPD sirven s lo para procesos cliente EDITRAN por tanto resolver los DNS de las sesiones en funci n de los servidores que contenga el TCPDATA de la SYSTCPD y no en funci n del TCPDATA del procedimiento de arranque TCP aunque se insiste en que podr a ser el mismo 3 Tabla DCT Se def
67. ine el DCSNAME descrito en el arranque de CICS y el destino para sacar por el mismo los mensajes de la interfaz de sockets Dicho destino deber codificarse tambi n en el registro CICS del fichero EZACONFG en concreto en el par metro ERRORTD 4 PLT Se divide en 2 partes 4 1 PLT de inicio Se llama a programas que activan desactivan los sockets y los listener En concreto los primeros los activa el programa IBM EZACIC20 y los segundos el programa EDITRAN ZTBPOTCI que arranca la transid ZTBZ ZTBPOTCZ Esta a partir de la lectura del EZACONFG arrancar todos los registros listener que se encuentre con el par metro SECEXIT EDITRAN Las transid de arranque son el par metro TRANID de dicho registro Si tenemos varios listener cada uno escuchando por un puerto distinto se definir n todas las tranid en la PCT y todas ellas se asociar n al programa ZTBPOTCC Estas transacciones listener arrancadas permanecer n activas escuchando indicaciones de conexi n cada una por su puerto hasta que se tire el CICS de nuevo hasta que se paren los sockets for cics Si alg n listener no ha sido activado en ste punto se puede invocar a la transid ZTBZ para que lo active 4 2 PLT de finalizaci n En el momento de la caida de CICS entrar en funcionamiento la PLT de finalizaci n En concreto el programa IBM EZACIC20 que desactiva los sockets for CICS y a continuaci n el programa EDITRAN ZTBPOTCF que se comunicar son los LISTENER EDITRAN
68. istener MINMSGL gt 004 Minimum Message Length ACCTIME gt 060 Timeout Value for ACCEPT GIVTIME gt 010 Timeout Value for GIVESOCKET REATIME gt 000 Timeout Value for READ FASTRD gt YES Read Immediately Yes No TRANTRN gt NO Translate TRNID Yes TRANUSR gt NO Translate User Data Yes No SECEXIT gt EDITRAN Name of Security Exit FASTRD DESAPARECE EN VERSIONES ALTAS DE ZOS Tipos de listener EDITRAN TCP SECEXIT gt EDITRAN EDITRAN Proxy SECEXIT gt EDITR PR EDITRAN TX SECEXIT gt EDITR TX INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 4 4 EDITRAN IP 5 1 CICS Manual de usuario 5 DEFINICION DE TRANSIENT DATA 5 DEFINICION DE TRANSIENT DATA El listener escribe en la TCPI mientras el TCP esta ENABLED El jcl de arranque de CICS debe incluir una DD para ste extrapartition transient data queue Las entradas para la DCT son las siguientes DFHDCT TYPE SDSCI BLKSIZE 136 DSCNAME TCPCICS RECFORM VARUNB RECSIZE 132 TYPEFLE OUTPUT x x lt x lt gt DFHDCT TYPE DEST DSCNAI The destination TCPM parameter of the EZAC D X TCPCICS y be changed If so it must match the name specified in the ERRORTD NE CICS and or the EZACICD TYPE CICS XOU mH El dg gt lt 3 Bia dv 1 DFHDCT TYPE INTRA DESTID TRAA DESTFAC FILE TRIGLEV 1 TRANSID TRAA x gt gt gt lt NOTA EL NOMBRE DESTIN
69. l tipo de l nea a utilizar internet l neas frame relay privadas dentro de una red etc 1 2 Problemas detectados Se han detectado problemas con equipos Packet Shaper de la empresa Packteer Este producto es capaz de reconocer el tr fico priorizarlo por protocolos clasificarlo calificando puertos que puede entender como peligrosos descartando paquetes en determinadas situaciones Los problemas detectados consisten en que incluso a veces se consigue la conexi n y transmisi n en un sentido pero en sentido inverso normalmente cuando la llamada la hace el extremo que en su red tiene dicho equipo la conexi n llega al extremo remoto ste la acepta pero dicha aceptaci n no llega al extremo llamante descartando dicho paquete Para solucionar el problema alguna entidad nos ha comentado que se configur en dicha m quina un exception class una regla puesta antes de clasificar el protocolo en definitiva permitir determinadas direcciones ip INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 1 2 EDITRAN IP 5 1 2 CICS Manual de usuario 2 05390 V2R4 PROCEDIMIENTOS Y FICHEROS 05390 V2R4 PROCEDIMIENTOS Y FICHEROS 2 1 PROCEDIMIENTO DE ARRANQUE DE TCP 05390 V2R4 COMMAND INPUT gt SCROLL gt CSR NP JOBNAME STEPNAME PROCSTEP JOBID OWNER POS DP PGN REAL PAGING 5 TCPIPROC TCPIPROC TCPIP 57 00110 USERTCP NS 9B 0 5621 0 00 0 BMCIDATR BMCIDATR BMCIDATR STC00127 BMCIDAT 5
70. le see Configuring the TCPIP Address Space and Configuring the Telnet Server in the Configuration Guide Flush the ARP tables every 20 minutes ARPAGE 20 You can specify DATASETPREFIX in the PROFILE TCPIP but it no longer has any affect on the TCP IP stack Set Telnet time out to 10 minutes 7 TELNETPARMS PORT 23 INACTIVE 600 TIMEMARK 600 SCANINTERVAL 120 SMFINIT STD SMFTERM STD WLMCLUSTERNAME TN3270E ENDWLMCLUSTERNAME ENDTELNETPARMS AUTOLOG the following servers 7 AUTOLOG 5 2 FTPD JOBNAME FTPD1 FTP Server FTPDB FTP Server de la CPU B 2 LPSERVE LPD Server z NAMESRV Domain Name Server NCPROUT NCPROUTE Server PORTMAP Portmap Server OROUTED RouteD Server gt RXSERVE Remote Execution Server SMTP SMTP Server z OSNMPD SNMP Agent Server 7 SNMPOE SNMP Client 4 25 X25 Server SAMSPROC SAMS VANTAGE server ENDAUTOLOG 7 INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 3 2 EDITRAN IP 5 1 CICS Manual de usuario 3 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS Reserve ports for the following servers NOTES A port that is not reserved in this list can be used by any user 2 If you have TCP IP hosts in your network that reserve ports the range 1 1023 for privileged applications you should H reserve them here to prevent users from using them z The port values below are from RFC 1060 Assigned Numbe
71. me a EDITRAN en caso de caidas de conexi n que no son informadas por TCP EDITRAN por su parte incorporta una funci n SETSOCKOPT en relacci n con ste par metro 1 1 3 Direcciones locales de la pila En el ejemplo se ha introducido una tarjeta OSA Para ello se codifica una macro LINK con el nombre de la misma A continaci n se asocia la OSA en la macro HOME con la direcci n IP local de la misma Por ltimo se incluye una macro GATEWAY para especificar las rutas seguidas para llamadas salientes Si tenemos 2 direcciones IP tendr amos por tanto 2 OSA y 2 macro LINK Las llamadas salientes en ste caso podr amos limitarlas a una Unica Es labor del propio administrador de sistema la definici n de rutas de acceso en funci n de sus necesidades sobre todo en temas de seguridad 1 1 4 Tamafio de buffer de la pila Se especifican en conjunto los tamafios de env o y recepci n Es obligaci n del administrador una correcta distribuci n para el buen funcionamiento de EDITRAN 1 2 Fichero TCPDATA En el mismo se asignan 1 2 1 Las direcciones de los servidores de nombres par metro NSINTERADDR Si se genera desde CICS una petici n de conexi n para una sesi n EDITRAN P cuyas IP adress son DNS stos deben resolverse como direcciones reales IP Para ello se generan llamadas a los distintos servidores de nombres que codifiquemos La direcci n de stos servidores es lo que se codifica aqu Si en los mismos existe la corr
72. mpa ado de dicho mensaje de error XFF Esta liberaci n s lo le llega al que tiene x25 no al de tx es probable que las redes x25 cambien la causa xFF y pongan x00 x80 En EDITRAN TX se produce alg n evento err neo que provoca una liberaci n interna descrita en otros diagn sticos y si se puede se env a al remoto x25 esta liberaci n causa diagn stico x FFf INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 9 12 EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de campos y formatos USUARIO 9 5 CAMPOS EDITRAN P PERFILES Para ver las definiciones consulte el manual D51USUC cap tulo 1 3 1 1 3 2 1 3 3 Vea las pantallas de entorno local sesi n y l neas Entorno CAMPOS TCP IP TCPNAME TCPIPB TIME OUT USER DATA MAX MSS 020 NRO CONEX SIMULT LISTENER 004 USAR SERVER DNS EN LLAM ENT S TO MILISEG ENVIOS 001 999 999 BUFFER ENVIO TX LISTENER nnnnnn BUF ENVIO TCP PX LISTENER nnnnnn BUFFER RECEP TX LISTENER nnnnnn BUF RECEP TCP PX LISTENER nnnnnn PF7 RETROCEDER Sesi n TIPO CONEXION X X25 T PAD P TX X25 S TX PAD I TCP IP Y PROXY 2 LU62 I BUFFER TX ENVIO nnnnnn BUFFER TCP ENVIO nnnnnn BUFFER TX RECEP nnnnnn BUFFER TCP RECEP nnnnnn 5 LINEAS REMOTAS TCP IP PARA IR CON O SIN PROXY SEL GENERICA S N N REFO1 005 REFO2 REFO3 REFO4 REFO5 REFO6 Lineas IP REMOTA PROPIETARIO R TIPO LINEA I
73. nostics from TCPIP XX 7 XXSYSPRINT DD SYSOUT DCB RECFM VB LRECL 137 BLKSIZE 0 XX XX SYSERR contains runtime diagnostics from Pascal XX 8 XXSYSERR DD SYSOUT DCB RECFM VB LRECL 137 BLKSIZE 0 XX XX SYSERROR contains error messages from TCPIP that occurred XX while processing the PROFILE and OBEYFILEs XX 9 XXSYSERROR DD SYSOUT DCB RECFM VB LRECL 137 BLKSIZE 0 XX XX SYSDEBUG receives output that is generated when the TRACE XX parameter is specified in the PROFILE data set XX 10 XXSYSDEBUG DD SYSOUT DCB RECFM VB LRECL 137 BLKSIZE 0 XX SY1DEBUG DD DSN TCPIP TRACE ALT1 DISP SHR XX SY2DEBUG DD DSN TCPIP TRACE ALT2 DISP SHR XX SY3DEBUG DD DSN TCPIP TRACE ALT3 DISP SHR XX XX XX XX TNDBCSCN is the configuration data set for TELNET DBCS transform mode XX TNDBCSCN DD DSN SW TCPIP SEZAPARM TNDBCSCN DISP SHR XX INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 2 1 EDITRAN IP 5 1 CICS Manual de usuario 2 05390 V2R4 PROCEDIMIENTOS Y FICHEROS XX XX XX TNDBCSXL contains binary DBCS translation table codefiles used by TELNET DBCS Transform mode XX TNDBCSXL DD DSN TCPIP SEZAXLD2 DISP SHR XX XX XX XX TNDBCSER receives debug output from TELNET DBCS Transform mode when TRACE TELNET is specified in the PROFILE data se XX TNDBCSER DD SYSOUT XX XX XX XX XX XX XX XX The set containing the configura
74. ntains error messages from TCPIP that occurred 000030 while processing the PROFILE 000031 000032 SYSPRINT DD SYSOUT DCB RECFM FB LRECL 137 BLKSIZE 137 000033 ALGPRINT DD SYSOUT DCB RECFM FB LRECL 137 BLKSIZE 137 000034 SYSOUT DD SYSOUT DCB RECFM FB LRECL 137 BLKSIZE 137 000035 CEEDUMP DD SYSOUT DCB RECFM FB LRECL 137 BLKSIZE 137 000036 SYSERROR DD SYSOUT 000037 000038 TNDBCSCN is the configuration data set for TELNET DBCS 000039 transform mode 000040 000041 TNDBCSCN DD DSN SW TCPIP SEZAPARM TNDBCSCN DISP SHR 000043 TNDBCSXL contains binary DBCS translation table codefiles 000044 used by TELNET DBCS Transform mode 000045 000046 TNDBCSXL DD DSN TCPIP SEZAXLD2 DISP SHR 000048 TNDBCSER receives debug output from TELNET DBCS Transform 000049 mode when TRACE TELNET is specified in the PROFILE data set 000050 000051 TNDBCSER DD SYSOUT 000053 TCPIP reads the parameters from a data set with name 000054 TCPIP nodename TCPIP or with name TCPIP PROFILE TCPIP 000055 See the chapter on Configuring the TCPIP Address Space in 000056 the Configuration Guide for more information A sample of 000057 such a profile is included in member SAMOPROF of the 000058 SEZAINST data set 000059 000060 PROFILE DD DISP SHR DSN SW TCPIP SEZAPARM CPUBPROF 000062 SYSTCPD explicitly identifies which
75. o a remotos mediante dichas llamadas Para arrancar los listener 6 clientes deben estar arrancados los sockets for CICS 1 Para arrancar se invoka a la transid EZAO mediante la secuencia EZAO start nos mostrar el siguiente menu EZAO START Enter one of the following ETES gt Enter Yes gt Enter Yes No Se introduce YES en LISTENER y aparece un nuevo men EZAO START LISTENER APPLID gt BMCIDATR APPLID of CICS LISTENER gt Enter Name of Listener Introduciremos en LISTENER el nombre de la transid que va a actuar como tal en ste caso la proporcionada por IBM y definida en el fichero de configuraci n para que atienda al puerto 7777 ZTBA y pulsaremos INTRO de modo que quedar a partir de se momento ya arrancada apareciendo el siguiente men EZAO START LISTENER ZTBA APPLID gt BMCIDATR APPLID of CICS LISTENER gt ZTBA Enter Name of Listener CICS Sockets Interface Listener ZTBA is Started APPLID BMCIDATR Nota Si el CICS no ha sido arrancado 6 lo tiramos mediante EZAO stop caer n 6 no se permitiran arrancar los LISTENER 2 Para parar solo se puede parar el CICS se invoka a la transid EZAO mediante la secuencia EZAO stop Esta sentencia tambi n puede parar listener EDITRAN Introduciremos los mismos datos que pusimos previamente Tambi n se pueden arrancar todos l
76. o del server child ha llegado conexi n y se est a la espera de que lleguen user data Llega un mensaje gt 36 bytes m ximos datos de usuario permitidos s lo con protocolo TCP IP Error interno X 06 Error en ZTBB actuando como cliente Se han enviado user data a la red y se est a la espera de respuesta Llega un mensaje de respuesta de user data con byte 2 x A4 y desde origen se envi un formato de datos de usuario con longitud s lo con protocolo TCP IP Error interno 07 Error ZTBB actuando como cliente 6 server child En el caso del cliente se han enviado user data a la red y se esta a la espera de respuesta En el caso del server child ha llegado conexi n y se est a la espera de que lleguen user data Llega un mensaje gt longitud indicada al inicio de los datos de usuario Error interno X 08 Error en ZTBB actuando como cliente Se han enviado user data a la red y se est a la espera de respuesta Ha llegado un mensaje que no se corresponde con los datos de usuario originales que se enviaron s lo con protocolo TCP IP Proxy Error interno X 09 Error en ZTBB actuando como cliente Se han enviado user data a la red y se est a la espera de respuesta Ha llegado un mensaje de llamada aceptada con un formato no reconocido o no est en estado 01 s lo con protocolo TX Error interno Error ZTBB actuando como cliente 6 server child En el caso del cliente se han enviado user dat
77. ole This command is for debugging purposes only TRACE RESOLVER You can specify DATASETPREFIX in the PROFILE TCPIP and TCPIP DATA data sets The character string specified as a parameter on DATASETPREFIX takes precedence over both the distributed or modified data set prefix name as changed by the EZAPPRFX installation job If this statement is used in a profile or configuration data set that is allocated to a client or a server then that client or server dynamically allocates additional required data Sets using the value specified for DATASETPREFIX as the data set name prefix The DATASETPREFIX parameter can be up to 26 characters long and the parameter must NOT end with a period For more information please see Understanding TCP IP Data Set Names in the Customization and Administration Guide DATASETPREFIX TCPIP MESSAGECASE MIXED indicates to the FTP server FTP client TELNET client and PING client that all messages should be displayed in mixed case MESSAGECASE UPPER indicates to the FTP server FTP client TELNET client and PING client that all messages should be displayed in uppercase Mixed case inserts in messages will will not be uppercased If MESSAGECASE is not specified mixed case messages will be used MESSAGECASE MIXED MESSAGECASE UPPER LOADDBCSTABLES indicates to the FTP server and FTP client which DBCS translation tables should be loaded
78. os listener invocando a la ZTBZ vea cap tulo PLT de inicio si la llam de otra forma directamente 6 a trav s de la EZAO Tambi n se pueden arrancar los listener poniendo immed yes y en la plt nicamente arrancar los sockets a cics Tambi n se permite en la opci n de rearranque de red del operador de EDITRAN P la activaci n de uno 6 de todos los listener y la parada de un determinado listener 8 CICS DEFINICION DE RECURSOS PARA TCP IP Indra Todos derechos reservados IP51USIC 07 01 2015 Pag 8 2 EDITRAN IP 5 1 CICS Manual de usuario 8 1 8 CICS DEFINICION DE RECURSOS PARA TCP IP DEFINICION DE TRANSACCIONES EDITRAN Las transid ZTBA otros listener y ZTBB deben tener m xima prioridad as como las ya existentes ZTBO n cleo EDITRAN y la ZTBX transacci n de nivel de red x25 EDITRAN para as agilizar la transmisi n Revise las transid ZTBA ZTBB ZTBZ en el miembro PCTCEDA de la lib de jcls 8 2 DEFINICION DE PROGRAMAS EDITRAN Revise el miembro PPTCEDA de la lib de jcls progs ZTBPOT 8 3 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 gt Scroll gt CSR KKKKKK KKK KKK KKK KKK KKK KKK KKK KK KKK ko ko Top of Data KKK KKK KKK KK KKK
79. os y formatos USUARIO 17 06 Se enviaron user data en versi n 4 1 5 x y al recibir respuesta a los mismos se detecta que byte 2 no es x A4 tcp Error interno 17 07 Se reciben m s datos de usuario de los esperados Error interno 17 08 Se enviaron user data tcp y en la respuesta vienen otros distintos a los enviados Error interno 17 09 Se enviaron user data tx pr y en la respuesta vienen otros distintos a los enviados Error interno 17 0A Se reciben datos de usuario tx pr fon formato err neo Error interno Error de SELECT Error de READ X OB Abend Se produce un error el proceso cliente anterior al envio de datos de usuario hasta la macro connect incluida Esta liberaci n viene acompa ada de un mensaje x20 previo que indica el error producido macros iniciales tcp previas al env o recepci n de user data x10 Error por recibir un evento de datos de la red pero estamos en proceso cliente y todav a no hemos enviado datos de usuario Viene acompa ado de un mensaje de error causa 17 diagn stico 03 Si adem s hubo error de lectura de datos de red READ tambi n va a acompa ado de dicho mensaje de error x11 Error por recibir un evento de datos de la red pero estamos en proceso server child y hemos pasado user data a n cleo s lo tcp ip Viene acompa ado de un mensaje de error causa 17 diagn stico 04 Si adem s hubo error de lectura de datos de red READ tambi n va a aco
80. probablemente porque el CICS no dispone a n de ellos Si desea que la transid ZTBZ tenga otro nombre en su entidad pase el jcl ZTBPJTCP sobre el programa ZTBPOTCI indicando el nuevo nombre de dicha transid deber estar previamente definida en CICS A continuaci n defina en los perfiles entorno local dicha transid PLTINI TCP En el jcl a pasar se pone el desplazamiento ZTBZ si falla el jcl consulte con INDRA el mismo la transid origen ZTBZ y la transid destino en el ejemplo siguiente NXZR PRIMERO VER COMPRUEBA QUE COINCIDA SEGUNDO REP CAMBIA JIR ZTBZ gt E9E3C2E9 DESPLAZAMIENTO 01EA TRANSID ZTBZ NXZR gt D5E7E9D9 7 K K K k eee k k k k k K k k Kk K K K K K K K K K K K K K K K K K K K K K K K K K K K K K K K K ke ke K ke ke ke ke ke R CAMBIO DE NOMBRES DE TRANSACCION DE EDITRAN J KKK KR KKK kkk k I RR ROO RR RR k k k RR RR k k k k k k k k k k k k k AAAI k P1 EXEC PGM AMASPZAP SYSLIB DD DSN PUNTERO INDRA LOAD DISP SHR SYSPRINT DD SYSOUT SYSIN DD NAME ZTBPOTCI ZTBPOTCI VER 01 E9E3C2E9 REP 01 D5E7E9D9 INDRA Todos los derechos reservados EDITRAN IP 5 1 Pag 6 1 EDITRAN IP 5 1 CICS Manual de usuario 7 ARRANQUE CAIDA MANUAL DEL LISTENER CICS TCP IP 7 ARRANQUE CAIDA MANUAL DEL LISTENER CICS TCP IP Nota El hecho de no arrancar el LISTENER no impide que se puedan hacer Ilamadas salientes y tr fic
81. puede que el error se trate de 05390 V2R5 OPEN EDITION de modo que venga en F1AF9000 IP Planning and Migration Guide EDITRAN puede funcionar simult neamente con varios tipos de conexi n EDITRAN TX EDITRAN PR x25 y TCP IP es decir puede tener simult neamente una sesiones conectadas por x25 otras por lu6 2 otras contra pad privados otras contra pad p blicos y otras contra tcp Si una sesi n de transmisi n es definida con tipo de conexi n tcp el extremo remoto tiene que tener su sesi n con tcp a falta de que salga alg n tipo de router o producto en la red que convierta el tr fico IP en tr fico X25 Las conexiones IP en el host no van a trav s de la controladora de comunicaciones 3745 van a trav s de la OSA definida en la pila TCP Previo a instalar EDITRAN deben estar instalados los sockets for CICS 1 1 Conocimiento de la conectividad ip La contrataci n de EDITRAN TCP IP como de EDITRAN x25 6 cualquier producto de comunicaciones no asegura la conectividad de EDITRAN entre extremos Para conectarse con EDITRAN TCP IP es necesario INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 1 1 EDITRAN IP 5 1 CICS Manual de usuario 1 REQUERIMIENTOS Que el extremo remoto disponga de EDITRAN TCP IP Que la conectividad ip no confundir con EDITRAN TCP IP la cual no ofrece ning n problema es posible en la l nea utilizada es decir que los interlocutores de ambos extremos conozcan y se pongan de acuerdo en e
82. rs PORT 7 UDP MISCSERV Miscellaneous Server 7 TCP MISCSERV 9 UDP MISCSERV 9 TCP MISCSERV 19 UDP MISCSERV 19 TCP MISCSERV 20 TCP FTPDB NOAUTOLOG FTP Server 21 TCP FTPDB FTP Server gt 20 TCP OMVS NOAUTOLOG FTP Server 21 TCP FTPD1 FTP Server 23 TCP INTCLIEN Telnet Server 25 TCP SMTP SMTP Server 53 TCP NAMESRV Domain Name Server 53 UDP NAMESRV Domain Name Server 111 TCP PORTMAP Portmap Server 111 UDP PORTMAP Portmap Server 135 UDP LLBD NCS Location Broker 161 UDP OSNMPD SNMP Agent 162 UDP SNMPQE SNMP Query Engine 512 TCP RXSERVE Remote Execution Server 514 TCP RXSERVE Remote Execution Server 515 TCP LPSERVE LPD Server 520 UDP OROUTED RouteD Server 580 UDP NCPROUT NCPROUTE Server 750 TCP MVSKERB Kerberos 750 UDP MVSKERB Kerberos 751 TCP ADM SRV Kerberos Admin Server 751 UDP ADM SRV Kerberos Admin Server 777 UDP SAMSPROC SAMS VANTAGE Server 7777 TCP CICSSITD CICS Socket NO OBLIGATORIO KEEPALIVEOPTIONS INTERVAL 2 ENDKEEPALIVEOPTIONS Hardware definitions NOTE To use these device and link statements update the statements to reflect your installation configuration and remove the semicolon LOSAB4 osa2 with a Token Ring and Ethernet adapter DEVICE LOSAB4 LCS 1002 LINK OSAB4TCP 0 LOSAB4 LINK ETH1 ETHERNET 1 LCS1 LCS2 is a 3172 Model 2 with a FDDI adapter EVICE LCS2 LCS BEO LINK FDDI1 FDDI 0 LCS2 SNALUO
83. sa x00 diagn stico xOF En el resto de casos si es el programa el que simula una liberaci n se pone causa x FF y diagn stico el descrito a continuaci n Como ejemplo en la traza aparece el mensaje con causa FF diagn stico 01 000099940000099980AE9994 170338 E TCP 08888 13 3497 0002 FF 01 DIAGNOSTICO MOTIVO DEL ERROR CON CAUSA 00 X OF Liberaci n ordenada SAB de EDITRAN TCP IP DIAGNOSTICO MOTIVO DEL ERROR CON CAUSA X FF X 00 Gen rico de error caida de socket v otros X 01 Se produce un error en el proceso cliente No se han enviado a red los datos de usuario en el tiempo especificado en entorno local par metro TIME OUT USER DATA MAX MSS 02 Se produce un error el proceso cliente Se han enviado red los datos de usuario pero no se ha recibido respuesta a los mismos desde el extremo remoto en el tiempo especificado en entorno local parametro TIME OUT USER DATA MAX MSS Se produce un error el proceso server child Se han recibido datos de usuario se han pasado al nucleo y no se ha recibido contestaci n del mismo respuesta a user data en el tiempo especificado en entorno local par metro TIME OUT USER DATA MAX MSS X 04 Se ha producido un error en macro SELECT escuchando eventos de red y la sesi n ya la deb a conocer el n cleo Esta liberaci n viene acompafiada de un mensaje x20 previo que indica el error producido SELECT X 05 Se recibe un mensaje desde EDI
84. tentaban reenviar X 06 Error en ZTBB server child Se intentaban enviar datos en tr fico de datos X 11 Xxx ERROR CALL EZACICO6 MASCARAS DE SELECTEX X 00 Error en ZTBB 6 cliente Se intentaban enviar datos de usuario X 01 Error en ZTBB cliente Se enviaron datos de usuario y se esperaba INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 9 7 EDITRAN IP 5 1 CICS Manual de usuario 9 EDITRAN p Descripci n de campos y formatos USUARIO recibirlos X 02 Error en ZTBB 6 cliente Error de select by write en tr fico de datos Error en ZTBB 6 cliente Error de select by read en tr fico de datos X 05 Error en ZTBB 6 server child Se recibieron datos de usuario y se intentan reenviar X 06 Error en ZTBB server child Se recibieron datos de usuario no se reeenviaron y se estaba en select by read X 07 Error en ZTBB server child Error de select by write en tr fico de datos Error en ZTBB server child Error de select by read en tr fico de datos Error en ZTBA server padre durante espera de conexiones Error en ZTBA server padre durante espera de paso de socket X 12 X xx ERROR CALL EZACIC08 FICHERO CACHE Error en ZTBB cliente X 13 Xxx ERROR RETRIEVE Error en ZTBB 6 cliente con error al recibir datos desde EDITRAN Error en ZTBB 6 cliente server child con error al recibir datos ojlo S oo gt xag ERROR START TRANSID LINK 01
85. them all If a session is closed disconnect the user rather than log off the user RESTRICTAPPL IMS Only 3 users can use IMS H USER USER1 Allow userl access LU TCPIMSO1 Assign USER1 LU 501 3 USER USER2 Allow user2 access from the default LU pool E USER USER3 Allow user3 access from 3 Telnet sessions each with a different reserved LU LU TCPIMS31 LU TCPIMS32 LU TCPIMS33 ALLOWAPPL Allow all applications that have not been previously specified to be accessed Map Telnet sessions from this node to display USSAPC screen USSTAB USSAPC 130 50 10 1 INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 3 5 EDITRAN IP 5 1 CICS Manual de usuario 3 05390 V2R5 V2R6 PROCEDIMIENTOS Y FICHEROS i Map Telnet sessions from this link to display USSCBA screen USSTCP USSNPAS2 OSABATCP ENDVTAM Start all the defined devices NOTE To use these START statements update the device name to reflect your installation configuration and remove the semicolon START LOSAB4 START LCS2 START SNALUO KKK KKK k k k k k k k k k k ck kk kk kk k kk kk Bottom of Data X XXX KKK KKK KKK KK KK kk k k ck k ck KKK Las diferencias entre 05390 V2R5 Y V2R6 est n en los subpar metros de TCPCONFIG y UDPCONFIG PARAMETRO OS390 V2R5 MINIMUN MAXIMUN DEFAULT Tcp send buffer size 256 256 16384 16K Tcp receive buffer size 256 256 16384 16K Udp send
86. tion parameters for TCPIP can be explicitly allocated using the PROFILE DD statement If the PROFILE DD statement is not present a hierarchical name search and dynamic allocation will be performed Please see Understanding TCP IP Data Set Names in the Customization and Administration Guide for more information The data set name on the PROFILE DD statement can be any sequential data set or a member of partitioned data set PDS 11 XXPROFILE DD DSN TCPIP DESA TCPPARMS PROFILE DISP SHR XX XX XX XX XX XX XX XX XX XX XX SYSTCPD explicitly identifies which data set is to be used to obtain the parameters defined by TCPIP DATA The SYSTCPD DD statement should be placed in the TSO logon procedure or in the JCL of any client or server executed as a background task The data set can be any sequential data set or a member of a partitioned data set PDS For more information please see Understanding TCP IP Data Set Names in the Customization and Administration Guide 12 XXSYSTCPD DD DSN TCPIP DESA TCPPARMS TCPDATA DISP SHR INDRA Todos los derechos reservados EDITRAN IP 5 1 P g 2 2 EDITRAN IP 5 1 CICS Manual de usuario 2 05390 V2R4 PROCEDIMIENTOS Y FICHEROS 2 2 FILE PROFILE 05390 V2R4 TCPIP DESA TCPPARMS PROFILE PROFILE TCPIP ACBPOOLSIZE 1000 ADDRESSTRANSLATIONPOOLSIZE 1500 CCBPOOLSIZE 150 DATABUFFERPOOLSIZE 160 65536 ENVELOPEPOOLSIZE 750 IPROUTEPOOLSIZE 300 LARGEENV

EDITRAN/IP 5.1

Contents

Download Pdf Manuals

Related Search

Related Contents