Re: Can fortran clear the 3270 screen?

Gerhard Postpischil <[email protected]> Mon, 07 Jun 2010 02:22:54 -0400
Newsgroups gmane.comp.emulators.turnkey-mvs
Message-ID <[email protected]>
On 6/6/2010 10:37 PM, Ron Hudson wrote:
> Is there a way to clear the 3270 screen from fortran, without using
> fullscreen programming?

I'm not sure why you ask a question you already (should) know 
the answer to?  The TIOC will translate unprintable characters 
to a colon, SBA/SF/IC order all require an unprintable 
character. Q.E.D.

You need an assembler subroutine that issues a TPUT with the 
FULLSCR option, and appropriate text. Common is Write; SBA 
(1,1); ' '; RA (1,1,' '): IC which is screen size independent.
Use Erase Write or Erase/Write Alternate only if you know the 
screen geometry and size in use.

There are other methods (e.g., TSO macros); search the CBT files 
for CLEAR, CLEAR70, CLRSCRN, CLR3270, and any number of 
variations on the name (or look at file 1 online and search that).

Gerhard Postpischil
Bradford, VT