sHelp
                                     SCH.RES.PAT
     i   2
   appointment.locks.file
   main
     appointments.file
       appointment.additonal.slots
       sch.resource.letters.sent
       appointment.merged.from
   mri.main

 Ì     i   2
main    (main) 
[patient]
*SRP[ea]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 patient                     25 URN      L  MRI.PAT        ea                                                      
 id                          30 FREE     L                                                                             
 name                        25 URN      L  MRI.PAT                                                                
 number.and.name             25 URN      L  MRI.PAT                                                                
 Ì      i   2
appointments.file    (appointments) 
[patient, appt.date,appt.time,appt.counter]
*SRP[ea]A[spad,spat,spac]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 appt.date                    8 DATE     L                 spad                                                        
 appt.time                    4 ZCUS.MIN L                 spat                                                        
 appt.counter                10 PINT     R                 spac                                                        
 appt.ack                     1 YN       L                 *SRP[ea]A[spad,spat,spac]|9                                 
 appt.ack.date                8 DATE     L                 *SRP[ea]A[spad,spat,spac]TR|9                               
 appt.ack.time                4 ZCUS.MIN L                 *SRP[ea]A[spad,spat,spac]TR|10                              
 appt.ack.user               10 FREE     L  MIS.USER       *SRP[ea]A[spad,spat,spac]TR|11                          
 appt.adm.ext.urn            12 FREE     L                 *SRP[ea]A[spad,spat,spac]ADM|8                              
 appt.adm.fac                10 FREE     L  MIS.FACILITY   *SRP[ea]A[spad,spat,spac]ADM|6                          
 appt.adm.fin.class          10 FREE     L  MIS.FIN.CLASS  *SRP[ea]A[spad,spat,spac]ADM|0                          
 appt.adm.pre.reg             1 YN       L                 *SRP[ea]A[spad,spat,spac]ADM|7                              
 appt.adm.referral.reason    10 FREE     L  WL.REF.REASON  *SRP[ea]A[spad,spat,spac]ADM|4                          
 appt.adm.referral.source    10 FREE     L  WL.REF.SOURCE  *SRP[ea]A[spad,spat,spac]ADM|3                          
 appt.adm.service            10 FREE     L  MIS.SVC.DICT   *SRP[ea]A[spad,spat,spac]ADM|1                          
 appt.adm.urn                30 URN      L  ADM.PAT        *SRP[ea]A[spad,spat,spac]ADM|5                          
 appt.adm.visit.type         10 CHOICE   L                 *SRP[ea]A[spad,spat,spac]ADM|2                              
 appt.can.reason             10 FREE     L  SCH.CAN.DICT   *SRP[ea]A[spad,spat,spac]CAN|0                          
 appt.can.to.counter         10 PINT     R                 *SRP[ea]A[spad,spat,spac]CAN|3                              
 appt.can.to.date             8 DATE     L                 *SRP[ea]A[spad,spat,spac]CAN|1                              
 appt.can.to.time             4 ZCUS.MIN L                 *SRP[ea]A[spad,spat,spac]CAN|2                              
 appt.cancel.date             8 DATE     L                 *SRP[ea]A[spad,spat,spac]TR|6                               
 appt.cancel.time             4 ZCUS.MIN L                 *SRP[ea]A[spad,spat,spac]TR|7                               
 appt.cancel.user            10 FREE     L  MIS.USER       *SRP[ea]A[spad,spat,spac]TR|8                           
 appt.comment                30 FREE     L                 *SRP[ea]A[spad,spat,spac]COM|1                              
 appt.consultant             10 FREE     L  MIS.DOC.DICT   *SRP[ea]A[spad,spat,spac]|5                             
 appt.enter.date              8 DATE     L                 *SRP[ea]A[spad,spat,spac]TR|0                               
 appt.enter.time              4 ZCUS.MIN L                 *SRP[ea]A[spad,spat,spac]TR|1                               
 appt.enter.user             10 FREE     L  MIS.USER       *SRP[ea]A[spad,spat,spac]TR|2                           
 appt.from.counter           10 PINT     R                 *SRP[ea]A[spad,spat,spac]|8                                 
 appt.from.date               8 DATE     L                 *SRP[ea]A[spad,spat,spac]|6                                 
 appt.from.resource          10 FREE     L  SCH.RES.DICT   *SRP[ea]A[spad,spat,spac]|12                            
 appt.from.time               4 ZCUS.MIN L                 *SRP[ea]A[spad,spat,spac]|7                                 
 appt.gp                     10 FREE     L  MIS.DOC.DICT   *SRP[ea]A[spad,spat,spac]|13                            
 appt.last.edit.date          8 DATE     L                 *SRP[ea]A[spad,spat,spac]TR|3                               
 appt.last.edit.time          4 ZCUS.MIN L                 *SRP[ea]A[spad,spat,spac]TR|4                               
 appt.last.edit.user         10 FREE     L  MIS.USER       *SRP[ea]A[spad,spat,spac]TR|5                           
 appt.length                  4 PINT     R                 *SRP[ea]A[spad,spat,spac]|3                                 
 appt.period.start.date       8 DATE     L                 *SRP[ea]A[spad,spat,spac]|11                                
 appt.reason.for.visit       30 FREE     L                 *SRP[ea]A[spad,spat,spac]COM|0                              
 appt.referral.source        10 FREE     L  WL.REF.SOURCE  *SRP[ea]A[spad,spat,spac]|16                            
 appt.referrer               10 FREE     L  MIS.REF.DICT   *SRP[ea]A[spad,spat,spac]|14                            
 appt.referrer.org           10 FREE     L  MIS.REF.ORG    *SRP[ea]A[spad,spat,spac]|15                            
 appt.resource               10 FREE     L  SCH.RES.DICT   *SRP[ea]A[spad,spat,spac]|1                             
 appt.resource.group         10 FREE     L  SCH.RES.GR     *SRP[ea]A[spad,spat,spac]|0                             
 appt.session.start.time      4 ZCUS.MIN L                 *SRP[ea]A[spad,spat,spac]|10                                
 appt.type                   10 FREE     L  SCH.APP.TYP    *SRP[ea]A[spad,spat,spac]|2                             
 appt.walk.in                 1 YN       L                 *SRP[ea]A[spad,spat,spac]|4                                 
 Ì      i   2
appointment.additonal.slots    (additional.slots) 
[patient,appt.date,appt.time,appt.counter, slot.start]
*SRP[ea]A[spad,spat,spac]AS[slst]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 slot.start                     ZCUS.MIN L                 slst                                                        
 Ì      i   2
sch.resource.letters.sent    (appointment.letters) 
[patient,appt.date,appt.time,appt.counter, letter.type.sent]
*SRP[ea]A[spad,spat,spac]LET[srlt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 letter.type.sent            11 CHOICE   L                 srlt                                                        
 letter.date.sent             8 DATE     L                 *SRP[ea]A[spad,spat,spac]LET[srlt]|0                        
 letter.letter.sent          10 FREE     L  SCH.LET        *SRP[ea]A[spad,spat,spac]LET[srlt]|2                    
 letter.time.sent             4 ZCUS.MIN L                 *SRP[ea]A[spad,spat,spac]LET[srlt]|1                        
 Ì      i   2
appointment.merged.from    (appointment.merge) 
[patient,appt.date,appt.time,appt.counter, appt.merged.from]
*SRP[ea]A[spad,spat,spac]MF[amrf]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 appt.merged.from            30 FREE     L                 amrf                                                        
 Ì     i   2
mri.main    (mri.main) 
[urn]
?EA[ea]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 urn                         25 URN      L  MRI.PAT        ea                                                      
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 appointments.by.resource.index     [appt.resource,appt.date,appt.time,patient,appt.counter]
   appt.by.resource.x                 :SRPARX[sr,spad,spat,ea,spac]

 appointment.counter.index          [appt.counter] = patient
   appt.counter.x                     :SRP.X[spac]

 cancelled.appointments.index       [appt.resource,appt.date,appt.time,patient,appt.counter]
   cancelled.appts.x                  :SRPCA[sr,spad,spat,ea,spac]

 sch.resource.letters.index         [resource,MRI.PAT.unit.number,appt.date,appt.time,appt.counter,letter.type]
   letters.x                          :SRPLX[sr,eaN,spad,spat,spac,srlt]

 appointments.by.session.index      [resource,appt.date,appt.time] = num.booked
   session.appts.made.x               :SRPAMA[sr,spad,spat]

 cancelled.sessions.index           [resource,appt.date,SCH.RES.DICT.session.start.time] = @SCH.RES.DICT.session.end
   sessions.cancelled                 :SRPSCAN[sr,spad,srss]

 closed.sessions.index              [resource,appt.date,SCH.RES.DICT.session.start.time] = @SCH.RES.DICT.session.end
   sessions.closed                    :SRPSC[sr,spad,srss]

 full.sessions.index                [resource,appt.date,SCH.RES.DICT.session.start.time]
   sessions.full                      :SRPSF[sr,spad,srss]