We have a VTAM application called EPS which send data to VTAM printers.
Our new MF no longer has SNA devices, so we want these printouts to arrive
at TCP/IP printers without changing EPS.
We have made the following definitions :
1. In VTAM
TCP VBUILD TYPE=APPL
***********************************************
TCPMVSA1 APPL ACBNAME=TCPMVSA1, X
EAS=12, X
PARSESS=YES,SONSCIP=YES,VPACING=0, X
AUTH=(ACQ,VPACE),SRBEXIT=YES
***********************************************
PSPL0001 APPL AUTH=NVPACE, X
EAS=1, X
PARSESS=NO, X
MODETAB=ISTINCLM,DLOGMOD=D6328904, X
SESSLIM=YES,USSTAB=ISTINCDT
PSPL0002 APPL AUTH=NVPACE, X
EAS=1, X
PARSESS=NO, X
MODETAB=ISTINCLM,DLOGMOD=D6328904, X
SESSLIM=YES,USSTAB=ISTINCDT
TRSPL017 APPL AUTH=NVPACE, X
EAS=1, X
PARSESS=NO, X
MODETAB=ISTINCLM,DLOGMOD=D6328904, X
SESSLIM=YES,USSTAB=ISTINCDT
2. In TCP/IP definitions :
TELNETPARMS
DEBUG DETAIL
; DEBUG FLOW
; DEBUG TRACE
PORT 23
MSG07
INACTIVE 28800
PRTINACTIVE 0
TIMEMARK 28800
SCANINTERVAL 600
SMFINIT STD
SMFTERM STD
WLMCLUSTERNAME TN3270E ENDWLMCLUSTERNAME
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 NSX32
TELNETDEVICE 3279-5-E NSX32705 ; 132 column screen - default of NSX32
TELNETDEVICE IBM-3287-1 ,SCS ; PRINTER DAVIDL
ENDTELNETPARMS
BEGINVTAM
port 23
PRTGROUP SPLPRS
PSPL0001
PSPL0002
ENDPRTGROUP
;
IPGROUP PRTSERV
194.90.29.140
194.90.29.109
ENDIPGROUP
;
;
PRTMAP SPLPRS PRTSERV GENERIC
PRTGROUP PGRP2
TRSPL017
ENDPRTGROUP
PRTMAP PGRP2 194.90.29.71 ;
ALLOWAPPL *
ENDVTAM
3. WE have a emulation program 'Natural Connection' and we define the
printer TRSPL017
When we start the Host printer session we get error on the PC :
Session: DavidLError: 16-414 - The device or resource name 'TRSPL017'
specified in the
'TN3270E communication' dialog is not known to the telnet server.
We see this error on the MF console
EZZ6034I TELNET CONN 00007991 LU **N/A** ACCEPTED 23
IP..PORT: 194.90.29.155..3079
EZZ6035I TELNET DEBUG DETAIL CLIENT
IP..PORT: 194.90.29.155..3079
CONN: 00007991 LU: MOD: EZBTPGLU
RCODE: 3004-00 LU is not available.
PARM1: 00000000 PARM2: 00000000 PARM3: 00000000
4. Here is the output of "D NET,E,ID=TRSPL017"
IST097I DISPLAY
ACCEPTED
IST075I NAME = ADCD.TRSPL017, TYPE = APPL
759
IST486I STATUS= CONCT, DESIRED STATE=
CONCT
IST1447I REGISTRATION TYPE =
CDSERVR
IST977I MDLTAB=***NA***
ASLTAB=***NA***
IST861I MODETAB=ISTINCLM USSTAB=ISTINCDT
LOGTAB=***NA***
IST934I DLOGMOD=D6328904 USS
LANGTAB=***NA***
IST1632I VPACING =
7
IST1938I APPC =
NO
IST597I CAPABILITY-PLU INHIBITED,SLU INHIBITED,SESSION LIMIT
00000001
IST231I APPL MAJOR NODE =
TCPPRTS
IST654I I/O TRACE = OFF, BUFFER TRACE =
OFF
IST1500I STATE TRACE =
OFF
IST271I JOBNAME = ***NA***, STEPNAME = ***NA***, DSPNAME =
***NA***
IST228I ENCRYPTION = OPTIONAL , TYPE =
DES
IST1563I CKEYNAME = TRSPL017 CKEY = PRIMARY CERTIFY =
NO
IST1552I MAC = NONE MACTYPE =
NONE
IST1050I MAXIMUM COMPRESSION LEVEL - INPUT = 0, OUTPUT =
0
IST1633I ASRCVLM =
1000000
IST1634I DATA SPACE USAGE: CURRENT = ***NA*** MAXIMUM =
***NA***
IST171I ACTIVE SESSIONS = 0000000000, SESSION REQUESTS =
0000000000
IST172I NO SESSIONS EXIST
IST314I END
Any ideas how to get this thing working ?
Thank You
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
