🚀 go-pugleaf

In article <QeyNFVq00UhW85rJ5K@andrew.cmu.edu>, William Matthew Beaver <wb1o+@andrew.cmu.edu> writes:
> 
> I am trying to take a list of records, display them in a column format,
> and create a new record in another table given whatever the user
> selects.  For example:
> 
> Customer Table
> Name            ID Number
> --------------------------
> Smith            9457
> Jones            0982
> Murphy           3920
>    .               .
>    .               .
> etc               etc
> 
> 
> When the user selects "Jones" that record is selected.  Then I want to
> create a record in a table [Projects] related by ID number. I want the
> input layout for [Projects] to come up immediately after the user double
> clicks in the [Customer] table layout. With the ID number inserted (as
> it sometimes does with the relation)
> 
> I think the problem lies in the fact that I'm trying to switch between
> files. I've tried selecting all the names and ID numbers into arrays
> with: 
> 
> selection into array([Customer]Cust_Name;AreaA;[Customer]Cust_ID;AreaB)
> 
> And then displaying the arrray with:  modify selection([Customer])
> 
> This is getting pretty ugly. Does anyone have any ideas as to how I can
> do this? Either with the file switching or with the arrays? Another
> (easier?) way.
> 
> ANY ideas would be greatly appreciated.
> 
> Thanks in advance,
> William M. Beaver
> Carnegie Mellon University
> 
Wiliam,
	When you use modify selection it is displaying the selection of records
directly from the file and not the arrays. Create a layout with the array
areas on it and use the dialog command to display it. 

Peter Amiri

There IS a way to use MODIFY SELECTION to have a list of records from one
file and programmatically jump to another file, it just gets a little messy
to implement first/prev/next/last buttons in the target file.

Basically, you have a BLANK input layout in the list file, with a proc
something like:

if (Before)
  lookup the [Projects] file based on this [Customer]
  call an edit procedure that does a MODIFY RECORD([Customer])
  CANCEL
end if

The CANCEL is so the current blank input layou exits before it is shown.

Andy Dent (A.D. Software - Mac & VAX programming)
94 Bermuda Dve, BALLAJURA  Western Australia  6066
Phone/Fax: 09 249 2719 (local)  +619 249 2719 (International)
       Internet: dent@DIALix.oz.au    Compuserve: 100033,3241