CallingInquiriesFromScrollingINPUTs < Main

Tags: view all tags
---+ Calling Inquiries from Scrolling INPUTs

_"I have a scrolling INPUT on a set of data. I would like the Automatic Child to jump to a full screen display of the full set of data. I have an existing INQUIRY that has the exact look and feel of what I want, and the users are familiar with this screen. How can I reuse this existing INQUIRY? (A simple Automatic Child doesn't work.)"_

---++++ Solution:

<span style="font-family: Arial; font-size: x-small;"> </span>
   1 <span style="font-family: Arial; font-size: x-small;">Before invoking the INQUIRY, set </span><span style="font-family: Courier New; font-size: x-small;">--- PROCESS CODE</span><span style="font-family: Arial; font-size: x-small;"> to "</span><span style="font-family: Courier New; font-size: x-small;">DISP"</span><span style="font-family: Arial; font-size: x-small;">.<br /> </span>
   1 <span style="font-family: Arial; font-size: x-small;">In the Key Entry frame's Global Pre-Display event point, execute:</span>
<span style="font-family: Arial; font-size: x-small;"> </span>
<pre>      *
      *         RETURN to Display, 1st time thru
      *
      IF       --- PROCESS CODE               EQ     DISP
T     SET      --- OPTION                     =      RETURN
T     SET      --- PROCESS CODE               =      DONE
      *
      *         END to go back to INPUT, 2nd time thru
      *
F     IF       --- PROCESS CODE               EQ     DONE
FT    SET      --- OPTION                     =      END</pre>

<em><span style="font-family: Arial; font-size: x-small;"> </span></em>

_(All this can be done in a SUBR, called from Key Entry's Global Pre-Display event point.)_

<span style="font-family: Arial; font-size: x-small;"> </span>

When the INQUIRY starts, PROCESS CODE is DISP, so the KEY ENTRY frame is skipped. Since the INQUIRY is constrained to one record, it displays only that record from the INPUT.

When the user presses ENTER or END after viewing the data, Key Entry executes again, but since PROCESS CODE is now DONE, it sets OPTION to END. INQUIRY ends, and control is returned to the parent.
---++ Comments:

_Read what other users have said about this page or add your own comments._
---

<br />%COMMENT%
Topic revision: r1 - 2012-02-29 - ChrisBrower