* REFERENCES FOR RECORD @HTPEOPLE  People                                                                                                                                                                                     
      * Field              From    To Desc                                                                                                                                                                                          
      * HTLASTN     64        1    64 "Last Name"                                                                                                                                                                                   
      * HTFIRST     64       65   128 "First Name"                                                                                                                                                                                  
      * HTSPOUS     64      129   192 "Spouse"                                                                                                                                                                                      
      * HTADDRES   128      193   320 "Address"                                                                                                                                                                                     
      * HTCITY      64      321   384 "City"                                                                                                                                                                                        
      * HTSTATE      8      385   392 "State"                                                                                                                                                                                       
      * HTZIP       16      393   408 "ZIP"                                                                                                                                                                                         
      * HTCOMMUN   128      409   536 "Community"                                                                                                                                                                                   
      * HTHPHONE    16      537   552 "Home Phone"                                                                                                                                                                                  
      * HTCPHONEMR  16      553   568 "Cell Phone Mr"                                                                                                                                                                               
      * HTCPHONEMS  16      569   584 "Cell Phone Mrs."                                                                                                                                                                             
      * HTWPHONEMS  16      585   600 "Work Phone Mrs"                                                                                                                                                                              
      * HTWPHONEMR  16      601   616 "Work Phone Mr"                                                                                                                                                                               
      * HTREF       16      617   632 "Referrer By"                                                                                                                                                                                 
      * I SPECS FOR A FILE @HTPEOPLE  People                                                                                                                                                                                        
      * "Last Name"                                                                                                                                                                                                                 
     I                                        1  64 HTLAST                                                                                                                                                                          
      * "First Name"                                                                                                                                                                                                                
     I                                       65 128 HTFIRS                                                                                                                                                                          
      * "Spouse"                                                                                                                                                                                                                    
     I                                      129 192 HTSPOU                                                                                                                                                                          
      * "Address"                                                                                                                                                                                                                   
     I                                      193 320 HTADDR                                                                                                                                                                          
      * "City"                                                                                                                                                                                                                      
     I                                      321 384 HTCITY                                                                                                                                                                          
      * "State"                                                                                                                                                                                                                     
     I                                      385 392 HTSTAT                                                                                                                                                                          
      * "ZIP"                                                                                                                                                                                                                       
     I                                      393 408 HTZIP                                                                                                                                                                           
      * "Community"                                                                                                                                                                                                                 
     I                                      409 536 HTCOMM                                                                                                                                                                          
      * "Home Phone"                                                                                                                                                                                                                
     I                                      537 552 HTHPHO                                                                                                                                                                          
      * "Cell Phone Mr"                                                                                                                                                                                                             
     I                                      553 568 HTCPHO                                                                                                                                                                          
      * "Cell Phone Mrs."                                                                                                                                                                                                           
     I                                      569 584 HTCPHO                                                                                                                                                                          
      * "Work Phone Mrs"                                                                                                                                                                                                            
     I                                      585 600 HTWPHO                                                                                                                                                                          
      * "Work Phone Mr"                                                                                                                                                                                                             
     I                                      601 616 HTWPHO                                                                                                                                                                          
      * "Referrer By"                                                                                                                                                                                                               
     I                                      617 632 HTREF                                                                                                                                                                           
      * *LIKE DEFINITIONS RECORD @HTPEOPLE  People                                                                                                                                                                                  
     C           *LIKE     DEFN HTLAST      LAST                                                                                                                                                                                    
     C           *LIKE     DEFN HTFIRS      FIRS                                                                                                                                                                                    
     C           *LIKE     DEFN HTSPOU      SPOU                                                                                                                                                                                    
     C           *LIKE     DEFN HTADDR      ADDR                                                                                                                                                                                    
     C           *LIKE     DEFN HTCITY      CITY                                                                                                                                                                                    
     C           *LIKE     DEFN HTSTAT      STAT                                                                                                                                                                                    
     C           *LIKE     DEFN HTZIP       ZIP                                                                                                                                                                                     
     C           *LIKE     DEFN HTCOMM      COMM                                                                                                                                                                                    
     C           *LIKE     DEFN HTHPHO      HPHO                                                                                                                                                                                    
     C           *LIKE     DEFN HTCPHO      CPHO                                                                                                                                                                                    
     C           *LIKE     DEFN HTCPHO      CPHO                                                                                                                                                                                    
     C           *LIKE     DEFN HTWPHO      WPHO                                                                                                                                                                                    
     C           *LIKE     DEFN HTWPHO      WPHO                                                                                                                                                                                    
     C           *LIKE     DEFN HTREF       REF                                                                                                                                                                                     
      * A APECS FOR RECORD @HTPEOPLE  People                                                                                                                                                                                        
                R @HTPEOPLE                 TEXT('People')                                                                                                                                                                          
                  LASTN         64A         TEXT('Last Name')                                                                                                                                                                       
                                            COLHDG('HTLASTN')                                                                                                                                                                       
                  FIRST         64A         TEXT('First Name')                                                                                                                                                                      
                                            COLHDG('HTFIRST')                                                                                                                                                                       
                  SPOUS         64A         TEXT('Spouse')                                                                                                                                                                          
                                            COLHDG('HTSPOUS')                                                                                                                                                                       
                  ADDRES       128A         TEXT('Address')                                                                                                                                                                         
                                            COLHDG('HTADDRES')                                                                                                                                                                      
                  CITY          64A         TEXT('City')                                                                                                                                                                            
                                            COLHDG('HTCITY')                                                                                                                                                                        
                  STATE          8A         TEXT('State')                                                                                                                                                                           
                                            COLHDG('HTSTATE')                                                                                                                                                                       
                  ZIP           16A         TEXT('ZIP')                                                                                                                                                                             
                                            COLHDG('HTZIP')                                                                                                                                                                         
                  COMMUN       128A         TEXT('Community')                                                                                                                                                                       
                                            COLHDG('HTCOMMUN')                                                                                                                                                                      
                  HPHONE        16A         TEXT('Home Phone')                                                                                                                                                                      
                                            COLHDG('HTHPHONE')                                                                                                                                                                      
                  CPHONEMR      16A         TEXT('Cell Phone Mr')                                                                                                                                                                   
                                            COLHDG('HTCPHONEMR')                                                                                                                                                                    
                  CPHONEMS      16A         TEXT('Cell Phone Mrs.')                                                                                                                                                                 
                                            COLHDG('HTCPHONEMS')                                                                                                                                                                    
                  WPHONEMS      16A         TEXT('Work Phone Mrs')                                                                                                                                                                  
                                            COLHDG('HTWPHONEMS')                                                                                                                                                                    
                  WPHONEMR      16A         TEXT('Work Phone Mr')                                                                                                                                                                   
                                            COLHDG('HTWPHONEMR')                                                                                                                                                                    
                  REF           16A         TEXT('Referrer By')                                                                                                                                                                     
                                            COLHDG('HTREF')                                                                                                                                                                         
      * CLEAR RECORD @HTPEOPLE  People                                                                                                                                                                                              
      * HTLAST  64   "Last Name"                                                                                                                                                                                                    
     c                   MOVEL     *Blanks       HTLASTN                                                                                                                                                                            
      * HTFIRS  64   "First Name"                                                                                                                                                                                                   
     c                   MOVEL     *Blanks       HTFIRST                                                                                                                                                                            
      * HTSPOU  64   "Spouse"                                                                                                                                                                                                       
     c                   MOVEL     *Blanks       HTSPOUS                                                                                                                                                                            
      * HTADDR 128   "Address"                                                                                                                                                                                                      
     c                   MOVEL     *Blanks       HTADDRES                                                                                                                                                                           
      * HTCITY  64   "City"                                                                                                                                                                                                         
     c                   MOVEL     *Blanks       HTCITY                                                                                                                                                                             
      * HTSTAT   8   "State"                                                                                                                                                                                                        
     c                   MOVEL     *Blanks       HTSTATE                                                                                                                                                                            
      * HTZIP   16   "ZIP"                                                                                                                                                                                                          
     c                   MOVEL     *Blanks       HTZIP                                                                                                                                                                              
      * HTCOMM 128   "Community"                                                                                                                                                                                                    
     c                   MOVEL     *Blanks       HTCOMMUN                                                                                                                                                                           
      * HTHPHO  16   "Home Phone"                                                                                                                                                                                                   
     c                   MOVEL     *Blanks       HTHPHONE                                                                                                                                                                           
      * HTCPHO  16   "Cell Phone Mr"                                                                                                                                                                                                
     c                   MOVEL     *Blanks       HTCPHONEMR                                                                                                                                                                         
      * HTCPHO  16   "Cell Phone Mrs."                                                                                                                                                                                              
     c                   MOVEL     *Blanks       HTCPHONEMS                                                                                                                                                                         
      * HTWPHO  16   "Work Phone Mrs"                                                                                                                                                                                               
     c                   MOVEL     *Blanks       HTWPHONEMS                                                                                                                                                                         
      * HTWPHO  16   "Work Phone Mr"                                                                                                                                                                                                
     c                   MOVEL     *Blanks       HTWPHONEMR                                                                                                                                                                         
      * HTREF   16   "Referrer By"                                                                                                                                                                                                  
     c                   MOVEL     *Blanks       HTREF                                                                                                                                                                              
      * FILLIN RECORD @HTPEOPLE  People                                                                                                                                                                                             
      * HTLAST  64   "Last Name"                                                                                                                                                                                                    
     c                   MOVEL(P)                HTLASTN                                                                                                                                                                            
      * HTFIRS  64   "First Name"                                                                                                                                                                                                   
     c                   MOVEL(P)                HTFIRST                                                                                                                                                                            
      * HTSPOU  64   "Spouse"                                                                                                                                                                                                       
     c                   MOVEL(P)                HTSPOUS                                                                                                                                                                            
      * HTADDR 128   "Address"                                                                                                                                                                                                      
     c                   MOVEL(P)                HTADDRES                                                                                                                                                                           
      * HTCITY  64   "City"                                                                                                                                                                                                         
     c                   MOVEL(P)                HTCITY                                                                                                                                                                             
      * HTSTAT   8   "State"                                                                                                                                                                                                        
     c                   MOVEL(P)                HTSTATE                                                                                                                                                                            
      * HTZIP   16   "ZIP"                                                                                                                                                                                                          
     c                   MOVEL(P)                HTZIP                                                                                                                                                                              
      * HTCOMM 128   "Community"                                                                                                                                                                                                    
     c                   MOVEL(P)                HTCOMMUN                                                                                                                                                                           
      * HTHPHO  16   "Home Phone"                                                                                                                                                                                                   
     c                   MOVEL(P)                HTHPHONE                                                                                                                                                                           
      * HTCPHO  16   "Cell Phone Mr"                                                                                                                                                                                                
     c                   MOVEL(P)                HTCPHONEMR                                                                                                                                                                         
      * HTCPHO  16   "Cell Phone Mrs."                                                                                                                                                                                              
     c                   MOVEL(P)                HTCPHONEMS                                                                                                                                                                         
      * HTWPHO  16   "Work Phone Mrs"                                                                                                                                                                                               
     c                   MOVEL(P)                HTWPHONEMS                                                                                                                                                                         
      * HTWPHO  16   "Work Phone Mr"                                                                                                                                                                                                
     c                   MOVEL(P)                HTWPHONEMR                                                                                                                                                                         
      * HTREF   16   "Referrer By"                                                                                                                                                                                                  
     c                   MOVEL(P)                HTREF                                                                                                                                                                              
      * FILLIN RECORD @HTPEOPLE  People                                                                                                                                                                                             
      * HTLAST  64   "Last Name"                                                                                                                                                                                                    
     c                   MOVEL(P)  HTLASTN                                                                                                                                                                                          
      * HTFIRS  64   "First Name"                                                                                                                                                                                                   
     c                   MOVEL(P)  HTFIRST                                                                                                                                                                                          
      * HTSPOU  64   "Spouse"                                                                                                                                                                                                       
     c                   MOVEL(P)  HTSPOUS                                                                                                                                                                                          
      * HTADDR 128   "Address"                                                                                                                                                                                                      
     c                   MOVEL(P)  HTADDRES                                                                                                                                                                                         
      * HTCITY  64   "City"                                                                                                                                                                                                         
     c                   MOVEL(P)  HTCITY                                                                                                                                                                                           
      * HTSTAT   8   "State"                                                                                                                                                                                                        
     c                   MOVEL(P)  HTSTATE                                                                                                                                                                                          
      * HTZIP   16   "ZIP"                                                                                                                                                                                                          
     c                   MOVEL(P)  HTZIP                                                                                                                                                                                            
      * HTCOMM 128   "Community"                                                                                                                                                                                                    
     c                   MOVEL(P)  HTCOMMUN                                                                                                                                                                                         
      * HTHPHO  16   "Home Phone"                                                                                                                                                                                                   
     c                   MOVEL(P)  HTHPHONE                                                                                                                                                                                         
      * HTCPHO  16   "Cell Phone Mr"                                                                                                                                                                                                
     c                   MOVEL(P)  HTCPHONEMR                                                                                                                                                                                       
      * HTCPHO  16   "Cell Phone Mrs."                                                                                                                                                                                              
     c                   MOVEL(P)  HTCPHONEMS                                                                                                                                                                                       
      * HTWPHO  16   "Work Phone Mrs"                                                                                                                                                                                               
     c                   MOVEL(P)  HTWPHONEMS                                                                                                                                                                                       
      * HTWPHO  16   "Work Phone Mr"                                                                                                                                                                                                
     c                   MOVEL(P)  HTWPHONEMR                                                                                                                                                                                       
      * HTREF   16   "Referrer By"                                                                                                                                                                                                  
     c                   MOVEL(P)  HTREF                                                                                                                                                                                            
      * FILLIN RECORD @HTPEOPLE  People                                                                                                                                                                                             
      * HTLAST  64   "Last Name"                                                                                                                                                                                                    
     c                   MOVEL(P)  HTLASTN       HTLASTN                                                                                                                                                                            
      * HTFIRS  64   "First Name"                                                                                                                                                                                                   
     c                   MOVEL(P)  HTFIRST       HTFIRST                                                                                                                                                                            
      * HTSPOU  64   "Spouse"                                                                                                                                                                                                       
     c                   MOVEL(P)  HTSPOUS       HTSPOUS                                                                                                                                                                            
      * HTADDR 128   "Address"                                                                                                                                                                                                      
     c                   MOVEL(P)  HTADDRES      HTADDRES                                                                                                                                                                           
      * HTCITY  64   "City"                                                                                                                                                                                                         
     c                   MOVEL(P)  HTCITY        HTCITY                                                                                                                                                                             
      * HTSTAT   8   "State"                                                                                                                                                                                                        
     c                   MOVEL(P)  HTSTATE       HTSTATE                                                                                                                                                                            
      * HTZIP   16   "ZIP"                                                                                                                                                                                                          
     c                   MOVEL(P)  HTZIP         HTZIP                                                                                                                                                                              
      * HTCOMM 128   "Community"                                                                                                                                                                                                    
     c                   MOVEL(P)  HTCOMMUN      HTCOMMUN                                                                                                                                                                           
      * HTHPHO  16   "Home Phone"                                                                                                                                                                                                   
     c                   MOVEL(P)  HTHPHONE      HTHPHONE                                                                                                                                                                           
      * HTCPHO  16   "Cell Phone Mr"                                                                                                                                                                                                
     c                   MOVEL(P)  HTCPHONEMR    HTCPHONEMR                                                                                                                                                                         
      * HTCPHO  16   "Cell Phone Mrs."                                                                                                                                                                                              
     c                   MOVEL(P)  HTCPHONEMS    HTCPHONEMS                                                                                                                                                                         
      * HTWPHO  16   "Work Phone Mrs"                                                                                                                                                                                               
     c                   MOVEL(P)  HTWPHONEMS    HTWPHONEMS                                                                                                                                                                         
      * HTWPHO  16   "Work Phone Mr"                                                                                                                                                                                                
     c                   MOVEL(P)  HTWPHONEMR    HTWPHONEMR                                                                                                                                                                         
      * HTREF   16   "Referrer By"                                                                                                                                                                                                  
     c                   MOVEL(P)  HTREF         HTREF                                                                                                                                                                              
      * FILLIN3 RECORD @HTPEOPLE  People                                                                                                                                                                                            
     c                   MOVEL(P)    HTLASTN     HTLASTN                                                                                                                                                                            
     c                   MOVEL(P)    HTFIRST     HTFIRST                                                                                                                                                                            
     c                   MOVEL(P)    HTSPOUS     HTSPOUS                                                                                                                                                                            
     c                   MOVEL(P)    HTADDRES    HTADDRES                                                                                                                                                                           
     c                   MOVEL(P)    HTCITY      HTCITY                                                                                                                                                                             
     c                   MOVEL(P)    HTSTATE     HTSTATE                                                                                                                                                                            
     c                   MOVEL(P)    HTZIP       HTZIP                                                                                                                                                                              
     c                   MOVEL(P)    HTCOMMUN    HTCOMMUN                                                                                                                                                                           
     c                   MOVEL(P)    HTHPHONE    HTHPHONE                                                                                                                                                                           
     c                   MOVEL(P)    HTCPHONEMR  HTCPHONEMR                                                                                                                                                                         
     c                   MOVEL(P)    HTCPHONEMS  HTCPHONEMS                                                                                                                                                                         
     c                   MOVEL(P)    HTWPHONEMS  HTWPHONEMS                                                                                                                                                                         
     c                   MOVEL(P)    HTWPHONEMR  HTWPHONEMR                                                                                                                                                                         
     c                   MOVEL(P)    HTREF       HTREF                                                                                                                                                                              
      * FILLIN RECORD @HTPEOPLE  People                                                                                                                                                                                             
      * HTLAST  64   "Last Name"                                                                                                                                                                                                    
     C                     MOVELHTLASTN                                                                                                                                                                                             
      * HTFIRS  64   "First Name"                                                                                                                                                                                                   
     C                     MOVELHTFIRST                                                                                                                                                                                             
      * HTSPOU  64   "Spouse"                                                                                                                                                                                                       
     C                     MOVELHTSPOUS                                                                                                                                                                                             
      * HTADDR 128   "Address"                                                                                                                                                                                                      
     C                     MOVELHTADDRES                                                                                                                                                                                            
      * HTCITY  64   "City"                                                                                                                                                                                                         
     C                     MOVELHTCITY                                                                                                                                                                                              
      * HTSTAT   8   "State"                                                                                                                                                                                                        
     C                     MOVELHTSTATE                                                                                                                                                                                             
      * HTZIP   16   "ZIP"                                                                                                                                                                                                          
     C                     MOVELHTZIP                                                                                                                                                                                               
      * HTCOMM 128   "Community"                                                                                                                                                                                                    
     C                     MOVELHTCOMMUN                                                                                                                                                                                            
      * HTHPHO  16   "Home Phone"                                                                                                                                                                                                   
     C                     MOVELHTHPHONE                                                                                                                                                                                            
      * HTCPHO  16   "Cell Phone Mr"                                                                                                                                                                                                
     C                     MOVELHTCPHONEMR                                                                                                                                                                                          
      * HTCPHO  16   "Cell Phone Mrs."                                                                                                                                                                                              
     C                     MOVELHTCPHONEMS                                                                                                                                                                                          
      * HTWPHO  16   "Work Phone Mrs"                                                                                                                                                                                               
     C                     MOVELHTWPHONEMS                                                                                                                                                                                          
      * HTWPHO  16   "Work Phone Mr"                                                                                                                                                                                                
     C                     MOVELHTWPHONEMR                                                                                                                                                                                          
      * HTREF   16   "Referrer By"                                                                                                                                                                                                  
     C                     MOVELHTREF                                                                                                                                                                                               
      * REFFLDS FOR RECORD @HTPEOPLE  People                                                                                                                                                                                        
                  HTLASTN   R               REFFLD(@HTPEOPLE/HTLASTN -                                                                                                                                                              
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTFIRST   R               REFFLD(@HTPEOPLE/HTFIRST -                                                                                                                                                              
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTSPOUS   R               REFFLD(@HTPEOPLE/HTSPOUS -                                                                                                                                                              
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTADDRES  R               REFFLD(@HTPEOPLE/HTADDRES -                                                                                                                                                             
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTCITY    R               REFFLD(@HTPEOPLE/HTCITY -                                                                                                                                                               
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTSTATE   R               REFFLD(@HTPEOPLE/HTSTATE -                                                                                                                                                              
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTZIP     R               REFFLD(@HTPEOPLE/HTZIP -                                                                                                                                                                
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTCOMMUN  R               REFFLD(@HTPEOPLE/HTCOMMUN -                                                                                                                                                             
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTHPHONE  R               REFFLD(@HTPEOPLE/HTHPHONE -                                                                                                                                                             
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTCPHONEMRR               REFFLD(@HTPEOPLE/HTCPHONEMR -                                                                                                                                                           
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTCPHONEMSR               REFFLD(@HTPEOPLE/HTCPHONEMS -                                                                                                                                                           
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTWPHONEMSR               REFFLD(@HTPEOPLE/HTWPHONEMS -                                                                                                                                                           
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTWPHONEMRR               REFFLD(@HTPEOPLE/HTWPHONEMR -                                                                                                                                                           
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
                  HTREF     R               REFFLD(@HTPEOPLE/HTREF -                                                                                                                                                                
                                            *LIBL/HTPEOPLEPF)                                                                                                                                                                       
      * *LIKE DEFINE FILL IN ALL @HTPEOPLE  People                                                                                                                                                                                  
      * HTLASTN     64   "Last Name"                                                                                                                                                                                                
     C     *Like         Define    HTLASTN       HTLASTN                                                                                                                                                                            
      * HTFIRST     64   "First Name"                                                                                                                                                                                               
     C     *Like         Define    HTFIRST       HTFIRST                                                                                                                                                                            
      * HTSPOUS     64   "Spouse"                                                                                                                                                                                                   
     C     *Like         Define    HTSPOUS       HTSPOUS                                                                                                                                                                            
      * HTADDRES   128   "Address"                                                                                                                                                                                                  
     C     *Like         Define    HTADDRES      HTADDRES                                                                                                                                                                           
      * HTCITY      64   "City"                                                                                                                                                                                                     
     C     *Like         Define    HTCITY        HTCITY                                                                                                                                                                             
      * HTSTATE      8   "State"                                                                                                                                                                                                    
     C     *Like         Define    HTSTATE       HTSTATE                                                                                                                                                                            
      * HTZIP       16   "ZIP"                                                                                                                                                                                                      
     C     *Like         Define    HTZIP         HTZIP                                                                                                                                                                              
      * HTCOMMUN   128   "Community"                                                                                                                                                                                                
     C     *Like         Define    HTCOMMUN      HTCOMMUN                                                                                                                                                                           
      * HTHPHONE    16   "Home Phone"                                                                                                                                                                                               
     C     *Like         Define    HTHPHONE      HTHPHONE                                                                                                                                                                           
      * HTCPHONEMR  16   "Cell Phone Mr"                                                                                                                                                                                            
     C     *Like         Define    HTCPHONEMR    HTCPHONEMR                                                                                                                                                                         
      * HTCPHONEMS  16   "Cell Phone Mrs."                                                                                                                                                                                          
     C     *Like         Define    HTCPHONEMS    HTCPHONEMS                                                                                                                                                                         
      * HTWPHONEMS  16   "Work Phone Mrs"                                                                                                                                                                                           
     C     *Like         Define    HTWPHONEMS    HTWPHONEMS                                                                                                                                                                         
      * HTWPHONEMR  16   "Work Phone Mr"                                                                                                                                                                                            
     C     *Like         Define    HTWPHONEMR    HTWPHONEMR                                                                                                                                                                         
      * HTREF       16   "Referrer By"                                                                                                                                                                                              
     C     *Like         Define    HTREF         HTREF                                                                                                                                                                              
      * *LIKE DEFINE FILL IN ALL @HTPEOPLE  People                                                                                                                                                                                  
     C     *Like         Define    HTLASTN       HTLASTN                                                                                                                                                                            
     C     *Like         Define    HTFIRST       HTFIRST                                                                                                                                                                            
     C     *Like         Define    HTSPOUS       HTSPOUS                                                                                                                                                                            
     C     *Like         Define    HTADDRES      HTADDRES                                                                                                                                                                           
     C     *Like         Define    HTCITY        HTCITY                                                                                                                                                                             
     C     *Like         Define    HTSTATE       HTSTATE                                                                                                                                                                            
     C     *Like         Define    HTZIP         HTZIP                                                                                                                                                                              
     C     *Like         Define    HTCOMMUN      HTCOMMUN                                                                                                                                                                           
     C     *Like         Define    HTHPHONE      HTHPHONE                                                                                                                                                                           
     C     *Like         Define    HTCPHONEMR    HTCPHONEMR                                                                                                                                                                         
     C     *Like         Define    HTCPHONEMS    HTCPHONEMS                                                                                                                                                                         
     C     *Like         Define    HTWPHONEMS    HTWPHONEMS                                                                                                                                                                         
     C     *Like         Define    HTWPHONEMR    HTWPHONEMR                                                                                                                                                                         
     C     *Like         Define    HTREF         HTREF                                                                                                                                                                              
      * REFERENCES FOR RECORD @HTPEOPLE  People                                                                                                                                                                                     
      * HTLAST  64   "Last Name"                                                                                                                                                                                                    
     C                     MOVEL          HTLAST    P                                                                                                                                                                               
      * HTFIRS  64   "First Name"                                                                                                                                                                                                   
     C                     MOVEL          HTFIRS    P                                                                                                                                                                               
      * HTSPOU  64   "Spouse"                                                                                                                                                                                                       
     C                     MOVEL          HTSPOU    P                                                                                                                                                                               
      * HTADDR 128   "Address"                                                                                                                                                                                                      
     C                     MOVEL          HTADDR    P                                                                                                                                                                               
      * HTCITY  64   "City"                                                                                                                                                                                                         
     C                     MOVEL          HTCITY    P                                                                                                                                                                               
      * HTSTAT   8   "State"                                                                                                                                                                                                        
     C                     MOVEL          HTSTAT    P                                                                                                                                                                               
      * HTZIP   16   "ZIP"                                                                                                                                                                                                          
     C                     MOVEL          HTZIP     P                                                                                                                                                                               
      * HTCOMM 128   "Community"                                                                                                                                                                                                    
     C                     MOVEL          HTCOMM    P                                                                                                                                                                               
      * HTHPHO  16   "Home Phone"                                                                                                                                                                                                   
     C                     MOVEL          HTHPHO    P                                                                                                                                                                               
      * HTCPHO  16   "Cell Phone Mr"                                                                                                                                                                                                
     C                     MOVEL          HTCPHO    P                                                                                                                                                                               
      * HTCPHO  16   "Cell Phone Mrs."                                                                                                                                                                                              
     C                     MOVEL          HTCPHO    P                                                                                                                                                                               
      * HTWPHO  16   "Work Phone Mrs"                                                                                                                                                                                               
     C                     MOVEL          HTWPHO    P                                                                                                                                                                               
      * HTWPHO  16   "Work Phone Mr"                                                                                                                                                                                                
     C                     MOVEL          HTWPHO    P                                                                                                                                                                               
      * HTREF   16   "Referrer By"                                                                                                                                                                                                  
     C                     MOVEL          HTREF     P                                                                                                                                                                               
      * REVERSED REF FOR RECORD @HTPEOPLE  People                                                                                                                                                                                   
      * HTLASTN     64   "Last Name"                                                                                                                                                                                                
     C                     MOVELHTLASTN             P                                                                                                                                                                               
      * HTFIRST     64   "First Name"                                                                                                                                                                                               
     C                     MOVELHTFIRST             P                                                                                                                                                                               
      * HTSPOUS     64   "Spouse"                                                                                                                                                                                                   
     C                     MOVELHTSPOUS             P                                                                                                                                                                               
      * HTADDRES   128   "Address"                                                                                                                                                                                                  
     C                     MOVELHTADDRES            P                                                                                                                                                                               
      * HTCITY      64   "City"                                                                                                                                                                                                     
     C                     MOVELHTCITY              P                                                                                                                                                                               
      * HTSTATE      8   "State"                                                                                                                                                                                                    
     C                     MOVELHTSTATE             P                                                                                                                                                                               
      * HTZIP       16   "ZIP"                                                                                                                                                                                                      
     C                     MOVELHTZIP               P                                                                                                                                                                               
      * HTCOMMUN   128   "Community"                                                                                                                                                                                                
     C                     MOVELHTCOMMUN            P                                                                                                                                                                               
      * HTHPHONE    16   "Home Phone"                                                                                                                                                                                               
     C                     MOVELHTHPHONE            P                                                                                                                                                                               
      * HTCPHONEMR  16   "Cell Phone Mr"                                                                                                                                                                                            
     C                     MOVELHTCPHONEMR          P                                                                                                                                                                               
      * HTCPHONEMS  16   "Cell Phone Mrs."                                                                                                                                                                                          
     C                     MOVELHTCPHONEMS          P                                                                                                                                                                               
      * HTWPHONEMS  16   "Work Phone Mrs"                                                                                                                                                                                           
     C                     MOVELHTWPHONEMS          P                                                                                                                                                                               
      * HTWPHONEMR  16   "Work Phone Mr"                                                                                                                                                                                            
     C                     MOVELHTWPHONEMR          P                                                                                                                                                                               
      * HTREF       16   "Referrer By"                                                                                                                                                                                              
     C                     MOVELHTREF               P