sHelp
                                     MRI.LTD
       2
   main
     lifetime.treatment
       account.totals
       audit.trail
         audit.trail.text

 Ì       2
main    (main) 
[urn]
?EBT[ea]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 urn                         25 URN      L  MRI.PAT        ea                                                      
 last.update                 10 PINT     R                 ?EBT[ea]|0                                                  
 last.update.date             8 DATE     L                 VAL=%Z.date.in.magic(@last.update)                          
 last.update.time             4 HHMM     L                 VAL=%Z.time.out(@last.update)                               
 merged.time                 10 PINT     R                 ?EBT[ea]|1                                                  
 patient                     30 FREE     L                                                                             
 text.editor                  0 FREE     L                                                                             
 Ì       2
lifetime.treatment    (lifetime.treatment) 
[urn, treatment]
?EBT[ea]T[ltc]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 treatment                   10 FREE     L  MIS.LTC        ltc                                                     
 amount                      10 DEC      R                 ?EBT[ea]T[ltc]|0                                            
 amount.per.bsa              10 DEC      R                 ?EBT[ea]T[ltc]|2                                            
 amount.per.kg               10 DEC      R                 ?EBT[ea]T[ltc]|3                                            
 last.adjustment             10 PINT     R                 ?EBT[ea]T[ltc]|1                                            
 last.updated                10 FREE     L                 VAL=%Z.date.out(%Z.date.in.magic(@MRI.LTD.last.adjustm      
                                                           VAL=ent))_"-"_%Z.time.out(@MRI.LTD.last.adjustment)'="      
                                                           VAL=-"                                                      
 Ì       2
account.totals    (account.totals) 
[urn,treatment, account]
?EBT[ea]T[ltc]AT[aa]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 account                     30 URN      L  ADM.PAT        aa                                                      
 account.amount              10 DEC      R                 ?EBT[ea]T[ltc]AT[aa]|0                                      
 account.amount.per.bsa      10 DEC      R                 ?EBT[ea]T[ltc]AT[aa]|2                                      
 account.amount.per.kg       10 DEC      R                 ?EBT[ea]T[ltc]AT[aa]|3                                      
 account.last.adjustment     10 PINT     R                 ?EBT[ea]T[ltc]AT[aa]|1                                      
 Ì       2
audit.trail    (audit.trail) 
[urn,treatment, audit.q]
?EBT[ea]T[ltc]A[ltcA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 audit.q                      4 PINT     R                 ltcA                                                        
 au.date                      8 DATE     L                 ?EBT[ea]T[ltc]A[ltcA]|0                                     
 au.db                       12 FREE     L  MIS.APPL       ?EBT[ea]T[ltc]A[ltcA]|3                                 
 au.new.amount               10 DEC      R                 ?EBT[ea]T[ltc]A[ltcA]|6                                     
 au.old.amount               10 DEC      R                 ?EBT[ea]T[ltc]A[ltcA]|5                                     
 au.time                      4 HHMM     L                 ?EBT[ea]T[ltc]A[ltcA]|1                                     
 au.type                      6 CHOICE   L                 ?EBT[ea]T[ltc]A[ltcA]|4                                     
 au.user                     10 FREE     L  MIS.USER       ?EBT[ea]T[ltc]A[ltcA]|2                                 
 au.user.name                34 FREE     L                 VAL=IF{@MIS.USER.name[@au.user];@au.user}                   
 service.date                 8 DATE     L                 ?EBT[ea]T[ltc]A[ltcA]|7                                     
 Ì       2
audit.trail.text    (audit.trail.text) 
[urn,treatment,audit.q, audit.text.q]
?EBT[ea]T[ltc]A[ltcA]T[ltcAT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 audit.text.q                 3 PINT     R                 ltcAT                                                       
 audit.text                  70 FREE     L                 ?EBT[ea]T[ltc]A[ltcA]T[ltcAT]