Wouldn't you just define a CLS variable and display it?

This works.



     05 CLS.

       10 FILLER        PIC X VALUE ESCAPE.

       10 FILLER        PIC X VALUE "h".

       10 FILLER        PIC X VALUE ESCAPE.

       10 FILLER        PIC X VALUE "J".



-----Original Message-----

From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On Behalf Of Billy Brewer

Sent: Friday, April 20, 2018 7:11 PM

To: [log in to unmask]

Subject: [HP3000-L] Cobol code clear screen



I'm hoping this is a really simple request.  



How do you code in Cobol to go to home and clear screen before prompting for input -- thanks.



-Billy



* To join/leave the list, search archives, change list settings, *

* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _



The information contained in this transmission is confidential. It is

intended solely for the use of the individual(s) or organization(s) to

whom it is addressed. Any disclosure, copying or further distribution is

not permitted unless such privilege is explicitly granted in writing by

PCM, Inc. Furthermore, PCM, Inc. is not responsible for

the proper and complete transmission of the substance of this

communication, nor for any delay in its receipt.




* To join/leave the list, search archives, change list settings, *

* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *