SNPB@UTEPA.BITNET (Garnet MacPhee) (02/05/90)
Hello. I am in the process of converting an application that uses remote BTAM 3270 terminals. These terminals previously were defined as CLUSTERS on VM, then DIAL'ed to the application. Since we will soon be converting to VM/XA, which does not support remote 3270 clusters, I have been trying to attach the lines to MVS and define remote 3270's in the CICS TCT. All of this appears to work for a while, then we get the following messages: IEA000I 04C,0,LDA,02,0F00,0200,91**4040,,jobname,hh.mm.ss DFH0601 - PROGRAM INTERRUPT OCCURRED WITH SYSTEM TASK IN CONTROL DFH0606 - ABEND U0601 HAS BEEN DETECTED The relevant info from the TCT is as follows: DFHTCT TYPE=SDSCI, X DEVICE=R3270, X ERROPT=ET, X DSCNAME=TL0 DFHTCT TYPE=LINE, X ACCMETH=BTAM, X BTAMRLN=1, X TRMTYPE=R3270, X INAREAL=2000, X DSCNAME=TL0, X CLASS=CONV, X FEATURE=AUTOPOLL, X LISTADR=(TL0POLL,WRAP) L000 DFHTCT TYPE=TERMINAL, X TRMIDNT=L000, X TRMADDR=AL000, X TRMSTAT=TRANSCEIVE, X POLLPOS=1, X TRMMODL=2, X FEATURE=(DCKYBD,UCTRAN,TEXTKYBD,3270E,SELCTPEN) ..... TL0POLL DFTRMLST AUTOWLST,(40407F7F2D,3737373737) AL000 DFTRMLST OPENLST,(606040402D) ..... Anyone have any suggestions? CICS is 1.6.1, MVS is 1.3.5. Thanks, Garnet MacPhee U. Texas El Paso
SORREL@DCSPROD.BYU.EDU (02/05/90)
>All of this appears to work for a while, then we get the following messages: > >IEA000I 04C,0,LDA,02,0F00,0200,91**4040,,jobname,hh.mm.ss >DFH0601 - PROGRAM INTERRUPT OCCURRED WITH SYSTEM TASK IN CONTROL >DFH0606 - ABEND U0601 HAS BEEN DETECTED > >Anyone have any suggestions? CICS is 1.6.1, MVS is 1.3.5. > >Thanks, >Garnet MacPhee >U. Texas El Paso Sounds like a CICS bug to me. We have the same problem at BYU under 1.7 (lost data, then pgm check 601). Let me know if you find a resolution..