Jumping from file to file?

[Richard Kreiss]

> -----Original Message-----
> From: Filepro-list [mailto:filepro-list-
> bounces+rkreiss=verizon.net at lists.celestial.com] On Behalf Of
> melancon at cajun.net
> Sent: Wednesday, April 01, 2015 5:00 PM
> To: filepro-list at lists.celestial.com
> Subject: Jumping from file to file?
> 
> Window Server
> FilePro 5.0.14DN9
> 
> I have three FilePro files named Roll, Can and Mill.  Is there a command
that
> will allow me in processing "when leaving a field" to jump from one file
to
> another file to a certain screen and field?
> 
> I would like to input information into the Roll file, save it to a record
and then
> jump to Scree "2" in the Can file to enter more data and save.
> The last stop would be to jump to Screen "2" of the Mill file, save and
then
> jump back to the Roll file.
> 
> Is this possible?
> 
> Thanks,
> 
> Henry W. Melancon
> Gulf Island, LLC

You can use popup update () to bring up a screen from one of these files or
create a screen with dummy fields and then post to the correct file.  This
method would allow you to control the location of the popup and the user
never leaves the current file.

I use this method as I can popup the proper screen based on the value on the
current field.

>From current help file"

│v4.0    POPUP [(r,c)] UPDATE lookup,scr [,f]  - Display and go into update
│                mode on a screen from the lookup file, or - for the current
│                file, at the specified location. The cursor will be placed
│                in the specified field, or the first field of the popup if
│                the field is omitted. If the location is omitted, the popup
│                will be centered on the screen.
│
│Note: Event processing will only execute on a "POPUP UPDATE -" statement.
│Examples:
│        if: ' @WEF/@WLF/@WHP/@WUK/@WBL events will execute.
│      then: POPUP UPDATE -,"dtl","33"
│        if: @SK eq "SAVE"       ' User pressed  F10  or ESCAPE executed.
│      then: clearp; goto thetop ' Otherwise, the user pressed  ESC .
│
│if: ' @WEF/@WLF/@WHP/@WUK/@WBL events will NOT execute.
│      then: lookup myfile k=ky -nxp
│      then: POPUP ("1","-1") UPDATE myfile,"xyz",(fn)


Richard Kreiss
GCC Consulting

Office: 410-653-2813