home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / ibmtsochicago / tsoker.bwr < prev    next >
Internet Message Format  |  2020-01-01  |  23KB
  1. Date: Wed, 17 Oct 84 08:03:53 pdt
  2. From: dual!islenet!david%Berkeley@columbia.arpa
  3. To: Info-Kermit@CU20B, systems.ron%UCHICAGO@MIT-MULTICS.ARPA
  4. Subject: TSO Kermit
  5.  
  6. Finally got KERMIT-TSO working here.  Here's a summary of the changes
  7. we had to make.  Perhaps this will save someone else some energy.
  8.  
  9. 1) We had to severely edit the ASCII-EBCDIC translation tables.  We
  10. use our own TCAM tables here (slightly modified versions of the
  11. TEKTRONIX tables), and edited KERMIT-TSO to agree with them.  This
  12. is not a job for the faint-hearted or poor-of-vision, since it
  13. involves reversing all the ASCII hex codes to decipher the TCAM tables.
  14.  
  15. 2) The default device (DASD group) for creating new files is hard-coded
  16. as SYSDA.  If your installation does not allow users to catalog
  17. datasets on SYSDA they will not be able to RECEIVE to a new dataset.
  18. Easy change.
  19.  
  20. David Lassner,
  21. University of Hawaii
  22.  
  23. ------------------------------
  24.  
  25. Date: 25 Oct 1984 1319 PDT
  26. From: Joe Wieclawek <JAW@JPL-VLSI.ARPA>
  27. Subject: Problem with TSO Kermit
  28. To: Info-Kermit@CU20B.ARPA
  29.  
  30. Can any TSO Kermit users offer some help?  The program seems to run as it
  31. should, but no characters ever get sent to the micro. The micros run MS and
  32. CP/M versions of Kermit and have no problem talking to each other or VMS and
  33. UNIX Kermit.  The DEBUG in TSO Kermit tells me:
  34.  
  35.   (When TSO is the receiver and the micro is the sender)
  36.     > TGET gets the send init packer
  37.     > The ACK packet is formed
  38.     > TPUT is called
  39.     > TPUT returns no-error status
  40.    *> NO characters are sent out (no ACK)
  41.         (The micro's port was monitored and nothing gets there)
  42.     > TGET gets a send init packet again etc, until max retries
  43.  
  44.   (When TSO is the sender)
  45.     > The send init packet is formed
  46.     > TPUT is called
  47.     > TPUT returns no-error status
  48.    *> no characters are sent out
  49. ??????????????????
  50.  
  51. Joe Wieclawek
  52. Jet Propulsion Laboratory
  53. Pasadena California
  54. (818)354-2419
  55. JAW@JPL-VLSI.ARPA
  56.  
  57. ------------------------------
  58.  
  59. Date: 29 October 1984, 11:58:30 CST
  60. From: ("Ron Rusnak (312) 962-7607") SYSRONR at UCHIVM1
  61. To:   SY.FDC at CU20B.BITNET
  62. Subject: Re: Problem with TSO Kermit
  63.  
  64. I'm the guy unfortunately.  The problem that this guy is having is probably
  65. related to either his terminal handler (TCAM or VTAM or whatever), or the
  66. translate tables.  As far as, I know the only complaints I have heard come from
  67. folks who have ASCII translate tables.  It is neccessary that TPUT control send
  68. all ASCII characters.
  69.  
  70. Given what this person said, I would suspect something wierd with whatever
  71. acess method they're using.
  72.  
  73. ------------------------------
  74.  
  75.  
  76. Date: Wed 14 Aug 85 08:52:52-PDT
  77. From: Wing Lee <WingLee%ECLD@ECLA>
  78. Subject: Solution to TSO Kermit vs 7171 Problem
  79.  
  80. Good News!  The problem we had with the Series/1 version of TSO-KERMIT
  81. has been solved.  The problem we were having was that TSO-KERMIT would
  82. hang at random places whenever you tried to upload to TSO.  One of
  83. our Systems Programmers, Valaine Saito, discovered what we think
  84. the problem is.  What follows is Valaine's message to me.
  85.  
  86. >    i looked at the kermit through the 7171 problem again since it appears
  87. >that it really HAS to work if we're going to lose a s/1.  i stumbled through
  88. >the assembler program, it looks like the logic is okay.  after determining
  89. >that, i went to the s/1 and 7171 manuals to see what the difference was.  it
  90. >turns out that there is NO logical difference, but there clearly is a 
  91. >functional difference.  
  92. >
  93. >    both the s/1 and the 7171 have 64 char type ahead buffers.  the s/1 must
  94. >handle it differently.  when i have both the host and micro kermits sending
  95. >packet lengths of 60 (less than the 64 char buffer size), everything works
  96. >fine.  when either of the kermits sends > 64 packet lengths, the familiar
  97. >"failure to receive ackn from host" msg appears on the micro and the transfer
  98. >stops.  (all this pertains to file transfer from micro to host, i assume the
  99. >other way works since no one has said otherwise.)  at 9600 baud, i ran a
  100. >largish file (60+ kb) through a number of times (10 or so) and it worked
  101. >every time with BOTH kermits sending packet sizes of less than 64.
  102. >
  103. >    so the solution is to send packets of size X, where x is less than 64
  104. >(i always tried sizes of < 64, i didn't try 64).  the practical options 
  105. >are:
  106. >
  107. >    tell users about the packet length problem and have them set both
  108. >    lengths themselves.
  109. >
  110. >    re-code the host kermit to accept a max packet size of 63 or 64.
  111. >    (this isn't too cool because only the receive section has the
  112. >     problem.  changing the max packet size would affect all
  113. >     sections.)
  114. >       
  115. >    re-code the host kermit to utilize the RPSIZ variable correctly
  116. >    and change the value to F'64' (or 63).  RPSIZ is the max receive
  117. >    packet size.
  118.  
  119. I have tried sending packet sizes of 64 bytes and that works.  When I tried 65
  120. byte packets, the upload failed, so it looks like 64 is the magic number.
  121.  
  122. wing lee
  123.  
  124. [Ed. - For CMS Kermit, we will look into the possibility that the program
  125. can determine if it's a 7171 (it's not clear that it reports itself 
  126. differently from a Series/1) and in that case use the smaller packet size.]
  127.  
  128. ------------------------------
  129.  
  130. ************
  131. File TSOKERM.ASM;2
  132. ****************                                                        00000000
  133. *                                                                       00000000
  134. *         ----> THE WRTERM AND PROMPT MACROS ARE REWRITTEN TO ALLOW     00000000
  135. * IT TO ASSEMBLE UNDER IFOX00.                                          00000000
  136. *                                                                       00000000
  137. *         MACRO                                                         TSO00310
  138. *&LAB     WRTERM &MSG                                                   TSO00320
  139. *         LCLC   &MS                                                    TSO00330
  140. *         LCLA   &LN                                                    TSO00340
  141. *&MS      SETC  '&MSG'                                                  TSO00350
  142. *&LN      SETA  K'&MS                                                   TSO00360
  143. *&LN      SETA  &LN-2                                                   TSO00370
  144. *&LAB     TPUT  &MS,&LN                                                 TSO00380
  145. *         MEND                                                          TSO00390
  146. *         MACRO                                                         TSO00400
  147. *&LAB     PROMPT &MSG                                                   TSO00410
  148. *         LCLC   &MS                                                    TSO00420
  149. *         LCLA   &LN                                                    TSO00430
  150. *&MS      SETC  '&MSG'                                                  TSO00440
  151. *&LN      SETA  K'&MS                                                   TSO00450
  152. *&LN      SETA  &LN-2                                                   TSO00460
  153. *&LAB     TPUT  &MS,&LN,ASIS                                            TSO00470
  154. *         MEND                                                          TSO00480
  155.          MACRO                                                          00000000
  156. &LAB     WRTERM &MSG                                                    00000000
  157.          LCLC   &LEN                                                    00000000
  158. &LEN     SETC   'L'''                                                   00000000
  159. &LAB     B      WRX&SYSNDX                                              00000000
  160. WRT&SYSNDX DC   C&MSG                                                   00000000
  161. WRX&SYSNDX TPUT WRT&SYSNDX,&LEN.WRT&SYSNDX                              00000000
  162.          MEND                                                           00000000
  163.          MACRO                                                          00000000
  164. &LAB     PROMPT &MSG                                                    00000000
  165.          LCLC   &LEN                                                    00000000
  166. &LEN     SETC   'L'''                                                   00000000
  167. &LAB     B      WRX&SYSNDX                                              00000000
  168. WRT&SYSNDX DC   C&MSG                                                   00000000
  169. WRX&SYSNDX TPUT WRT&SYSNDX,&LEN.WRT&SYSNDX,ASIS                         00000000
  170.          MEND                                                           00000000
  171. ******
  172. File TSOKERM.ASM;1
  173.          MACRO                                                          TSO00310
  174. &LAB     WRTERM &MSG                                                    TSO00320
  175.          LCLC   &MS                                                     TSO00330
  176.          LCLA   &LN                                                     TSO00340
  177. &MS      SETC  '&MSG'                                                   TSO00350
  178. &LN      SETA  K'&MS                                                    TSO00360
  179. &LN      SETA  &LN-2                                                    TSO00370
  180. &LAB     TPUT =C&MS,&LN                                                 TSO00380
  181.          MEND                                                           TSO00390
  182.          MACRO                                                          TSO00400
  183. &LAB     PROMPT &MSG                                                    TSO00410
  184.          LCLC   &MS                                                     TSO00420
  185.          LCLA   &LN                                                     TSO00430
  186. &MS      SETC  '&MSG'                                                   TSO00440
  187. &LN      SETA  K'&MS                                                    TSO00450
  188. &LN      SETA  &LN-2                                                    TSO00460
  189. &LAB     TPUT =C&MS,&LN,ASIS                                            TSO00470
  190.          MEND                                                           TSO00480
  191. ************
  192. ************
  193. File TSOKERM.ASM;2
  194.          PRINT ON,GEN                                                   00000000
  195. ******
  196. File TSOKERM.ASM;1
  197. ************
  198. ************
  199. File TSOKERM.ASM;2
  200.          WRTERM    'KERMIT-TSO Version 1.00 (&SYSDATE,&SYSTIME)'        TSO01680
  201. ******
  202. File TSOKERM.ASM;1
  203.          WRTERM    'KERMIT-TSO Version 1.00'                            TSO01680
  204. ************
  205. ************
  206. File TSOKERM.ASM;2
  207.          NI        FLAGS,X'FF'-FLG3    turn off left-over data          00000000
  208. ******
  209. File TSOKERM.ASM;1
  210. ************
  211. ************
  212. File TSOKERM.ASM;2
  213.          WRTERM    'Specify dataset name.'                              TSO03620
  214. ******
  215. File TSOKERM.ASM;1
  216.          WRTERM    'Specify dataset name.'                 [  ]         TSO03620
  217. ************
  218. ************
  219. File TSOKERM.ASM;2
  220.          LA        R15,READX       LOCATE READ ROUTINE                  TSO14760
  221.          BALR      R15,R15         COME AND GO ON SAME REG              TSO14770
  222. ******
  223. File TSOKERM.ASM;1
  224.          LA        R15,READX                                            TSO14760
  225.          BALR      R15,R15                                              TSO14770
  226. ************
  227. ************
  228. File TSOKERM.ASM;2
  229.          CH        R4,=Y(ERCOD)        RETCODE OF 12 MEANS EOF          TSO14810
  230. ******
  231. File TSOKERM.ASM;1
  232.          C         R4,=A(ERCOD)        RETCODE OF 12 MEANS EOF          TSO14810
  233. ************
  234. ************
  235. File TSOKERM.ASM;2
  236.          BZ        NODEBG2             BYPASS IF NO DEBUG ON            TSO17840
  237.          MVC       WRKBUFF(2),=H'18'   LENGTH OF WRKBUFF FOR PUT        TSO17850
  238. ******
  239. File TSOKERM.ASM;1
  240.          BZ        NODEBG2                                              TSO17840
  241.          MVC       WRKBUFF(2),=H'18'                                    TSO17850
  242. ************
  243. ************
  244. File TSOKERM.ASM;2
  245. *  AT EXIT R1 CONTAINS 0 FOR SUCCESSFUL READ OR 12 FOR EOF           *  00000000
  246. *          R0 CONTAINS RECORD LENGTH OR ZERO FOR EOF                 *  00000000
  247. ******
  248. File TSOKERM.ASM;1
  249. ************
  250. ************
  251. File TSOKERM.ASM;2
  252.          LH        R1,KERIN+(DCBLRECL-IHADCB) GET LRECL                 TSO18230
  253.          STH       R1,WRKBUFF          SAVE IN DEBUG BUFF               TSO18240
  254. ******
  255. File TSOKERM.ASM;1
  256.          LH        R1,KERIN+(DCBLRECL-IHADCB)                           TSO18230
  257.          STH       R1,WRKBUFF                                           TSO18240
  258. ************
  259. ************
  260. File TSOKERM.ASM;2
  261. RDNODBG  XR        R1,R1               SET RETURN CODE=0                TSO18270
  262. ******
  263. File TSOKERM.ASM;1
  264. RDNODBG  XR        R1,R1               SET RETURN CODE                  TSO18270
  265. ************
  266. ************
  267. File TSOKERM.ASM;2
  268.          LA        R1,ERCOD            SET RC=12                        TSO18380
  269.          XR        R0,R0               SET LENGTH =  0                  TSO18390
  270. ******
  271. File TSOKERM.ASM;1
  272.          LA        R1,12                                                TSO18380
  273.          XR        R0,R0                                                TSO18390
  274. ************
  275. ************
  276. File TSOKERM.ASM;2
  277.          BR        R15                 RETURN                           TSO18410
  278. ******
  279. File TSOKERM.ASM;1
  280.          BR        R15                                                  TSO18410
  281. ************
  282. ************
  283. File TSOKERM.ASM;2
  284.          XC        RSAVPL,RSAVPL       CLEAR BUFFER OUT *KMG PRC*       00000000
  285. ******
  286. File TSOKERM.ASM;1
  287. ************
  288. ************
  289. File TSOKERM.ASM;2
  290.          SPACE 1                                                        00000000
  291. ******
  292. File TSOKERM.ASM;1
  293. ************
  294. ************
  295. File TSOKERM.ASM;2
  296.          SPACE 1                                                        00000000
  297. ******
  298. File TSOKERM.ASM;1
  299. ************
  300. ************
  301. File TSOKERM.ASM;2
  302.          SPACE 1                                                        00000000
  303. ******
  304. File TSOKERM.ASM;1
  305. ************
  306. ************
  307. File TSOKERM.ASM;2
  308.          PUT       KEROUT,(0)                                           TSO23540
  309. ******
  310. File TSOKERM.ASM;1
  311.          PUT       KEROUT,(R0)                                          TSO23540
  312. ************
  313. ************
  314. File TSOKERM.ASM;2
  315. *DSSIZ   DC        F'40'               DEFAULT MAX SEND PACKET SIZE     TSO24410
  316. DSSIZ    DC        F'80'               DEFAULT MAX SEND PACKET SIZE     TSO24410
  317. ******
  318. File TSOKERM.ASM;1
  319. DSSIZ    DC        F'40'               DEFAULT MAX SEND PACKET SIZE     TSO24410
  320. ************
  321. ************
  322. File TSOKERM.ASM;2
  323. *DLRECL  DC        X'50'               DEFAULT LRECL SIZE OF 80         TSO24730
  324. DLRECL   DC        X'FF'               DEFAULT LRECL SIZE OF 255        TSO24730
  325. ******
  326. File TSOKERM.ASM;1
  327. DLRECL   DC        X'50'               DEFAULT LRECL SIZE OF 80         TSO24730
  328. ************
  329. ************
  330. File TSOKERM.ASM;2
  331. *DBLKSIZE DC       H'80'               DEFAULT BLKSIZE OF 80            TSO24750
  332. DBLKSIZE DC        H'255'              DEFAULT BLKSIZE OF 255           TSO24750
  333. ******
  334. File TSOKERM.ASM;1
  335. DBLKSIZE DC        H'80'               DEFAULT BLKSIZE OF 80            TSO24750
  336. ************
  337. ************
  338. File TSOKERM.ASM;2
  339. READSAVE DS        4F                  REGISTER SAVEAREA                TSO24880
  340. WRITSAVE DS        4F                  REGISTER SAVEAREA                TSO24890
  341. ******
  342. File TSOKERM.ASM;1
  343. READSAVE DS        4F                                                   TSO24880
  344. WRITSAVE DS        4F                                                   TSO24890
  345. ************
  346. ************
  347. File TSOKERM.ASM;2
  348. * THIS IS THE ORIGINAL ASCII TO EBCDIC TABLE                            TSO25350
  349. *ATOE    DC        X'00010203372D2E2F1605250B0C0D0E0F'                  TSO25360
  350. *        DC        X'101112133C3D322618193F271C1D1E1F'                  TSO25370
  351. *        DC        X'405A7F7B5B6C507D4D5D5C4E6B604B61'                  TSO25380
  352. *        DC        X'F0F1F2F3F4F5F6F7F8F97A5E4C7E6E6F'                  TSO25390
  353. *        DC        X'7CC1C2C3C4C5C6C7C8C9D1D2D3D4D5D6'                  TSO25400
  354. *        DC        X'D7D8D9E2E3E4E5E6E7E8E9ADE0BD5F6D'                  TSO25410
  355. *        DC        X'79818283848586878889919293949596'                  TSO25420
  356. *        DC        X'979899A2A3A4A5A6A7A8A9C04FD0A107'                  TSO25430
  357. *THIS IS THE ORIGINAL EBCDIC TO ASCII CONVERSION TABLE                  TSO25440
  358. *CHARACTERS NOT REPRESENTABLE IN ASCII ARE REPLACED BY A NULL           TSO25450
  359. *ETOA    DC        X'000102030009007F0000000B0C0D0E0F'                  TSO25460
  360. *G       DC        X'1011121300000800181900001C1D1E1F'                  TSO25470
  361. *        DC        X'10111213000D0800181900001C1D1E1F'                  TSO25480
  362. *        DC        X'00000000000A171B0000000000050607'                  TSO25490
  363. *        DC        X'0000160000000004000000001415001A'                  TSO25500
  364. *        DC        X'20000000000000000000002E3C282B7C'                  TSO25510
  365. *        DC        X'2600000000000000000021242A293B5E'                  TSO25520
  366. *        DC        X'2D2F00000000000000007C2C255F3E3F'                  TSO25530
  367. *        DC        X'000000000000000000603A2340273D22'                  TSO25540
  368. *        DC        X'00616263646566676869007B00000000'                  TSO25550
  369. *        DC        X'006A6B6C6D6E6F707172007D00000000'                  TSO25560
  370. *        DC        X'007E737475767778797A0000005B0000'                  TSO25570
  371. *        DC        X'000000000000000000000000005D0000'                  TSO25580
  372. *        DC        X'7B414243444546474849000000000000'                  TSO25590
  373. *        DC        X'7D4A4B4C4D4E4F505152000000000000'                  TSO25600
  374. *        DC        X'5C00535455565758595A000000000000'                  TSO25610
  375. *        DC        X'303132333435363738397C0000000000'                  TSO25620
  376. * THIS IS THE PRC MODIFIED ASCII TO EBCDIC TABLE 6/28/85 9:00           TSO25350
  377. *                    0.1.2.3.4.5.6.7.8.9.A.B.C.D.E.F.                   00000000
  378. ATOE     DC        X'00010203372D2E2F1605250B0C0D0E0F'                  TSO25360
  379.          DC        X'101112133C3D322618193F271C1D1E1F'                  TSO25370
  380.          DC        X'405A7F7B5B6C507D4D5D5C4E6B604B61'                  TSO25380
  381.          DC        X'F0F1F2F3F4F5F6F7F8F97A5E4C7E6E6F'                  TSO25390
  382.          DC        X'7CC1C2C3C4C5C6C7C8C9D1D2D3D4D5D6'                  TSO25400
  383.          DC        X'D7D8D9E2E3E4E5E6E7E8E9ADCFBDB06D'                  TSO25410
  384.          DC        X'BF818283848586878889919293949596'                  TSO25420
  385.          DC        X'979899A2A3A4A5A6A7A8A98B4F9B5F07'                  TSO25430
  386. *THIS IS THE PRC MODIFIED EBCDIC TO ASCII CONVERSION TABLE 6/28/85 9:00 TSO25440
  387. *CHARACTERS NOT REPRESENTABLE IN ASCII ARE REPLACED BY A NULL           TSO25450
  388. *                    0.1.2.3.4.5.6.7.8.9.A.B.C.D.E.F.                   00000000
  389. ETOA     DC        X'000102030009007F0000000B0C0D0E0F'                  TSO25460
  390.          DC        X'10111213000D0800181900001C1D1E1F'                  TSO25480
  391.          DC        X'00000000000A171B0000000000050607'                  TSO25490
  392.          DC        X'0000160000000004000000001415001A'                  TSO25500
  393.          DC        X'20000000000000000000002E3C282B7C'                  TSO25510
  394.          DC        X'2600000000000000000021242A293B7E'                  TSO25520
  395.          DC        X'2D2F00000000000000007C2C255F3E3F'                  TSO25530
  396.          DC        X'000000000000000000603A2340273D22'                  TSO25540
  397.          DC        X'00616263646566676869007B00000000'                  TSO25550
  398.          DC        X'006A6B6C6D6E6F707172007D00000000'                  TSO25560
  399.          DC        X'007E737475767778797A0000005B0000'                  TSO25570
  400.          DC        X'5E0000000000000000000000005D0060'                  TSO25580
  401.          DC        X'7B41424344454647484900000000005C'                  TSO25590
  402.          DC        X'7D4A4B4C4D4E4F505152000000000000'                  TSO25600
  403.          DC        X'5C00535455565758595A000000000000'                  TSO25610
  404.          DC        X'303132333435363738397C0000000000'                  TSO25620
  405. ******
  406. File TSOKERM.ASM;1
  407. * THIS IS THE ASCII TO EBCDIC TABLE                                     TSO25350
  408. ATOE     DC        X'00010203372D2E2F1605250B0C0D0E0F'                  TSO25360
  409.          DC        X'101112133C3D322618193F271C1D1E1F'                  TSO25370
  410.          DC        X'405A7F7B5B6C507D4D5D5C4E6B604B61'                  TSO25380
  411.          DC        X'F0F1F2F3F4F5F6F7F8F97A5E4C7E6E6F'                  TSO25390
  412.          DC        X'7CC1C2C3C4C5C6C7C8C9D1D2D3D4D5D6'                  TSO25400
  413.          DC        X'D7D8D9E2E3E4E5E6E7E8E9ADE0BD5F6D'                  TSO25410
  414.          DC        X'79818283848586878889919293949596'                  TSO25420
  415.          DC        X'979899A2A3A4A5A6A7A8A9C04FD0A107'                  TSO25430
  416. *THIS IS THE EBCDIC TO ASCII CONVERSION TABLE                           TSO25440
  417. *CHARACTERS NOT REPRESENTABLE IN ASCII ARE REPLACED BY A NULL           TSO25450
  418. ETOA     DC        X'000102030009007F0000000B0C0D0E0F'                  TSO25460
  419. *G       DC        X'1011121300000800181900001C1D1E1F'                  TSO25470
  420.          DC        X'10111213000D0800181900001C1D1E1F'                  TSO25480
  421.          DC        X'00000000000A171B0000000000050607'                  TSO25490
  422.          DC        X'0000160000000004000000001415001A'                  TSO25500
  423.          DC        X'20000000000000000000002E3C282B7C'                  TSO25510
  424.          DC        X'2600000000000000000021242A293B5E'                  TSO25520
  425.          DC        X'2D2F00000000000000007C2C255F3E3F'                  TSO25530
  426.          DC        X'000000000000000000603A2340273D22'                  TSO25540
  427.          DC        X'00616263646566676869007B00000000'                  TSO25550
  428.          DC        X'006A6B6C6D6E6F707172007D00000000'                  TSO25560
  429.          DC        X'007E737475767778797A0000005B0000'                  TSO25570
  430.          DC        X'000000000000000000000000005D0000'                  TSO25580
  431.          DC        X'7B414243444546474849000000000000'                  TSO25590
  432.          DC        X'7D4A4B4C4D4E4F505152000000000000'                  TSO25600
  433.          DC        X'5C00535455565758595A000000000000'                  TSO25610
  434.          DC        X'303132333435363738397C0000000000'                  TSO25620
  435. ************
  436.  
  437. ------------------------------
  438.  
  439. Date: Mon, 3 Nov 86 18:10:24 pst
  440. From: thobe@ee.UCLA.EDU (Glenn Thobe)
  441. Subject: "gotcha" in TSO Kermit
  442.  
  443. TSO Kermit v.1.1 appeared to be broken as file transfers would regularly
  444. fail at the same point in the transmission.  I was advised to enter the
  445. following TSO command:
  446.  
  447.     profile char(bs)
  448.  
  449. which totally fixed the problem.  Apparently anything other than "bs" for this
  450. profile parameter causes some character translation which interferes with the
  451. incoming data.  I hope this information will be of use to others. 
  452.  
  453. -Glenn Thobe
  454.  
  455. ------------------------------
  456.  
  457.