| Newsgroups |
gmane.comp.emulators.hercules390.mvs |
| Message-ID |
<MN2PR07MB724696527B9AAF7CCEA8EB74B5830@MN2PR07MB7246.namprd07.prod.outlook.com> |
Hi,
>The reason you should set up TN3270 first is because it's easier than FTP and will tell us if you have something wrong, whereas FTP is finicky and can't be easily debugged like TN3270 can.
Using Tom Brennan's Vista I was able to connect to TN3270 port 23 and see "IP Address = 192.168.1.101" in the top right corner of the logo. However there is this in the log:
13.56.20 STC02531 EZZ6023I TN3270 CODEPAGE CONVERSION FROM ISO8859-1 TO IBM-1047 FAILED: START ERROR
13.56.20 STC02531 EZZ6035I TN3270 DEBUG CONFIG EXCEPTION
LINE: **N/A** MOD: EZBTMCIN
RCODE: 8018-04 Codepage setup, including defaults, failed.
PARM1: 00000000 PARM2: 00000000 PARM3: 00000000
13.56.20 STC02531 EZZ6001I TN3270 SERVER STARTED
13.56.20 STC02531 EZZ6044I TN3270 PROFILE PROCESSING BEGINNING FOR FILE
ADCD.Z21S.TCPPARMS(TN3270)
EZZ6045I TN3270 PROFILE PROCESSING COMPLETE FOR FILE
ADCD.Z21S.TCPPARMS(TN3270)
13.56.20 STC02531 EZZ6003I TN3270 LISTENING ON PORT 23
The TN3270 Proc uses ADCD.Z21S.TCPPARMS(TN3270) out of the box. I have not changed it.
>already I can see that you have a error in IPNODES that will cause you to loop incorrectly, so take both
>
>192.168.1.101 DESKTOP
>192.168.1.1 ROUTER
>
>out of IPNODES. I don't know why you coded them and they don't belong there and will cause a problem all by themselves.
Thank you. I coded them desperately trying to get things to work. There is only one statement left in there now, the ZOS line.
>So, post your resolver members (the ones pointed to in your RESOLVER proc), and the same for OMPROUTE
RESOLVEP:
DEFAULTTCPIPDATA('USER.TCPPARMS(TCPDATA)')
GLOBALTCPIPDATA('USER.TCPPARMS(TCPDATA)')
GLOBALIPNODES('USER.TCPPARMS(GBLIPNOD)')
DEFAULTIPNODES('USER.TCPPARMS(GBLIPNOD)')
COMMONSEARCH
CACHE
CACHESIZE(200M)
MAXTTL(2147483647)
UNRESPONSIVETHRESHOLD(25)
TCPDATA:
TCPIPJOBNAME TCPIP
HOSTNAME ZOS
DATASETPREFIX TCPIP
NSINTERADDR 192.168.1.1
RESOLVEVIA UDP
RESOLVERTIMEOUT 10
RESOLVERUDPRETRIES 1
LOOKUP LOCAL DNS
ALWAYSWTO NO
GBLIPNOD:
192.168.1.201 ZOS
I haven't touched it OMPROUTE, so I don't know what to post.
Also post your entire TCPIP profile and TCPDATA members as well as the actual procs for TCPIP and RESOLVER and OMPROUTE.
TCPIP Proc:
//TCPIP PROC PARMS='CTRACE(CTIEZB00)'
//*
//TCPIP EXEC PGM=EZBTCPIP,REGION=0M,TIME=1440,
// PARM='&PARMS'
//*
//STEPLIB DD DSN=ADCD.&SYSVER..VTAMLIB,DISP=SHR
//*
//SYSPRINT DD SYSOUT=H,DCB=(RECFM=VB,LRECL=132,BLKSIZE=136)
//ALGPRINT DD SYSOUT=*,DCB=(RECFM=VB,LRECL=132,BLKSIZE=136)
//CFGPRINT DD SYSOUT=*,DCB=(RECFM=VB,LRECL=132,BLKSIZE=136)
//SYSOUT DD SYSOUT=H,DCB=(RECFM=VB,LRECL=132,BLKSIZE=136)
//CEEDUMP DD SYSOUT=*,DCB=(RECFM=VB,LRECL=132,BLKSIZE=136)
//SYSERROR DD SYSOUT=*
//PROFILE DD DISP=SHR,DSN=USER.TCPPARMS(LCS)
//SYSTCPD DD DISP=SHR,DSN=USER.TCPPARMS(TCPDATA)
RESOLVER (actually, RESOLVEP) Proc:
//*
//* TCPIP RESOLVER
//*
//RESOLVEP PROC PARMS=CTRACE(CTIRES00)
//*
//EZBREINI EXEC PGM=EZBREINI,REGION=0M,TIME=1440,
// PARM=&PARMS
//*SETUP DD DISP=SHR,DSN=ADCD.Z21S.TCPPARMS(GBLRESOL),FREE=CLOSE
//SETUP DD DISP=SHR,DSN=USER.TCPPARMS(RESOLVEP),FREE=CLOSE
//*
USER.TCPPARMS(RESOLVEP):
DEFAULTTCPIPDATA('USER.TCPPARMS(TCPDATA)')
GLOBALTCPIPDATA('USER.TCPPARMS(TCPDATA)')
GLOBALIPNODES('USER.TCPPARMS(GBLIPNOD)')
DEFAULTIPNODES('USER.TCPPARMS(GBLIPNOD)')
COMMONSEARCH
CACHE
CACHESIZE(200M)
MAXTTL(2147483647)
UNRESPONSIVETHRESHOLD(25)
>Offload is not going to be your current problem.
I'm relieved to hear that.
>In the end though, if you don't want my help, just say so, but complaining that there is something wrong with Hercules or z/OS is just plain wrong.
I'm certainly not complaining. I am very grateful for all your help and patience. If anything I have said has been construed as a complaint then I do apologise.
Fish: I have uninstalled the Jazz software.
Peter