Re: Can fortran clear the 3270 screen?

I once had to clear the screen from a Fortran IV program.  I called the following assembler code:

CLEARSCR TITLE 'CLEARSCR - CLEAR 3270 SCREEN'

CLEARSCR CSECT

         SETREG 12,CODE=RENT

         STFSMODE ON,INITIAL=YES

         LTR   R2,R15

         BNZ   END

         TPUT  CLEAR,L'CLEAR,FULLSCR

         STFSMODE OFF

END      EOJ   RC=(2),LOG=NO

CLEAR    DC    X'C11140403C4040001140C113'

         END   CLEARSCR


Mark


--- In [email protected], Rick Fochtman <rfochtman@...> wrote:
>
>   --------------------------------<snip>------------------------------
> 
> >
> > > That's all true, but it's sort of like trying to take tonsils out
> > > via the rectum. Why would you want to?
> >
> > A vaginal hysterectomy v. an abdominal hysterectomy is probably a
> > more accurate comparison, although all medical comparisons are pretty
> > far afield.
> >
> > At least in the example I gave, it was on-point, and would indeed
> > perform the function expected.
> >
> ---------------------------------<unsnip>---------------------------------
> It's certainly workable and I won't dispute that point. But I have the 
> impression that Ron is not quite the Assembler programmer that you and I 
> might be. Let's  minimize the pain. :-)
> 
> Rick
>