🚀 go-pugleaf

Many thanks to Roy Brickley and Trevor Hemsley for helping me to get the
old PMANT and TN3270 from TCP/IP 2.0 working in Warp 4.  Here is the
procedure:

copy from a warp3 setup, the following files to the corresponding warp4
dirs:

\tcpip\bin  pmant.exe
\tcpip\dll  wptn3270.dll
\tcpip\help  wptn3270.hlp
\tcpip\etc (or \mptn\etc) pmant.key (this file should be in the dir
referred to by your ETC env variable

then run the following rexx routine: (save as sysreg.cmd)
/*- sysreg.cmd :  register a new class dll */
trace off
 /* load functions, if needed  */
 if RxFuncQuery("SysLoadFuncs") then
   do
     rc = RxFuncAdd("SysLoadFuncs","RexxUtil","SysLoadFuncs")
     rc = SysLoadFuncs()
   end
 if SysRegisterObjectClass("TN3270", "WPTN3270") then
   say 'Install completed for WPTN3270'
 exit
 /* end of sysreg.cmd */
                                  
A "3270 Telnet" template will be added to your Templates folder, and you
can use it to create an icon for your mainframe or whatever.  Mine works
exactly like before.

feel free to contact me if you need help.

Gary.Pfeifer@Colorado.EDU