On Sun, 3 Oct 2010 09:35:34 -0500, Shmuel Metz (Seymour J.) <shmuel+ibm-
m...@patriot.net> wrote:
>In <listserv%201009261001091711.0...@bama.ua.edu>, on 09/26/2010
> at 10:01 AM, Paul Edwards <mutazi...@gmail.com> said:
>
>>2. This writes to a 3215 console (only), not 3270 - do
>>real machines typically have PC emulators attached
>>that can be made to emulate 3215?
>
>No. Real machines had 1052-7, 3210 and 3215 devices back when they
>were part of the operators' console, but once IBM switched to a 3270
>interface they became much less common, and they were probably dead
>long before the HMC came on the scene.
I have been told that telnet is effectively TN3215, even
though it's not called that.
Regardless, my app is doing a CCW x'09' (write with
automatic carriage return and CCW x'0A' (read inquiry).
I don't know what magic happens after the x'09' CCW
is executed, but surely a PC can handle this basic
line mode communication in lieu of the 3270
sophistication?
BFN. Paul.
P.S. some miscellaneous output from latest development ...
rem this is an example autoexec.bat
dir
echo about to run world
world aBc DeF
echo finished running world
echo
dumpblk 0 1 1
02:36:15 welcome to pcomm
02:36:15 pcomm is calling dir
02:36:15 SVC code is 120
02:36:15 SVC code is 42
02:36:15 got request to run DIR
02:36:15 parameter string is 0 bytes
02:36:15 PLOAD.SYS
02:36:15 PDOS.SYS
02:36:15 CONFIG.SYS
02:36:15 COMMAND.EXE
02:36:15 AUTOEXEC.BAT
02:36:15 WORLD.EXE
02:36:15 SVC code is 1
02:36:15 SVC code is 62
SVC code is 10
welcome to my world
argc = 3
arg 0 is <>
arg 1 is <aBc>
arg 2 is <DeF>
looping for a while
finished looping
SVC code is 10
SVC code is 120
SVC code is 120
SVC code is 20
SVC code is 120
SVC code is 10
SVC code is 10
SVC code is 120
SVC code is 120
SVC code is 20
SVC code is 120
SVC code is 10
SVC code is 10
SVC code is 120
SVC code is 120
SVC code is 20
SVC code is 120
SVC code is 10
SVC code is 120
SVC code is 120
SVC code is 3
SVC code is 1
SVC code is 62
SVC code is 10
rc from program is 5
finished running world
dumping cylinder 0, head 1, record 1
000000 000C0000 80000400 00000000 00000000 ................
000010 00000000 00000000 00000000 00000000 ................
000020 00000000 00000000 00000000 00000000 ................
...
0003B0 00000000 00000000 00000000 00000000 ................
0003C0 00000000 00000000 00000000 00000000 ................
0003D0 00000000 00000000 00000000 00000000 ................
0003E0 00000000 00000000 00000000 00000000 ................
0003F0 00000000 00000000 00000000 00000000 ................
000400 05C006C0 06C0D207 0078C058 D2070070 .{.{.{K...{.K...
000410 C060D207 0060C068 D2070068 C0701FAA {-K..-{.K...{...
000420 BFAF00B8 4130C078 50300048 41400001 ......{.&.... ..
000430 5850C048 41600001 41700002 9C00A000 .&{..-..........
000440 8200C050 00000000 00004814 00000000 b.{&............
000450 020E0000 00000000 000C0000 800004A4 ...............u
000460 000E0000 00000111 000E0000 00000222 ................
000470 000E0000 00000333 07000498 40000006 ...........q ...
000480 3100049E 40000005 08000480 00000000 .... ...........
000490 06004814 20007FFF 00000000 00010000 ......".........
0004A0 00010200 5A50C120 BE57C091 41770001 ....!&A...{j....
0004B0 5970C124 4740C0C0 41700001 41660001 ..A.. {{........
0004C0 4270C0A2 BE63C09C BE63C0A0 41440001 ..{s..{...{.....
0004D0 5940C128 4720C0E0 9C00A000 8200C050 . A...{\....b.{&
0004E0 8200C0E8 00000000 000C0000 800004F8 b.{Y...........8
0004F0 000E0000 00000444 58D0C12C 41200000 .........}A.....
000500 502D0004 182D5A20 C130502D 004C4110 &.....!.A.&..<..
000510 C13858F0 C13405EF 8200C0F0 00000000 A..0A...b.{0....
000520 00004814 00000004 00000028 00080000 ................
000530 00000078 00000800 0000053C 00000000 ................
000540 00000004 00100000 D7C4D7C3 D3C9C25A ........PDPCLIB!
000550 00000000 00000000 00000000 00000000 ................
000560 00000000 00000000 00000000 00000000 ................
000570 00000000 00000000 00000000 00000000 ................
000580 00000000 00000000 00000000 00000000 ................
000590 00000000 00000000 00000000 00000000 ................
0005A0 00000000 00000000 00000000 00000000 ................
...
0007C0 00000000 00000000 00000000 00000000 ................
0007D0 00000000 00000000 00000000 00000000 ................
0007E0 00000000 00000000 00000000 00000000 ................
0007F0 00000000 E9C1D7C3 D6D5E2D3 00000000 ....ZAPCONSL....
000800 47F0F00C 067C7CC3 D9E3F000 90ECD00C .00..@@CRT0...}.
000810 18CF58FD 004C50DF 000450FD 000818DF .....<&...&.....
000820 5AF0C030 50FD004C 47F0C034 00000000 !0{.&..<.0{.....
000830 00000078 05C018B1 41CC0000 41200000 .....{..........
000840 5020D048 4120D130 5020D04C 4170D068 &.}...J.&.}<..}.
000850 50E0D068 5830C0BA 1A235027 000C4120 &\}...{...&.....
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
