HP3000 carriage return

25 May 99 15:34:42 -0400

--=_ORCL_4187906_0_0
Content-Transfer-Encoding:quoted-printable
Content-Type:text/plain; charset="iso-8859-1"

set ver err 
screen x 
file <file1> occurs 3 
FILE <file1> alias file2 secondary occurs with <file1> 
 access via <key> using <key> of <file1> 
;## Declaring this file as secondary will automatically initialize all of
the 
items 
;## to the primary file. 

cluster occurs with <file1> 
FIELD field1 OF <file1> 
FIELD field2 OF <file1> 
skip 2 
FIELD field1 of file2 DISPLAY 
FIELD field2 OF file2 DISPLAY 
CLUSTER 

When you enter values into the first two fields, they will automatically be 
displayed in the fields for file2, and you will be prompted only for the 
fields in file1. 

You may need to use the need option on file2 if no fields are explicitly 
changed in the procedure code or elsewhere on the screen. 

Hope this helps 

Ron Olenic 

The opinions expressed are my own and subject to change or even complete 
reversal without notice 

--=_ORCL_4187906_0_0
Content-Type:message/rfc822

Date: 25 May 99 15:05:59
From:RandMan666@aol.com
Sender:RandMan666@aol.com
To:OLENICR
Subject:Re: HP3000 carriage return
Return-Path:<RandMan666@aol.com>
Received:by mail.detroitedison.com with ESMTP id PAA13402 for <olenicr.iomail@infmail.serv.deco.com>; Tue, 25 May 1999 15:06:15 -0400 (EDT)
Received:from gate.detroit.deco.com ([162.9.102.35]) by icsmta2.serv.deco.com (Netscape Messaging Server 3.61) with SMTP id AAA7514 for <OLENICR@dteenergy.com>; Tue, 25 May 1999 15:06:14 -0400
Received:from saratoga.detroitedison.com ([198.87.80.13]) by gate.detroit.deco.com via smtpd (for [162.9.102.217]) with SMTP; 25 May 1999 19:06:14 UT
Received:from imo23.mx.aol.com ([198.81.17.67]) by mail2.detroitedison.com (Netscape Messaging Server 3.6)  with ESMTP id AAAC5A for <OLENICR@dteenergy.com>; Tue, 25 May 1999 15:06:12 -0400
Received:from RandMan666@aol.com (14392) by imo23.mx.aol.com (IMOv20) id oTAEa08612 for <OLENICR@dteenergy.com>; Tue, 25 May 1999 15:06:00 -0400 (EDT)
Message-ID:<21e66c6e.247c4e97@aol.com>
MIME-Version: 1.0
Content-Type:text/plain; charset=us-ascii
Content-Transfer-Encoding:7bit

I have a 10 occurence cluster of six data fields.  When I get to the last 
field in the first occurence, I use the data in the first occurence to do a 
look up to a reference file.  Depending on the values found in this
reference 
file, I want to simulate the user pressing carriage return 6 times in order 
to let the screen defaults/logic automatically populate the next occurence
in 
the cluster.  I have input and edit procedures already in place which 
populate the data when I manually press carriage return 6 times, one for
each 
field within the cluster.  So I am trying to get QUICK to automatically 
simulate the six carriage returns that invoke my written procedures for each 
field and populate the fields within the cluster.  Then I want the screen to 
be ready for the user to begin entering more data on the next occurence with 
the cluster.  If the conditions found in the reference file are not "right", 
I want the screen to simply prompt for data in the next occurence of the 
cluster.  I am just trying to save the user keystrokes while still employing 
the written procedures.  The screen still has to be flexible enough for the 
user to override the logic/defaults at any time.

I think the PUSH verb is the right track but it apprently does not work from 
within an ENTRY procedure until after it's finished.  Anyway, thanks for
your 
help so far and for any you can offer. 

--=_ORCL_4187906_0_0--

= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
This list is closed, thus to post to the list, you must be a subscriber.