sHelp
                                     PBR.APT
     i   2
 appt.history
 appt.index
 appt.mpi.history
 appt.mpi.index
 locals
 main
   component.pointers
   sched.params.component
   sched.params.day.of.week
   sched.params.dr.res
   sched.params.location
   sched.params.type
   schedule.pointers
   text
 reschedule.queue
 sched.plan.text
 temp.appt.index
 temp.insurances

 Ì     i   2
appt.history
[hist.account,hist.appt
*(HP6)HPSH[pz,ps]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 hist.account                                                                                                          
 hist.appt                                                                                                             
 Ì     i   2
appt.index
[ind.account,ind.date,ind.time,ind.location,ind.dr.res,ind.urn
*(HP6)HPSI[pz,psiD,psiT,pdl,par,ps]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ind.account                                                                                                           
 ind.date                                                                                                              
 ind.time                                                                                                              
 ind.location                                                                                                          
 ind.dr.res                                                                                                            
 ind.urn                                                                                                               
 Ì     i   2
appt.mpi.history
[mpi.hist.patient,mpi.hist.appt]
*(HP6)HPSMH[pu,ps]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mpi.hist.patient            30 URN      L  PBR.MPI        pu                                                      
 mpi.hist.appt                8 URN      L  PBR.APT        ps                                                      
 mpi.hist.account            44 URN      L  PBR.ACT        *(HP6)HPSMH[pu,ps]|5                                    
 mpi.hist.date                8 DATE     L                 *(HP6)HPSMH[pu,ps]|1                                        
 mpi.hist.reason             10 FREE     L  PBR.APT.CAN    *(HP6)HPSMH[pu,ps]|4                                    
 mpi.hist.status              1 CHOICE   L                 *(HP6)HPSMH[pu,ps]|0                                        
 mpi.hist.time                5 HHMM     L                 *(HP6)HPSMH[pu,ps]|2                                        
 mpi.hist.user               10 FREE     L                 *(HP6)HPSMH[pu,ps]|3                                        
 Ì     i   2
appt.mpi.index
[mpi.ind.patient,mpi.ind.date,mpi.ind.time,mpi.ind.location,mpi.ind.dr.res,mpi.ind.urn]
*(HP6)HPSM[pu,psmD,psmT,pdl,par,ps]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mpi.ind.patient             30 URN      L  PBR.MPI        pu                                                      
 mpi.ind.date                 8 DATE     L                 psmD                                                        
 mpi.ind.time                 5 HHMM     L                 psmT                                                        
 mpi.ind.location             8 FREE     L  PBR.LOCATION   pdl                                                     
 mpi.ind.dr.res               6 FREE     L  PBR.APT.SRSC   par                                                     
 mpi.ind.urn                  8 URN      L  PBR.APT        ps                                                      
 mpi.ind.value                1 FREE     L                 *(HP6)HPSM[pu,psmD,psmT,pdl,par,ps]                         
 Ì     i   2
locals


 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 relation                    10 FREE     L  MIS.RELAT      ]|0                                                     
 sort1                       30 FREE     L                                                                             
 sort2                       30 FREE     L                                                                             
 Ì   €   i   2
main
[appt]
*(HP6)HPS[ps]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 appt                         8 URN      L                 ps                                                          
 ..do.not.use.2               1 FREE     L                 *(HP6)HPS[ps]|2                                             
 ..do.not.use.3               1 FREE     L                 *(HP6)HPS[ps]|3                                             
 account                     44 URN      L  PBR.ACT        *(HP6)HPS[ps]|0                                         
 appt.reason                 10 FREE     L  PBR.APT.RSN    *(HP6)HPS[ps]|13                                        
 chg.ticket.printed           1 YN       L                 *(HP6)HPS[ps]|24                                            
 completed.time               5 HHMM     L                 *(HP6)HPS[ps]|19                                            
 enc.form.printed             1 YN       L                 *(HP6)HPS[ps]|25                                            
 epi.seq                      5 PINT     R                 *(HP6)HPS[ps]|18                                            
 in.progress                  1 YN       L                 *(HP6)HPS[ps]|20                                            
 in.progress.text             5 TEXT     L                 *(HP6)HPS[ps]|21                                            
 mt.actnum                   15 FREE     L                 *(HP6)HPS[ps]|16                                            
 mt.reg                       1 YN       L                 *(HP6)HPS[ps]|17                                            
 name                        30 NAME     L                 *(HP6)HPS[ps]|1                                             
 patient                     30 URN      L  PBR.MPI        *(HP6)HPS[ps]|23                                        
 ref.doctor                  10 FREE     L  MIS.DOC        *(HP6)HPS[ps]|4                                         
 sched.date                   8 DATE     L                 *(HP6)HPS[ps]|10                                            
 sched.time                   5 HHMM     L                 *(HP6)HPS[ps]|11                                            
 scheduler                   10 FREE     L  MIS.USER       *(HP6)HPS[ps]|6                                         
 sp.begin.date                8 DATE     L                 *(HP6)HPS[ps]X|0                                            
 sp.begin.time                5 HHMM     L                 *(HP6)HPS[ps]X|2                                            
 sp.doctor.choice             3 FREE     L                 *(HP6)HPS[ps]X|4                                            
 sp.end.date                  8 DATE     L                 *(HP6)HPS[ps]X|1                                            
 sp.end.time                  5 HHMM     L                 *(HP6)HPS[ps]X|3                                            
 status                       1 CHOICE   L                 *(HP6)HPS[ps]|9                                             
 text.editor                  0 FREE     L                 VAL=%Z.text.create(^@Root(@t.text),{0,0,10,40})^/TH,%Z      
                                                           VAL=.text.disp(/TH),%Z.text.close.up(/TH),""^/TH            
 ticket                       8 PINT     R  PBR.APT.CHG.TKT*(HP6)HPS[ps]|12                                        
 type                         2 FREE     L  PBR.APT.TYPE   *(HP6)HPS[ps]|5                                         
 visit                        5 FREE     L                 *(HP6)HPS[ps]|22                                            
 visit.reason                40 FREE     L                 *(HP6)HPS[ps]|7                                             
 wait.start.time              5 HHMM     L                 *(HP6)HPS[ps]|14                                            
 wait.stop.time               5 HHMM     L                 *(HP6)HPS[ps]|15                                            
 waiting                      1 YN       L                 *(HP6)HPS[ps]|8                                             
 Ì   €   i   2
component.pointers
[appt,  cmp.seq]
*(HP6)HPS[ps]C[psC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 cmp.seq                      2 PINT     R                 psC                                                         
 cmp.begin.time               5 HHMM     L                 *(HP6)HPS[ps]C[psC]|3                                       
 cmp.component                6 FREE     L  PBR.APT.CMP    *(HP6)HPS[ps]C[psC]|1                                   
 cmp.date                     8 DATE     L                 *(HP6)HPS[ps]C[psC]|2                                       
 cmp.end.time                 5 HHMM     L                 *(HP6)HPS[ps]C[psC]|4                                       
 cmp.location                 8 FREE     L  PBR.LOCATION   *(HP6)HPS[ps]C[psC]|0                                   
 Ì   €   i   2
sched.params.component
[appt,  sp.component]
*(HP6)HPS[ps]X["C",pac]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 sp.component                 6 FREE     L  PBR.APT.CMP    pac                                                     
 Ì   €   i   2
sched.params.day.of.week
[appt,  sp.day.of.week]
*(HP6)HPS[ps]X["W",psSPW]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 sp.day.of.week               3 DAY      L                 psSPW                                                       
 Ì   €   i   2
sched.params.dr.res
[appt,  sp.dr.res]
*(HP6)HPS[ps]X["D",par]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 sp.dr.res                    6 FREE     L  PBR.APT.SRSC   par                                                     
 Ì   €   i   2
sched.params.location
[appt,  sp.location]
*(HP6)HPS[ps]X["L",pdl]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 sp.location                  8 FREE     L  PBR.LOCATION   pdl                                                     
 Ì   €   i   2
sched.params.type
[appt,  sp.type]
*(HP6)HPS[ps]X["T",pat]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 sp.type                      2 FREE     L  PBR.APT.TYPE   pat                                                     
 Ì   €   i   2
schedule.pointers
[appt,  srsc.seq]
*(HP6)HPS[ps]P[psP]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 srsc.seq                     2 URN      L                 psP                                                         
 srsc.begin.time              5 HHMM     L                 *(HP6)HPS[ps]P[psP]|3                                       
 srsc.date                    8 DATE     L                 *(HP6)HPS[ps]P[psP]|2                                       
 srsc.dr.res                  6 FREE     L  PBR.APT.SRSC   *(HP6)HPS[ps]P[psP]|1                                   
 srsc.end.time                5 HHMM     L                 *(HP6)HPS[ps]P[psP]|4                                       
 srsc.location                8 FREE     L  PBR.LOCATION   *(HP6)HPS[ps]P[psP]|0                                   
 srsc.track                   2 PINT     R                 *(HP6)HPS[ps]P[psP]|5                                       
 Ì   €   i   2
text
[appt,  text.seq.no]
*(HP6)HPS[ps]TX[szTX]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 text.seq.no                  3 PINT     R                 szTX                                                        
 text.description            80 TEXT     L                 *(HP6)HPS[ps]TX[szTX]                                       
 Ì     i   2
reschedule.queue
[queue.date,queue.appt.urn]
*(HP6)HPSRQ[psrq,ps]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 queue.date                   8 DATE     L                 psrq                                                        
 queue.appt.urn               8 URN      L  PBR.APT        ps                                                      
 queue.account               44 URN      L  PBR.ACT        *(HP6)HPSRQ[psrq,ps]|0                                  
 queue.appt.type              2 FREE     L  PBR.APT.TYPE   *(HP6)HPSRQ[psrq,ps]|2                                  
 queue.cmp.cnt                2 PINT     R                 *(HP6)HPSRQ[psrq,ps]|4                                      
 queue.dr.res.cnt             2 PINT     R                 *(HP6)HPSRQ[psrq,ps]|3                                      
 queue.name                  30 NAME     L                 *(HP6)HPSRQ[psrq,ps]|1                                      
 queue.number                 3 PINT     R                 *(HP6)HPSRQ[psrq,ps]                                        
 queue.reason                10 FREE     L  PBR.APT.CAN    *(HP6)HPSRQ[psrq,ps]|5                                  
 queue.text                  60 TEXT     L                 *(HP6)HPSRQ[psrq,ps]|6                                      
 queue.text.date              8 DATE     L                 *(HP6)HPSRQ[psrq,ps]|7                                      
 queue.text.time              5 HHMM     L                 *(HP6)HPSRQ[psrq,ps]|8                                      
 queue.text.user             10 FREE     L  MIS.USER       *(HP6)HPSRQ[psrq,ps]|9                                  
 Ì     i   2
sched.plan.text
[plan.text.seq]
/HPSPT[pspt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 plan.text.seq                2 PINT     R                 pspt                                                        
 plan.text                   80 TEXT     L                 /HPSPT[pspt]|0                                              
 Ì     i   2
temp.appt.index
[temp.ind.date,temp.ind.time,temp.ind.loc,temp.ind.dr.res,temp.ind.counter]
/HPSNT[psntD,psntT,pdl,par,psntC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 temp.ind.date                8 DATE     L                 psntD                                                       
 temp.ind.time                8 HHMM     L                 psntT                                                       
 temp.ind.loc                 8 FREE     L  PBR.LOCATION   pdl                                                     
 temp.ind.dr.res              6 FREE     L  PBR.APT.SRSC   par                                                     
 temp.ind.counter             2 PINT     R                 psntC                                                       
 temp.ind.end.time            5 HHMM     L                 /HPSNT[psntD,psntT,pdl,par,psntC]|1                         
 temp.ind.value               1 FREE     L                 /HPSNT[psntD,psntT,pdl,par,psntC]|0                         
 Ì     i   2
temp.insurances
[temp.ins.seq]
/HPSINS[pzIO]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 temp.ins.seq                 5 URN      L                 pzIO                                                        
 temp.ins                    10 FREE     L  PBR.INS        /HPSINS[pzIO]|0                                         

 Index Files                        Subscripts/Physical Base

 temp.charge.ticket.x               [appt,ticket]
                                      /HPSTX[ps,pst]