limiting browse based on login?

[Tom Aldridge]

 >
 > Today's Topics:
 >
 >    1. Re: limiting browse based on login? (fpgroups at gmail.com)
 >    2. RE: limiting browse based on login? (Bruce Easton)
 >

Possibly I missed things as I haven't read the entire thread, but it 
seems the creation of qualified files on-the-fly would be an answer. I'm 
a lightweight compared to the real experts on this list, but I've built 
many nice automated fp applications where all the data resides in one 
main file, but based on login, the appropriate records are quickly 
copied to a qualifier and then those records are made available via 
browse and control given to the user to do whatever you want to let them 
do with "those" records. Then the qualified records are copied back to 
the main file.

We own many restaurants, and our managers do everything from cash 
control to inventory and ordering to employee database functions and 
much more where we want to carefully control what records they have 
access to, but then want all the data back in one file for creating 
consolidated reports, etc. Works flawlessly day in and day out and the 
end users see and know nothing other than "their" stuff.

        . If: 
         .
        Then: showctr("23") "\r \KY \r-Cancel SCR" 
         .
  39  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   - 
-   -
        . If:                                 'build scremp qualifier 
         .
        Then: gosub bldemps 
         .
  40  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   - 
-   -
        . If:                                 'browse scremps 
         .
        Then: gosub getemps 
         .
  41  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   - 
-   -
        . If:                                 'screen control 
         .
        Then: screen ,21


getemps....

1025 -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
        . If:                    'qualified lookup based on store_no, 
key is st .
        Then: qq="scremps@"{store_no 
         .
1026 -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
        . If: 
         .
        Then: lookup emps=(qq)   k=st   i=B -nxm b="(brw=18,2,-1 
xkey=ocsktdjr s>


-- 
Tom Aldridge
Aldridge, Inc.
1661 N Water St, Suite 205
Milwaukee, WI 53202
o (414) 271-5050 x24
c (262) 893-1124
f (414) 271-5225
toma at aldridgeinc.com