开云体育

Joe,

?

Thats fine but in ?VM ?the console is not a 3270….

… if you use that code you will sometimes generate a wait.

Look at the source of the CLRSCRN module.

?

Dave

?

?

?

?

From: [email protected] <[email protected]> On Behalf Of Joe Monk
Sent: 24 January 2021 12:27
To: [email protected]
Subject: Re: [h390-vm] GCC under VM370 CMS

?

The actual code you want is ?x'1140403C40400013'.

?

In 3270 data stream, that means:

?

x'11': Set Buffer Address

x'4040': Row 1, Column 1

x'3c': Repeat to ?Address

x'4040: Row 1, Column 1

x'00': Character to write

x'13': Insert Cursor

?

So, ?starting at ?Row 1, Column 1, write hex 00 and repeat until Row 1, Column 1, then Insert the Cursor.

?

IOW, write hex '00' to every buffer location and put the cursor at row 1, column ?1. Note that ?because this starts and ends at R1C1 it ?is size independent, and so works on any size of screen.

?

Joe

?

On Sat, Jan 23, 2021 at 11:47 PM Mark Waterbury <mark.s.waterbury@...> wrote:

?	?
?	?
?
Hi, again, Tom, The first thing to understand is that in VM, with CMS, the "console" when it is a 3270 operates in two "modes" -- a line-at-a-time mode where it is emulating a keyboard printer (3215) type of console, and you can also use the CP DIAG x'58' facility to perform full-screen 3270 I/O. When you use DIAG x'58' you must supply the actual 3270 data stream.? You can find relevant manuals on bitsavers.? Let me know if you need more specific pointers on that. Tommy Sprinkle has created a nice tutorial on 3270 data streams here: ? ?? ? It was written for MVS, but the data streams part is the same; you will just be using DIAG x'58' vs. TSO TPUT/TGET ... The main feature you are looking for is called "Erase Write".? That's how you clear the screen. Note that, once you put the console into full-screen mode, CP expects all further interactions to remain "full-screen"...? you may want to revert to line-at-a-time mode, depending on your needs. Hope this helps (somewhat) ... All the best, Mark S. Waterbury