HP3000-L Archives

November 2003, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Michael Anderson <[log in to unmask]>
Reply To:
Michael Anderson <[log in to unmask]>
Date:
Thu, 13 Nov 2003 10:05:12 -0600
Content-Type:
text/plain
Parts/Attachments:
text/plain (60 lines)
Your question was never very clear, I see what you're asking now, try
the following.

VTURNOFF

The VTURNOFF intrinsic turns off VPLUS block mode and enables character
mode access without disturbing the terminal screen. The syntax and
parameter descriptions for this intrinsic are provided below.

Syntax (COBOL)
   CALL "VTURNOFF" USING  COMAREA

I use this in-between parent/child processes. When a parent
create/activates a child the parent calls VTURNOFF, then ACTIVATE. The
child then starts up as normal, VOPEN form/term, init, show, read.....

When the child is ready to return control to the parent he calls
VTURNOFF, and ACTIVATES pin 0 (suspending it self), the parent then
calls VTURNON, and VSHOWFORM using "$REFRESH" as a form name, then
VREADFORM. Likewise, when the child is reactivated, VTURNON, SHOWFORM,
and read.



--
Michael Anderson
Spring Independent School District
16717 Ella Boulevard
Houston, Texas 77090-4299
office: 281.586.1105
fax: 281.586.1187
-

>>> Brian Donaldson <[log in to unmask]> 11/12/03 08:25PM >>>
All:

Thanks to all who responded.

Instead of calling VCLOSEFORMF and VCLOSETERM I do the following via
Reflection escape sequences:

Block mode OFF
Format mode OFF
Cursor home down
local echo OFF
SET ECHO=ON
Turn on display modes function keys
Memory lock OFF
Keyboard UNLOCK

This gives me exactly what I wanted.

Thanks!

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2