sHelp
                                     PHA.ACCESS
     i   2
 main
   dis.orders
   inp.orders
   out.orders
   out.orders.for.list
   patient.types
   pha.sites
   pha.sites.by.value
   process.adr.functions
   process.adr.keys
   process.int.functions
   process.int.keys
   process.pat.buttons
     process.pat.functions
   process.pat.keys
   process.screens
     process.buttons
       process.function.keys.x
       process.function.text
       process.functions
     process.function.by.value
   pt.profile.display
   reg.screens
   signon.message.types
   stock.orders
   users
 signon.messages

 Ì     i   2
main
[mnemonic]
&(T)TDL[tdl]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mnemonic                    10 FREE     L                 tdl                                                         
 ...use.me.1                  1 YN       L                 &(T)TDL[tdl]|26                                             
 ..not.used.1                 0 YN       L                 &(T)TDL[tdl]|7                                              
 ack.dis                      1 YN       L                 &(T)TDL[tdl]|12                                             
 active                       1 YN       L                 &(T)TDL[tdl]|0                                              
 admin.view                  70 FREE     L                 &(T)TDL[tdl]F1|2                                            
 assign.rx                    1 YN       L                 &(T)TDL[tdl]|6                                              
 by.access.or.user            6 CHOICE   L                                                                             
 clin.ints.ent.ords           1 YN       L                 &(T)TDL[tdl]|30                                             
 description                 30 FREE     L                 &(T)TDL[tdl]|1                                              
 dft.dea.number               1 YN       L                 &(T)TDL[tdl]|18                                             
 dft.drug.lookup              3 CHOICE   L                 &(T)TDL[tdl]|10                                             
 disp.ints.ent.ords           1 CHOICE   L                 &(T)TDL[tdl]|23                                             
 display.messages             1 YN       L                 &(T)TDL[tdl]|14                                             
 drug.view                   70 FREE     L                 &(T)TDL[tdl]F1|0                                            
 edit.pt.data                 1 YN       L                 &(T)TDL[tdl]|13                                             
 edit.refills                 1 YN       L                 &(T)TDL[tdl]|5                                              
 ee.allergy.exclusions        1 FREE     L                 &(T)TDL[tdl]|37                                             
 ee.orders.output.option      6 CHOICE   L                 &(T)TDL[tdl]|33                                             
 ee.providers                 1 YN       L                 &(T)TDL[tdl]|32                                             
 enter.drugs                  1 YN       L                 &(T)TDL[tdl]|8                                              
 fcom.lines                   1 INT      R                 &(T)TDL[tdl]|22                                             
 last.update                 10 PINT     R                 &(T)TDL[tdl]UPD                                             
 may.assign.rx                1 FREE     L                 VAL="Y"=@PHA.ACCESS.assign.rx[/(.D)PHA.ACCESS]              
 may.edit.refills             1 FREE     L                 VAL="Y"=@PHA.ACCESS.edit.refills[/(.D)PHA.ACCESS]           
 may.enter.drugs              1 FREE     L                 VAL="Y"=@PHA.ACCESS.enter.drugs[/(.D)PHA.ACCESS]            
 may.not.verify               1 FREE     L                 VAL="Y"'=@PHA.ACCESS.verified.orders[/(.D)PHA.ACCESS]       
 may.order.non.form.items     1 FREE     L                 VAL="Y"=@PHA.ACCESS.non.form.items[/(.D)PHA.ACCESS]         
 may.order.rest.meds          1 FREE     L                 VAL="Y"=@PHA.ACCESS.restricted.meds[/(.D)PHA.ACCESS]        
 may.refill                   1 FREE     L                 VAL="Y"=@PHA.ACCESS.refill.lists[/(.D)PHA.ACCESS]           
 may.verify                   1 FREE     L                 VAL="Y"=@PHA.ACCESS.verified.orders[/(.D)PHA.ACCESS]        
 non.form.items               1 YN       L                 &(T)TDL[tdl]|19                                             
 order.set.for                4 CHOICE   L                 &(T)TDL[tdl]|11                                             
 order.tpn.for                4 CHOICE   L                 &(T)TDL[tdl]|35                                             
 pat.alls.ent.ords            1 YN       L                 &(T)TDL[tdl]|24                                             
 pat.alls.stk.ords            1 YN       L                 &(T)TDL[tdl]|25                                             
 patient.view                70 FREE     L                 &(T)TDL[tdl]F1|1                                            
 pr.notes                     5 CHOICE   L                 &(T)TDL[tdl]|16                                             
 pr.notes.inactivate          4 CHOICE   L                 &(T)TDL[tdl]|17                                             
 prf.format                  10 FREE     L  PHA.PRF        &(T)TDL[tdl]|9                                          
 prf.format.dis              10 FREE     L  PHA.PRF        &(T)TDL[tdl]|29                                         
 prf.format.inp              10 FREE     L  PHA.PRF        &(T)TDL[tdl]|27                                         
 prf.format.out              10 FREE     L  PHA.PRF        &(T)TDL[tdl]|28                                         
 pro.act.prf.format          10 FREE     L  PHA.PRF        &(T)TDL[tdl]|36                                         
 pro.infce.errors             1 YN       L                 &(T)TDL[tdl]|31                                             
 profile.display              7 CHOICE   L                 &(T)TDL[tdl]|15                                             
 refill.lists                 1 YN       L                 &(T)TDL[tdl]|3                                              
 restricted.meds              1 YN       L                 &(T)TDL[tdl]|4                                              
 skip.order.prompt            1 YN       L                 &(T)TDL[tdl]|34                                             
 user.access                 10 FREE     L                 VAL=/(.D)PHA.ACCESS                                         
 verified.orders              1 YN       L                 &(T)TDL[tdl]|2                                              
 Ì   €   i   2
dis.orders
[mnemonic,  dis.order]
&(T)TDL[tdl]D[tdo]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 dis.order                   10 FREE     L  PHA.OT         tdo                                                     
 dis.order.ver                1 YN       L                 &(T)TDL[tdl]D[tdo]|0                                        
 Ì   €   i   2
inp.orders
[mnemonic,  inp.order]
&(T)TDL[tdl]I[tdo]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 inp.order                   10 FREE     L  PHA.OT         tdo                                                     
 inp.order.ver                1 YN       L                 &(T)TDL[tdl]I[tdo]|0                                        
 Ì   €   i   2
out.orders
[mnemonic,  out.order]
&(T)TDL[tdl]O[tdo]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 out.order                   10 FREE     L  PHA.OT         tdo                                                     
 out.order.ver                1 YN       L                 &(T)TDL[tdl]O[tdo]|0                                        
 Ì   €   i   2
out.orders.for.list
[mnemonic,  out.order.for.list]
&(T)TDL[tdl]O[tdo2]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 out.order.for.list          10 FREE     L  PHA.OT         tdo2                                                    
 out.order.ver.for.list       1 YN       L                 &(T)TDL[tdl]O[tdo2]|0                                       
 Ì   €   i   2
patient.types
[mnemonic,  patient.type]
&(T)TDL[tdl]P[tdlP]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 patient.type                 3 CHOICE   L                 tdlP                                                        
 Ì   €   i   2
pha.sites
[mnemonic,  pha.site.q]
&(T)TDL[tdl]S[tdlsQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pha.site.q                   3 PINT     R                 tdlsQ                                                       
 pha.site                    10 FREE     L  PHA.SITE       &(T)TDL[tdl]S[tdlsQ]                                    
 Ì   €   i   2
pha.sites.by.value
[mnemonic,  pha.site.value]
&(T)TDL[tdl]SV[tdsi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pha.site.value              10 FREE     L  PHA.SITE       tdsi                                                    
 Ì   €   i   2
process.adr.functions
[mnemonic,  pr.adr.function]
&(T)TDL[tdl]AF[tdlAF]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pr.adr.function             25 FREE     L                 tdlAF                                                       
 pr.adr.key                   1 FREE     L                 &(T)TDL[tdl]AF[tdlAF]|0                                     
 Ì   €   i   2
process.adr.keys
[mnemonic,  pr.adr.key.2]
&(T)TDL[tdl]AM[tdlAM]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pr.adr.key.2                 1 FREE     L                 tdlAM                                                       
 pr.adr.function.2           25 FREE     L                 &(T)TDL[tdl]AM[tdlAM]|0                                     
 Ì   €   i   2
process.int.functions
[mnemonic,  pr.int.function]
&(T)TDL[tdl]IF[tdlIF]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pr.int.function             25 FREE     L                 tdlIF                                                       
 pr.int.key                   1 FREE     L                 &(T)TDL[tdl]IF[tdlIF]|0                                     
 Ì   €   i   2
process.int.keys
[mnemonic,  pr.int.key.2]
&(T)TDL[tdl]IM[tdlIM]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pr.int.key.2                 1 FREE     L                 tdlIM                                                       
 pr.int.function.2           25 FREE     L                 &(T)TDL[tdl]IM[tdlIM]|0                                     
 Ì   €   i   2
process.pat.buttons
[mnemonic,  pro.button.q]
&(T)TDL[tdl]BTN[tdlBQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pro.button.q                 2 PINT     R                 tdlBQ                                                       
 pro.button                  20 FREE     L  NPR.PICTURE    &(T)TDL[tdl]BTN[tdlBQ]                                  
 Ì   €   i   2
process.pat.functions
[mnemonic,pro.button.q,  pr.pat.function.q]
&(T)TDL[tdl]BTN[tdlBQ]F[tdlFQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pr.pat.function.q            2 PINT     R                 tdlFQ                                                       
 pr.pat.function             25 FREE     L                 &(T)TDL[tdl]BTN[tdlBQ]F[tdlFQ]|0                            
 pr.pat.key                   1 FREE     L                 &(T)TDL[tdl]BTN[tdlBQ]F[tdlFQ]|2                            
 pr.pat.routine               1 CHOICE   L                 &(T)TDL[tdl]BTN[tdlBQ]F[tdlFQ]|1                            
 Ì   €   i   2
process.pat.keys
[mnemonic,  pr.pat.key.2]
&(T)TDL[tdl]M[tdlM]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pr.pat.key.2                 1 FREE     L                 tdlM                                                        
 pr.pat.function.2           25 FREE     L                 &(T)TDL[tdl]M[tdlM]|0                                       
 Ì   €   i   2
process.screens
[mnemonic,  process.screen]
&(T)TDL[tdl]PS[tdps]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 process.screen              15 FREE     L  PHA.PROCESS    tdps                                                    
 Ì   €   i   2
process.buttons
[mnemonic,process.screen,  button.q]
&(T)TDL[tdl]PS[tdps]B[tdpsb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 button.q                     1 PINT     R                 tdpsb                                                       
 button                      20 FREE     L  NPR.PICTURE    &(T)TDL[tdl]PS[tdps]B[tdpsb]|0                          
 Ì   €   i   2
process.function.keys.x
[mnemonic,process.screen,button.q,  func.hot.key.lkup]
&(T)TDL[tdl]PS[tdps]B[tdpsb]K[tdpsh]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 func.hot.key.lkup            1 FREE     L                 tdpsh                                                       
 function.lkup               20 FREE     L                 &(T)TDL[tdl]PS[tdps]B[tdpsb]K[tdpsh]                        
 Ì   €   i   2
process.function.text
[mnemonic,process.screen,button.q,  func.text.q]
&(T)TDL[tdl]PS[tdps]B[tdpsb]T[tdpst]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 func.text.q                  2 PINT     R                 tdpst                                                       
 func.text.hot.key            1 FREE     L                 &(T)TDL[tdl]PS[tdps]B[tdpsb]T[tdpst]|1                      
 func.text.text              23 FREE     L                 &(T)TDL[tdl]PS[tdps]B[tdpsb]T[tdpst]|0                      
 Ì   €   i   2
process.functions
[mnemonic,process.screen,button.q,  func.q]
&(T)TDL[tdl]PS[tdps]B[tdpsb]F[tdpsq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 func.q                       2 PINT     R                 tdpsq                                                       
 func.hot.key                 1 FREE     L                 &(T)TDL[tdl]PS[tdps]B[tdpsb]F[tdpsq]|1                      
 function                    20 FREE     L                 &(T)TDL[tdl]PS[tdps]B[tdpsb]F[tdpsq]|0                      
 Ì   €   i   2
process.function.by.value
[mnemonic,process.screen,  function.by.value]
&(T)TDL[tdl]PS[tdps]V[tdpsf]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 function.by.value           20 FREE     L                 tdpsf                                                       
 function.defined             1 FREE     L                 &(T)TDL[tdl]PS[tdps]V[tdpsf]                                
 Ì   €   i   2
pt.profile.display
[mnemonic,  pt.profile.dspl]
&(T)TDL[tdl]PRD[tdlPD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pt.profile.dspl              8 CHOICE   L                 tdlPD                                                       
 Ì   €   i   2
reg.screens
[mnemonic,  reg.screen]
&(T)TDL[tdl]RS[tdlRS]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 reg.screen                  10 FREE     L                 tdlRS                                                       
 Ì   €   i   2
signon.message.types
[mnemonic,  so.message.type.type]
&(T)TDL[tdl]SOMT[somtT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 so.message.type.type         3 FREE     L                 somtT                                                       
 so.message.type.desc        35 FREE     L                 &(T)TDL[tdl]SOMT[somtT]|0                                   
 Ì   €   i   2
stock.orders
[mnemonic,  stock.order.type]
&(T)TDL[tdl]K[tdlk]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 stock.order.type             3 CHOICE   L                 tdlk                                                        
 allow.override               1 CHOICE   L                 &(T)TDL[tdl]K[tdlk]|1                                       
 ask.charge                   1 YN       L                 &(T)TDL[tdl]K[tdlk]|3                                       
 ask.labels                   1 YN       L                 &(T)TDL[tdl]K[tdlk]|4                                       
 ask.override                 1 FREE     L                 VAL="A"=@PHA.ACCESS.allow.override[/(.D)PHA.ACCESS,sto      
                                                           VAL=ck.order.type]                                          
 ask.service.date             1 YN       L                 &(T)TDL[tdl]K[tdlk]|2                                       
 auto.override                1 FREE     L                 VAL="Y"=@PHA.ACCESS.allow.override[/(.D)PHA.ACCESS,sto      
                                                           VAL=ck.order.type]                                          
 check.interactions           1 CHOICE   L                 &(T)TDL[tdl]K[tdlk]|5                                       
 no.override                  1 FREE     L                 VAL="N"=@PHA.ACCESS.allow.override[/(.D)PHA.ACCESS,sto      
                                                           VAL=ck.order.type]                                          
 stock.order.for              3 CHOICE   L                 &(T)TDL[tdl]K[tdlk]|0                                       
 Ì   €   i   2
users
[mnemonic,  user]
&(T)TDL[tdl]U[gu]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 user                        10 FREE     L  MIS.USER       gu                                                      
 pharmacist                   1 YN       L                 &(T)TDL[tdl]U[gu]|0                                         
 Ì     i   2
signon.messages
[so.message.mnemonic]
/.TDLSOM[tdlmm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 so.message.mnemonic          2 FREE     L                 tdlmm                                                       
 so.message.description      35 FREE     L                 /.TDLSOM[tdlmm]|0                                           

 Index Files                        Subscripts/Physical Base

 pharmacist.x                       [user]
                                      &(T)TDLR[gu]

 user.x                             [user] = mnemonic
                                      &(T)TDLU[gu]