| Title: | FOCUS, from INFORMATION BUILDERS | 
| Moderator: | ZAYIUS::BROUILLETTE | 
| Created: | Thu Feb 19 1987 | 
| Last Modified: | Mon May 05 1997 | 
| Last Successful Update: | Fri Jun 06 1997 | 
| Number of topics: | 615 | 
| Total number of notes: | 1779 | 
    It's been a couple of years since I used FOCUS, so I'm s little
    rusty...
    
    I need to know how to join a hold file to a .FOC file.  The application
    I'm modifying previously had reference data manually entered into it.
    The application created a reference data file using a BASIC program.
    This reference datafile was converted by a fex (via MODIFY) to a .FOC
    file, so that it could be joined to other FOCUS datafiles for
    reporting.
    
    Now, so the users don't have to manual entering this reference data, I am
    creating an extract from the AM03, and storing it as a hold file.  What
    would be the best way to extract the data so that it can be stored as a
    FOCUS file to be joined to other datafiles?
    
    John
    
| T.R | Title | User | Personal Name | Date | Lines | 
|---|---|---|---|---|---|
| 422.1 | JOINERY | GERBIL::BAMFORTH | Thu Jun 06 1991 13:53 | 45 | |
|     
    If you are using a V6.* version of FOCUS, the best way would be to
    create a FOCUS file in the following manner. 
    
    
                  TABLE FILE AM1001 
                     PRINT FLDA FLDB FLDC ...
                     BY CCTR_BKCTR 
    -->           ON TABLE HOLD AS AM03EXTR FORMAT FOCUS INDEX CCTR_BKCTR
                  END 
    
    
    This will create a .FOC file (AM03EXTR.FOC) containing all of the
    PRINTed fields, keyed by the object of the BY PHRASE (CCTR_BKCTR).
    
    Additionally, we've instructed FOCUS to INDEX the KEY field.  This is 
    important to avoid any "from field/to field out of sequence" type
    errors when joining to this file. 
    
    Once you've created this file, simply JOIN to it from your other data
    files.
    
    e.g.      JOIN COST_CTR IN OTHRFILE TO CCTR_BKCTR IN AM03EXTR AS J1 
    
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
    If you are using a pre- V6.0 version of FOCUS, you'll have to take a
    two-step approach.  
    
          1)       TABLE FILE AM1001 
                      PRINT FLDA FLDB FLDC ... 
                      BY CCTR_BKCTR 
                   ON TABLE HOLD 
                   END 
    
    
          2)       MODIFY FILE AM03EXTR                NOTE: You'll have to 
                    FIXFORM FROM HOLD                  create the AM03EXTR.MAS
                    MATCH CCTR_BKCTR                   to correspond to the 
                       ON MATCH UPDATE *               fields (use same names)
                       ON NOMATCH INCLUDE              being loaded from AM1001
                    DATA ON HOLD 
                    END 
    
    
 | |||||