sHelp
                                     MRI.SUBSCRIBER
     i   2
 duplicates
   duplicate.index
 main
   insurance
     policy.number
   subs.email.addresses
   switched.from

 Ì     i   2
duplicates
*(E)ESBU

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 dup.birthdate.range          4 PINT     R                 *(E)ESBU|5                                                  
 dup.compile.mode             4 CHOICE   L                 *(E)ESBU|11                                                 
 dup.date                     8 DATE     L                 *(E)ESBU|0                                                  
 dup.end.date                 8 DATE     L                 *(E)ESBU|15                                                 
 dup.end.time                 4 HHMM     L                 *(E)ESBU|16                                                 
 dup.first.name.sel          18 CHOICE   L                 *(E)ESBU|8                                                  
 dup.last.name.sel           18 CHOICE   L                 *(E)ESBU|7                                                  
 dup.nrecs                    5 PINT     R                 *(E)ESBU|17                                                 
 dup.polno.sel               18 CHOICE   L                 *(E)ESBU|18                                                 
 dup.possible.count           7 PINT     R                 *(E)ESBU|10                                                 
 dup.process.count            7 PINT     R                 *(E)ESBU|4                                                  
 dup.select.count             7 PINT     R                 *(E)ESBU|12                                                 
 dup.select.end.date          8 DATE     L                 *(E)ESBU|13                                                 
 dup.select.end.time          4 HHMM     L                 *(E)ESBU|14                                                 
 dup.ssn.sel                 18 CHOICE   L                 *(E)ESBU|9                                                  
 dup.start.at.date            8 DATE     L                 *(E)ESBU|6                                                  
 dup.status                   9 FREE     L                 *(E)ESBU|3                                                  
 dup.status.display          18 FREE     L                 VAL=IF{@dup.status="SELECTING" @dup.status_"  "_@dup.s      
                                                           VAL=elect.count;@dup.status}                                
 dup.time                     4 HHMM     L                 *(E)ESBU|1                                                  
 dup.user                    10 FREE     L                 *(E)ESBU|2                                                  
 Ì   €   i   2
duplicate.index
[dup.last.name,dup.first.name,dup.soc.sec.number,dup.polno,dup.birthdate,dup.urn]
*(E)ESBU["D",x1,x2,esbSS,esbPN,esbBD,eaSB]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 dup.last.name               25 FREE     L                 x1                                                          
 dup.first.name              25 FREE     L                 x2                                                          
 dup.soc.sec.number          12 FREE     L                 esbSS                                                       
 dup.polno                   25 FREE     L                 esbPN                                                       
 dup.birthdate                8 BDATE    L                 esbBD                                                       
 dup.urn                     30 URN      L  MRI.SUBSCRIBER eaSB                                                    
 dup.before.sndx.name        25 FREE     L                 *(E)ESBU["D",x1,x2,esbSS,esbPN,esbBD,eaSB]                  
 Ì     i   2
main
[urn]
*(E)ESB[eaSB]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 urn                         30 URN      L                 eaSB                                                        
 active                       1 YN       L                 *(E)ESB[eaSB]|0                                             
 id                          30 URN      L  MRI.SUBSCRIBER                                                         
 subs.addr.line.1            30 FREE     L                 *(E)ESB[eaSB]|2                                             
 subs.addr.line.2            30 FREE     L                 *(E)ESB[eaSB]|3                                             
 subs.birthdate              10 BDATE    L                 *(E)ESB[eaSB]|8                                             
 subs.citizenship             1 YN       L                 *(E)ESB[eaSB]|12                                            
 subs.city                   20 FREE     L                 *(E)ESB[eaSB]|4                                             
 subs.country                20 FREE     L                 *(E)ESB[eaSB]|7                                             
 subs.create.date             8 DATE     L                 *(E)ESB[eaSB]C|0                                            
 subs.first.name             30 FREE     L                                                                             
 subs.gender                  1 CHOICE   L                 *(E)ESB[eaSB]|9                                             
 subs.last.name              30 FREE     L                                                                             
 subs.marital.status         10 FREE     L  MIS.MAR.STATUS *(E)ESB[eaSB]|10                                        
 subs.name                   30 NAME     L                 *(E)ESB[eaSB]|1                                             
 subs.phone                  30 PHONE    L                 *(E)ESB[eaSB]|14                                            
 subs.race                   10 FREE     L  MIS.RACE       *(E)ESB[eaSB]|11                                        
 subs.sndx.first.name        25 FREE     L                                                                             
 subs.sndx.last.name         25 FREE     L                                                                             
 subs.soc.sec                15 FREE     L                 *(E)ESB[eaSB]|13                                            
 subs.state                   2 FREE     L                 *(E)ESB[eaSB]|5                                             
 subs.switched.to            30 URN      L  MRI.SUBSCRIBER *(E)ESB[eaSB]|15                                        
 subs.zip.code               10 ZIP.POST L                 *(E)ESB[eaSB]|6                                             
 Ì   €   i   2
insurance
[urn,  subs.insurance]
*(E)ESB[eaSB]I[ggm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 subs.insurance              10 FREE     L  MIS.INS        ggm                                                     
 subs.benefit.plan            8 FREE     L                 *(E)ESB[eaSB]I[ggm]|3                                       
 subs.emp.location           30 FREE     L                 *(E)ESB[eaSB]I[ggm]|6                                       
 subs.emp.name               10 FREE     L  MIS.EMPLR      *(E)ESB[eaSB]I[ggm]|5                                   
 subs.emp.status             10 FREE     L  MIS.EMP.STATUS *(E)ESB[eaSB]I[ggm]|4                                   
 subs.group.name             30 FREE     L                 *(E)ESB[eaSB]I[ggm]|1                                       
 subs.group.number           15 FREE     L                 *(E)ESB[eaSB]I[ggm]|0                                       
 subs.insurance.cov.no        8 FREE     L                 *(E)ESB[eaSB]I[ggm]|2                                       
 subs.master.policy.number   30 FREE     L                 *(E)ESB[eaSB]I[ggm]|7                                       
 Ì   €   i   2
policy.number
[urn,subs.insurance,  subs.policy.number]
*(E)ESB[eaSB]I[ggm]PN[spnSB]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 subs.policy.number          30 FREE     L                 spnSB                                                       
 subs.policy.visit.urn       30 URN      L  ADM.PAT        *(E)ESB[eaSB]I[ggm]PN[spnSB]|0                          
 Ì   €   i   2
subs.email.addresses
[urn,  subs.email.seq.no]
*(E)ESB[eaSB]E[esbEM]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 subs.email.seq.no            2 PINT     R                 esbEM                                                       
 subs.email.addr             40 FREE     L                 *(E)ESB[eaSB]E[esbEM]|0                                     
 Ì   €   i   2
switched.from
[urn,  subs.switched.number]
*(E)ESB[eaSB]SF[swf]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 subs.switched.number         2 PINT     R                 swf                                                         
 subs.prefix                  2 FREE     L                                                                             
 subs.switched.date           8 DATE     L                 *(E)ESB[eaSB]SF[swf]|1                                      
 subs.switched.time           4 HHMM     L                 *(E)ESB[eaSB]SF[swf]|3                                      
 subs.switched.urn           35 URN      L                 *(E)ESB[eaSB]SF[swf]|0                                      
 subs.switched.user          10 FREE     L  MIS.USER       *(E)ESB[eaSB]SF[swf]|2                                  

 Index Files                        Subscripts/Physical Base

 ins.policy.x                       [subs.insurance,subs.policy.number,urn] = subs.policy.visit.urn
                                      ?(E)ESBPIX[ggm,spnSB,eaSB]

 name.x                             [subs.last.name,subs.first.name,urn]
                                      ?(E)ESBNX[esbLN,esbFN,eaSB]

 policy.x                           [subs.policy.number,urn,subs.insurance] = subs.policy.visit.urn
                                      ?(E)ESBPX[spnSB,eaSB,ggm]

 soc.x                              [subs.soc.sec,urn]
                                      ?(E)ESBSSX[esbSS,eaSB]

 urn.x                              [urn]
                                      ?(E)ESBX[eaSB]