multiple browse windows and @bk

scooter6 at gmail.com scooter6 at gmail.com
Tue Sep 22 07:35:01 PDT 2009


Okay, this is a continuation of my previous thread where we're limiting
access to VIEW accts based on login, etc.
So, for now as you recall I decided to go in a little different direction. I
am copying over the data from the "master" file over to a replica file that
will only contain the records I need.  That part is all a-okay.

Now, in this "replica" file, I'm bulding multiple browse lookups and have
created a special menu, etc.
Everything works fine so far except one thing.
When you initially get to my data, there is a menu that is created from my
input processing.
It shows a browse window then will all the accts, etc.
Across the bottom, via a show statemen, there is "V" to view, "N" for notes,
"P" for Payments and "X" to Exit
That's fine.  So far, I've only put the processing in place to "V" view and
N for notes.
The problem is this - at this first browse lookup window, I hit "V" to view
and I get the "view" screen from the replica file.
When I hit "N" for notes, it clears the screen, and opens a browse window
with all the note records from a completely different file.
On the bottom of this browse, there is "V" to View and "X" to exit.
When I hit "V" to view the VERY FIRST TIME here, it shows me a blank "view"
screen from the replica file, NOT the notes file.  After hitting enter to
clear this screen, every subsequent time I hit "V" it shows the correct
"view" screen from the notes file.  Still with me?haha

Below is my input processing table.  I'm soooo close to getting this to
work, but obviously hit a stumbling block here.
Can anyone see what I'm missing here? Is this a bug in the @bk syntax or
what??
Help! (please)

Thanks
Scott


@menu :
           :: dim myiua(3)

            :
           :: myiua["1"]="Choose Search Option"

            :
           :: myiua["2"]="A:Search by PDM Acct Num"

            :
           :: myiua["3"]="B:Search by Last Name"

rptmnu  :
           :: cls("22")

            :
           :: menu myiua dosrch1, dosrch2

            :
           :: exit

dosrch1 :
           :: lookup act = PDMace k=3    i=A -nx b="(brw=12 xkey=nx
show=pkeep pop=1v prc=actn fill=asc,top) [ PDM Num       Name

            :
           ::                       Plcmt Bal        Payments          Curr
Balance]    *3                         *7
*20          *21          *22"

            :
           ::  aa(11,allup)=act(3)

            : @bk="N"
           :: clearp;goto notes

            : @bk="V"
           :: popup act,"1v";show "@";cls; clearp

            : @bk="X"
           :: puskey "xx"

            :
           :: end
 dosrch2 :
           :: lookup act = PDMace k=7    i=B -nx b="(brw=12 xkey=nx
show=pkeep pop=1v prc=name fill=asc,top) [ PDM Num       Name

            :
           ::                       Plcmt Bal        Payments          Curr
Balance]    *3                         *7
*20          *21          *22"

actn      :
           :: show "\r V \r to View \r N \r for Notes \r P \r for Payments
\r X \r to Exit"; end

 name    :
           :: show "\r V \r to View \r N \r for Notes \r P \r for Payments
\r X \r to Exit"; end

notes    :
           :: show "\r V \r to View or \r X \r to Quit"

            :
           :: lookup phc = notes k=aa   i=A  -Nxm b="(brw=12 xkey=vx
show=pkeep pop=view fill=asc,top) [PDM Num      Date             Time

            :
           ::      Comment1] *1                   *2
*3              *8"

            : @bk="V"
           :: popup phc,"view";show "@";clearp; goto notes

            : @bk="X"
           :: cls;clearp; goto dosrch1

            :
           :: end

Keeping in mind, I'm only looking at what happens when "notes" is called. I
realize the code isn't finishe for dosrch2, etc as well as "P" for Payments,
etc.
After lookup to notes, why doesn't  "@bk="V" call the corrrect screen from
the notes file when you FIRST hit V?  When you first hit "V" at line 22, you
get a blank screen from PDMace, not the notes file?? But, after that, the
correct "V" works and shows the view screen from the notes file??? I'm
confused by this???

Thanks for any help on this

Scott
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mailman.celestial.com/pipermail/filepro-list/attachments/20090922/34067124/attachment.html 


More information about the Filepro-list mailing list