sHelp
                                     RAD.RES
     i   2
 compile.queue
 download.log
 main
   mtdd.comp.links
   compiled.rtf.page2.header
   copies.to.status
     pt.type.printers
   doc.copies
   edit.data
     edit.data.old.new
   ins.copies
   orders
     findings.text
     findings.text.modified
     impressions.text
     impressions.text.modified
   other.copies
   other.dictated.bys
   purged.order.data
   rcp.copies
   rpt.messages
   responses
     responses.multiple
   sections
     free.text
     free.text.modified
     mtdd.links
     rich.text.modified
   sections2
     addenda
       addenda.pictures
         add.pic.annotations
         add.pic.text
       addenda.rtf.text
     pictures
     user.pictures
       user.pic.annotations
       user.pic.text
   signed.bys
 message.reply.index
 messages
   messages.reply
   messages.text
 mtdd.batches
   mtdd.batch.list
 rtf.batches
   rtf.batch.list
 signed.status.edit.x
 temp.download.log
 xi.file.report.obr
   xi.file.report.obr.orders
 xi.file.report.obx
 xi.file.report.pid

 Ì     i   2
compile.queue
[cmpl.dept,cmpl.seconds,cmpl.urn]
?(R)RTCQ[rd,rtcqS,rt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 cmpl.dept                   10 FREE     L  RAD.DEPT       rd                                                      
 cmpl.seconds                13 PINT     R                 rtcqS                                                       
 cmpl.urn                    10 URN      L  RAD.RES        rt                                                      
 cmpl.hub                     1 YN       L                 ?(R)RTCQ[rd,rtcqS,rt]|2                                     
 cmpl.hub.orders.removed     40 FREE     L                 ?(R)RTCQ[rd,rtcqS,rt]|4                                     
 cmpl.hub.rtf                 1 YN       L                 ?(R)RTCQ[rd,rtcqS,rt]|5                                     
 cmpl.msword                  1 YN       L                 ?(R)RTCQ[rd,rtcqS,rt]|3                                     
 cmpl.report                  1 YN       L                 ?(R)RTCQ[rd,rtcqS,rt]|1                                     
 cmpl.user                   10 FREE     L  MIS.USER       ?(R)RTCQ[rd,rtcqS,rt]|0                                 
 Ì     i   2
download.log
[download.log.dept,download.log.site,download.log.date,download.log.report,download.log.format]
?(R)RTDL[rd,rsi,dldt,rt,redfr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 download.log.dept           10 FREE     L  RAD.DEPT       rd                                                      
 download.log.site           10 FREE     L  RAD.SITE       rsi                                                     
 download.log.date            8 DATE     L                 dldt                                                        
 download.log.report         10 URN      L  RAD.RES        rt                                                      
 download.log.format          5 FREE     L                 redfr                                                       
 download.log.error           1 YN       L                 ?(R)RTDL[rd,rsi,dldt,rt,redfr]|2                            
 download.log.message        60 FREE     L                 ?(R)RTDL[rd,rsi,dldt,rt,redfr]|1                            
 download.log.time            4 HHMM     L                 ?(R)RTDL[rd,rsi,dldt,rt,redfr]|0                            
 Ì     i   2
main
[urn]
$(R1)RT[rt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 urn                         10 URN      L                 rt                                                          
 activity.date                8 DATE     L                 $(R1)RT[rt]|10                                              
 archive.date                 8 DATE     L                 $(R1)RT[rt]A|0                                              
 bottom.margin                4 PDEC     R                 $(R1)RT[rt]C|6                                              
 cancel.comment              60 FREE     L                 $(R1)RT[rt]X|3                                              
 cancel.date                  8 DATE     L                 $(R1)RT[rt]X|0                                              
 cancel.time                  4 HHMM     L                 $(R1)RT[rt]X|1                                              
 cancel.user                 10 FREE     L  MIS.USER       $(R1)RT[rt]X|2                                          
 characters                   5 INT      R                 $(R1)RT[rt]T|1                                              
 comp.report.num             13 FREE     L                 VAL=(@init.date_(@report.num%3))                            
 comp.report.num.t           13 FREE     L                 VAL=(@t.init.date_(@t.report.num%3))                        
 compile.seconds              9 PINT     R                 $(R1)RT[rt]|17                                              
 copies.to                    1 YN       L                 $(R1)RT[rt]C|8                                              
 del.date                     8 DATE     L                 $(R1)RT[rt]D|0                                              
 del.time                     4 HHMM     L                 $(R1)RT[rt]D|1                                              
 del.user                    10 FREE     L  MIS.USER       $(R1)RT[rt]D|2                                          
 dept                        10 FREE     L  RAD.DEPT       $(R1)RT[rt]|0                                           
 dept.name                   30 FREE     L                 VAL=@RAD.DEPT.name[@dept]                                   
 dept.num                    10 FREE     L                 VAL=%RAD.MRI.dept.number(@patient,@dept,"","",@site)        
 dept.or.unit.num            10 FREE     L                 VAL=%RAD.MRI.dept.or.unit.number(@patient,@dept,"","",      
                                                           VAL=@site)                                                  
 dict.by.mne                 10 FREE     L                 VAL=@t.dictated.by                                          
 dict.by.name                30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.dictated.by)                     
 dict.by.name.dis            30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.dictated.by)                
 dict.date                    8 DATE     L                 $(R1)RT[rt]T|7                                              
 dict.date.out                8 DATE     L                 VAL=@t.dict.date                                            
 dict.time                    4 HHMM     L                 $(R1)RT[rt]T|8                                              
 dict.time.out                4 HHMM     L                 VAL=@t.dict.time                                            
 dictated.by                 10 FREE     L                 $(R1)RT[rt]|8                                               
 dir.rep.text                 1 FREE     L                 VAL=IF{1^@line,@RAD.RES.free.text "Y";"N"}                  
 download.folder             60 FREE     L                                                                             
 download.format              4 FREE     L                                                                             
 download.status              9 FREE     L                                                                             
 draft.date                   8 DATE     L                 $(R1)RT[rt]DT|6                                             
 draft.time                   4 HHMM     L                 $(R1)RT[rt]DT|7                                             
 draft.user                  10 FREE     L  MIS.USER       $(R1)RT[rt]DT|8                                         
 esign.add.by.msg            60 FREE     L                 VAL=IF{@t.adden.signed.electronic[1]="Y" %RAD.RES.keyw      
                                                           VAL=ords(0,@t.adden.signed.by,2)}                           
 esign.add.by.msg.dis        30 FREE     L                 VAL=IF{@t.adden.signed.electronic[1]="Y" %RAD.RES.keyw      
                                                           VAL=ords(0,"D "_@t.adden.signed.by,2)}                      
 esign.by.msg1               60 FREE     L                 VAL=IF{@t.signed.electronic[1]="Y" %RAD.RES.keywords(0      
                                                           VAL=,@t.signed.by[1],2)}                                    
 esign.by.msg1.dis           30 FREE     L                 VAL=IF{@t.signed.electronic[1]="Y" %RAD.RES.keywords(0      
                                                           VAL=,"D "_@t.signed.by[1],2)}                               
 esign.by.msg2               60 FREE     L                 VAL=IF{@t.signed.electronic[2]="Y" %RAD.RES.keywords(0      
                                                           VAL=,@t.signed.by[2],2)}                                    
 esign.by.msg2.dis           30 FREE     L                 VAL=IF{@t.signed.electronic[1]="Y" %RAD.RES.keywords(0      
                                                           VAL=,"D "_@t.signed.by[2],2)}                               
 esign.by.msg3               60 FREE     L                 VAL=IF{@t.signed.electronic[3]="Y" %RAD.RES.keywords(0      
                                                           VAL=,@t.signed.by[3],2)}                                    
 esign.by.msg3.dis           30 FREE     L                 VAL=IF{@t.signed.electronic[1]="Y" %RAD.RES.keywords(0      
                                                           VAL=,"D "_@t.signed.by[3],2)}                               
 esign.by.msg4               60 FREE     L                 VAL=IF{@t.signed.electronic[4]="Y" %RAD.RES.keywords(0      
                                                           VAL=,@t.signed.by[4],2)}                                    
 esign.by.msg4.dis           30 FREE     L                 VAL=IF{@t.signed.electronic[1]="Y" %RAD.RES.keywords(0      
                                                           VAL=,"D "_@t.signed.by[4],2)}                               
 esign.by.msg5               60 FREE     L                 VAL=IF{@t.signed.electronic[5]="Y" %RAD.RES.keywords(0      
                                                           VAL=,@t.signed.by[5],2)}                                    
 esign.by.msg5.dis           30 FREE     L                 VAL=IF{@t.signed.electronic[1]="Y" %RAD.RES.keywords(0      
                                                           VAL=,"D "_@t.signed.by[5],2)}                               
 esign.by.msg6               60 FREE     L                 VAL=IF{@t.signed.electronic[6]="Y" %RAD.RES.keywords(0      
                                                           VAL=,@t.signed.by[6],2)}                                    
 esign.by.msg6.dis           30 FREE     L                 VAL=IF{@t.signed.electronic[1]="Y" %RAD.RES.keywords(0      
                                                           VAL=,"D "_@t.signed.by[6],2)}                               
 esign.by.sof1               21 FREE     L                 VAL=IF{@t.signed.electronic[1]="Y" "<<Signature       
                                                           VAL=on File>>"}                                       
 esign.by.sof2               21 FREE     L                 VAL=IF{@t.signed.electronic[2]="Y" "<<Signature       
                                                           VAL=on File>>"}                                       
 esign.by.sof3               21 FREE     L                 VAL=IF{@t.signed.electronic[3]="Y" "<<Signature       
                                                           VAL=on File>>"}                                       
 esign.by.sof4               21 FREE     L                 VAL=IF{@t.signed.electronic[4]="Y" "<<Signature       
                                                           VAL=on File>>"}                                       
 esign.by.sof5               21 FREE     L                 VAL=IF{@t.signed.electronic[5]="Y" "<<Signature       
                                                           VAL=on File>>"}                                       
 esign.by.sof6               21 FREE     L                 VAL=IF{@t.signed.electronic[6]="Y" "<<Signature       
                                                           VAL=on File>>"}                                       
 esign.flag1                  1 FREE     L                 VAL=IF{@t.signed.electronic[1]="Y" "*"}                     
 esign.flag2                  1 FREE     L                 VAL=IF{@t.signed.electronic[2]="Y" "*"}                     
 esign.flag3                  1 FREE     L                 VAL=IF{@t.signed.electronic[3]="Y" "*"}                     
 esign.flag4                  1 FREE     L                 VAL=IF{@t.signed.electronic[4]="Y" "*"}                     
 esign.flag5                  1 FREE     L                 VAL=IF{@t.signed.electronic[5]="Y" "*"}                     
 esign.flag6                  1 FREE     L                 VAL=IF{@t.signed.electronic[6]="Y" "*"}                     
 filed.facility              10 FREE     L  MIS.FACILITY   $(R1)RT[rt]A|3                                          
 final.status                 7 FREE     L                 $(R1)RT[rt]C|11                                             
 init.date                    8 DATE     L                 $(R1)RT[rt]DT|0                                             
 init.time                    4 HHMM     L                 $(R1)RT[rt]DT|1                                             
 init.user                   10 FREE     L  MIS.USER       $(R1)RT[rt]DT|2                                         
 interface.text.section       2 PINT     R                 $(R1)RT[rt]IS|0                                             
 label.attr                   1 CHOICE   L                 $(R1)RT[rt]C|9                                              
 labels                       1 CHOICE   L                 $(R1)RT[rt]C|3                                              
 last.print.date              8 DATE     L                 VAL=%Z.date.in.magic(@RAD.RES.last.printed)                 
 last.print.time              4 HHMM     L                 VAL=%Z.time.out(@RAD.RES.last.printed)                      
 last.print.user             10 FREE     L  MIS.USER       $(R1)RT[rt]DT|16                                        
 last.printed                10 PINT     R                 $(R1)RT[rt]DT|15                                            
 last.sent.to.hub             9 PINT     R                 $(R1)RT[rt]|13                                              
 left.margin                  4 PDEC     R                 $(R1)RT[rt]C|1                                              
 lines                        5 INT      R                 $(R1)RT[rt]T|3                                              
 med.rec.form                15 FREE     L  MIS.MR.FORM    $(R1)RT[rt]A|6                                          
 minutes                      6 DEC2     R                 VAL=@seconds*1.00/60                                        
 mri.urn                     25 URN      L  MRI.PAT        VAL=(IF{@patient#0="U" @patient%1;@ADM.PAT.mri.urn[@pa  
                                                           VAL=tient]})                                                
 mtdd.hdr                    10 FREE     L  RAD.MTDD.DICT  $(R1)RT[rt]C|17                                         
 name                        30 FREE     L                 $(R1)RT[rt]C|0                                              
 not.used..category           0 FREE     L                 $(R1)RT[rt]|7                                               
 ov.id                       10 FREE     L                 $(R1)RT[rt]|12                                              
 ov.sender                   12 FREE     L                 $(R1)RT[rt]|18                                              
 patient                     43 FREE     L  RAD.PAT        $(R1)RT[rt]|2                                           
 patient.acct.out            12 FREE     L                 VAL=%RAD.RES.show.patient(@patient,"AN")                    
 patient.name.out            30 FREE     L                 VAL=%RAD.RES.show.patient(@patient,"NA")                    
 patient.out                 43 FREE     L                 VAL=%RAD.RES.show.patient(@patient)                         
 patient.unit.out            10 FREE     L                 VAL=%RAD.RES.show.patient(@patient,"UN")                    
 pcm.incomplete               1 YN       L                 $(R1)RT[rt]A|5                                              
 pd.id                        6 FREE     L                 $(R1)RT[rt]A|2                                              
 pd.template.mnemonic        15 URN      L  MIS.PD.TMPL    $(R1)RT[rt]A|4                                          
 pend.date                    8 DATE     L                 $(R1)RT[rt]DT|3                                             
 pend.time                    4 HHMM     L                 $(R1)RT[rt]DT|4                                             
 pend.user                   10 FREE     L  MIS.USER       $(R1)RT[rt]DT|5                                         
 print.date                   8 DATE     L                 $(R1)RT[rt]DT|12                                            
 print.time                   4 HHMM     L                 $(R1)RT[rt]DT|13                                            
 print.user                  10 FREE     L  MIS.USER       $(R1)RT[rt]DT|14                                        
 quantity                     1 INT      R                 $(R1)RT[rt]|6                                               
 query.responses              5 INT      R                 $(R1)RT[rt]T|2                                              
 quick.edit.section           2 PINT     R                 $(R1)RT[rt]C|13                                             
 rank.final.status            1 INT      R                 VAL=L("CPDIHAS",@final.status#0)                            
 rank.status                  1 INT      R                 VAL=L("CPDIHAS",@status#0)                                  
 rank.t.final.status          1 INT      R                 VAL=L("CPDIHAS",@t.final.status#0)                          
 rank.t.status                1 INT      R                 VAL=L("CPDIHAS",@t.status#0)                                
 report                      10 FREE     L  RAD.REPORT     $(R1)RT[rt]|1                                           
 report.edited                1 YN       L                 $(R1)RT[rt]C|12                                             
 report.num                   9 FREE     L                 $(R1)RT[rt]|5                                               
 req.dict.by.draft            1 YN       L                 $(R1)RT[rt]C|16                                             
 req.dict.info                1 YN       L                 $(R1)RT[rt]C|14                                             
 response.attr                1 CHOICE   L                 $(R1)RT[rt]C|10                                             
 rich.text.hdr               10 FREE     L  RAD.RTF.DICT   $(R1)RT[rt]C|15                                         
 right.margin                 4 PDEC     R                 $(R1)RT[rt]C|2                                              
 seconds                     15 INT      R                 $(R1)RT[rt]T|0                                              
 section.descriptions         1 YN       L                 $(R1)RT[rt]C|4                                              
 sig.on.file                 21 FREE     L                 VAL=IF{@t.signed.electronic[1]="Y" "<<Signature       
                                                           VAL=on File>>"}                                       
 sig.on.file.any             23 FREE     L                 VAL=IF{""^XX,DO{@t.signed.electronic[XX+1^XX]'="Y"},@t      
                                                           VAL=.signed.electronic[XX]="Y" "* <<Signature on      
                                                           VAL= File>>"}                                         
 sign.by.image.1.ctf         80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[1])                    
 sign.by.image.1.ctf.inv     80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[1],1)                  
 sign.by.image.2.ctf         80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[2])                    
 sign.by.image.2.ctf.inv     80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[2],1)                  
 sign.by.image.3.ctf         80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[3])                    
 sign.by.image.3.ctf.inv     80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[3],1)                  
 sign.by.image.4.ctf         80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[4])                    
 sign.by.image.4.ctf.inv     80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[4],1)                  
 sign.by.image.5.ctf         80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[5])                    
 sign.by.image.5.ctf.inv     80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[5],1)                  
 sign.by.image.6.ctf         80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[6])                    
 sign.by.image.6.ctf.inv     80 FREE     L                 VAL=%RAD.RES.keywords(9,@t.signed.by[6],1)                  
 sign.by.mne.ctf             10 FREE     L                 VAL=@t.signed.by[1]                                         
 sign.by.name.1.ctf          30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[1])                    
 sign.by.name.1.ctf.inv      30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[1],1)                  
 sign.by.name.1.d.ctf.inv    30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[1],1)             
 sign.by.name.1.dis.ctf      30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[1])               
 sign.by.name.2.ctf          30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[2])                    
 sign.by.name.2.ctf.inv      30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[2],1)                  
 sign.by.name.2.d.ctf.inv    30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[2],1)             
 sign.by.name.2.dis.ctf      30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[2])               
 sign.by.name.3.ctf          30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[3])                    
 sign.by.name.3.ctf.inv      30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[3],1)                  
 sign.by.name.3.d.ctf.inv    30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[3],1)             
 sign.by.name.3.dis.ctf      30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[3])               
 sign.by.name.4.ctf          30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[4])                    
 sign.by.name.4.ctf.inv      30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[4],1)                  
 sign.by.name.4.d.ctf.inv    30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[4],1)             
 sign.by.name.4.dis.ctf      30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[4])               
 sign.by.name.5.ctf          30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[5])                    
 sign.by.name.5.ctf.inv      30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[5],1)                  
 sign.by.name.5.d.ctf.inv    30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[5],1)             
 sign.by.name.5.dis.ctf      30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[5])               
 sign.by.name.6.ctf          30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[6])                    
 sign.by.name.6.ctf.inv      30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[6],1)                  
 sign.by.name.6.d.ctf.inv    30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[6],1)             
 sign.by.name.6.dis.ctf      30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[6])               
 sign.by.name.ctf            30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.signed.by[1])                    
 sign.by.name.dis.ctf        30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.signed.by[1])               
 sign.date                    8 DATE     L                 $(R1)RT[rt]DT|9                                             
 sign.date.and.time.ctf      13 FREE     L                 VAL=IF{@t.signed.date[1] (%Z.date.out(@t.signed.date[1      
                                                           VAL=]),@t.signed.time[1])}                                  
 sign.date.and.time1.ctf     13 FREE     L                 VAL=IF{@t.signed.date[1] (%Z.date.out(@t.signed.date[1      
                                                           VAL=]),@t.signed.time[1])}                                  
 sign.date.and.time2.ctf     13 FREE     L                 VAL=IF{@t.signed.date[2] (%Z.date.out(@t.signed.date[2      
                                                           VAL=]),@t.signed.time[2])}                                  
 sign.date.and.time3.ctf     13 FREE     L                 VAL=IF{@t.signed.date[3] (%Z.date.out(@t.signed.date[3      
                                                           VAL=]),@t.signed.time[3])}                                  
 sign.date.and.time4.ctf     13 FREE     L                 VAL=IF{@t.signed.date[4] (%Z.date.out(@t.signed.date[4      
                                                           VAL=]),@t.signed.time[4])}                                  
 sign.date.and.time5.ctf     13 FREE     L                 VAL=IF{@t.signed.date[5] (%Z.date.out(@t.signed.date[5      
                                                           VAL=]),@t.signed.time[5])}                                  
 sign.date.and.time6.ctf     13 FREE     L                 VAL=IF{@t.signed.date[6] (%Z.date.out(@t.signed.date[6      
                                                           VAL=]),@t.signed.time[6])}                                  
 sign.date.ctf                8 DATE     L                 VAL=@t.signed.date[1]                                       
 sign.date1.ctf               8 DATE     L                 VAL=@t.signed.date[1]                                       
 sign.date2.ctf               8 DATE     L                 VAL=@t.signed.date[2]                                       
 sign.date3.ctf               8 DATE     L                 VAL=@t.signed.date[3]                                       
 sign.date4.ctf               8 DATE     L                 VAL=@t.signed.date[4]                                       
 sign.date5.ctf               8 DATE     L                 VAL=@t.signed.date[5]                                       
 sign.date6.ctf               8 DATE     L                 VAL=@t.signed.date[6]                                       
 sign.time                    4 HHMM     L                 $(R1)RT[rt]DT|10                                            
 sign.time.ctf                4 HHMM     L                 VAL=@t.signed.time[1]                                       
 sign.time1.ctf               4 HHMM     L                 VAL=@t.signed.time[1]                                       
 sign.time2.ctf               4 HHMM     L                 VAL=@t.signed.time[2]                                       
 sign.time3.ctf               4 HHMM     L                 VAL=@t.signed.time[3]                                       
 sign.time4.ctf               4 HHMM     L                 VAL=@t.signed.time[4]                                       
 sign.time5.ctf               4 HHMM     L                 VAL=@t.signed.time[5]                                       
 sign.time6.ctf               4 HHMM     L                 VAL=@t.signed.time[6]                                       
 sign.user                   10 FREE     L  MIS.USER       $(R1)RT[rt]DT|11                                        
 signed.for1.ctf             30 FREE     L                 VAL=IF{@t.signed.for[1]'=@t.signed.by[1] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[1])}                        
 signed.for1.ctf.inv         30 FREE     L                 VAL=IF{@t.signed.for[1]'=@t.signed.by[1] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[1],1)}                      
 signed.for1.dis.ctf         30 FREE     L                 VAL=IF{@t.signed.for[1]'=@t.signed.by[1] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[1])}                   
 signed.for1.dis.ctf.inv     30 FREE     L                 VAL=IF{@t.signed.for[1]'=@t.signed.by[1] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[1],1)}                 
 signed.for2.ctf             30 FREE     L                 VAL=IF{@t.signed.for[2]'=@t.signed.by[2] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[2])}                        
 signed.for2.ctf.inv         30 FREE     L                 VAL=IF{@t.signed.for[2]'=@t.signed.by[2] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[2],1)}                      
 signed.for2.dis.ctf         30 FREE     L                 VAL=IF{@t.signed.for[2]'=@t.signed.by[2] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[2])}                   
 signed.for2.dis.ctf.inv     30 FREE     L                 VAL=IF{@t.signed.for[2]'=@t.signed.by[2] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[2],1)}                 
 signed.for3.ctf             30 FREE     L                 VAL=IF{@t.signed.for[3]'=@t.signed.by[3] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[3])}                        
 signed.for3.ctf.inv         30 FREE     L                 VAL=IF{@t.signed.for[3]'=@t.signed.by[3] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[3],1)}                      
 signed.for3.dis.ctf         30 FREE     L                 VAL=IF{@t.signed.for[3]'=@t.signed.by[3] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[3])}                   
 signed.for3.dis.ctf.inv     30 FREE     L                 VAL=IF{@t.signed.for[3]'=@t.signed.by[3] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[3],1)}                 
 signed.for4.ctf             30 FREE     L                 VAL=IF{@t.signed.for[4]'=@t.signed.by[4] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[4])}                        
 signed.for4.ctf.inv         30 FREE     L                 VAL=IF{@t.signed.for[4]'=@t.signed.by[4] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[4],1)}                      
 signed.for4.dis.ctf         30 FREE     L                 VAL=IF{@t.signed.for[4]'=@t.signed.by[4] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[4])}                   
 signed.for4.dis.ctf.inv     30 FREE     L                 VAL=IF{@t.signed.for[4]'=@t.signed.by[4] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[4],1)}                 
 signed.for5.ctf             30 FREE     L                 VAL=IF{@t.signed.for[5]'=@t.signed.by[5] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[5])}                        
 signed.for5.ctf.inv         30 FREE     L                 VAL=IF{@t.signed.for[5]'=@t.signed.by[5] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[5],1)}                      
 signed.for5.dis.ctf         30 FREE     L                 VAL=IF{@t.signed.for[5]'=@t.signed.by[5] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[5])}                   
 signed.for5.dis.ctf.inv     30 FREE     L                 VAL=IF{@t.signed.for[5]'=@t.signed.by[5] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[5],1)}                 
 signed.for6.ctf             30 FREE     L                 VAL=IF{@t.signed.for[6]'=@t.signed.by[6] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[6])}                        
 signed.for6.ctf.inv         30 FREE     L                 VAL=IF{@t.signed.for[6]'=@t.signed.by[6] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,@t.signed.for[6],1)}                      
 signed.for6.dis.ctf         30 FREE     L                 VAL=IF{@t.signed.for[6]'=@t.signed.by[6] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[6])}                   
 signed.for6.dis.ctf.inv     30 FREE     L                 VAL=IF{@t.signed.for[6]'=@t.signed.by[6] "for "_%RAD.R      
                                                           VAL=ES.keywords(0,"D "_@t.signed.for[6],1)}                 
 site                        10 FREE     L  RAD.SITE       $(R1)RT[rt]|21                                          
 stats.done                   1 FREE     L                 $(R1)RT[rt]T|9                                              
 status                       9 CHOICE   L                 $(R1)RT[rt]|3                                               
 status.date                  8 DATE     L                 $(R1)RT[rt]|4                                               
 status.seconds              10 PINT     R                 $(R1)RT[rt]|20                                              
 status.time                  4 HHMM     L                 $(R1)RT[rt]|19                                              
 top.margin                   4 PDEC     R                 $(R1)RT[rt]C|5                                              
 trans.by.init                3 FREE     L                 VAL=@UNV.USER.monogram[@t.transcribed.by]                   
 trans.by.mne                10 FREE     L                 VAL=@t.transcribed.by                                       
 trans.by.name               34 FREE     L                 VAL=@MIS.USER.name[@t.transcribed.by]                       
 trans.date                   8 DATE     L                 $(R1)RT[rt]T|5                                              
 trans.date.out               8 DATE     L                 VAL=@t.trans.date                                           
 trans.time                   4 HHMM     L                 $(R1)RT[rt]T|6                                              
 trans.time.out               4 HHMM     L                 VAL=@t.trans.time                                           
 transcribed.by              10 FREE     L  MIS.USER       $(R1)RT[rt]|9                                           
 turnaround                   8 DEC2     R                 $(R1)RT[rt]T|4                                              
 update.date                  8 DATE     L                 VAL=%Z.date.in.magic(@RAD.RES.update.seconds)               
 update.seconds               9 PINT     R                 $(R1)RT[rt]|16                                              
 update.time                  4 HHMM     L                 VAL=%Z.time.out(@RAD.RES.update.seconds)                    
 visit.date                   8 DATE     L                 $(R1)RT[rt]|11                                              
 width                        3 PINT     R                 $(R1)RT[rt]C|7                                              
 word.addendum.hdr            1 YN       L                 $(R1)RT[rt]WD|7                                             
 word.addendum.sig.hdr        1 YN       L                 $(R1)RT[rt]WD|9                                             
 word.bookmark.count          2 PINT     R                 $(R1)RT[rt]|15                                              
 word.db.doc                 30 FREE     L                 $(R1)RT[rt]|14                                              
 word.hdr.file               30 FREE     L                 $(R1)RT[rt]WD|1                                             
 word.mnemonic               25 FREE     L                 $(R1)RT[rt]WD|0                                             
 word.page.footer             1 YN       L                 $(R1)RT[rt]WD|3                                             
 word.page.hdr                1 YN       L                 $(R1)RT[rt]WD|2                                             
 word.page2.hdr               1 YN       L                 $(R1)RT[rt]WD|8                                             
 word.patient.hdr             1 YN       L                 $(R1)RT[rt]WD|4                                             
 word.section.hdr             1 YN       L                 $(R1)RT[rt]WD|6                                             
 word.sig.hdr                 1 YN       L                 $(R1)RT[rt]WD|5                                             
 word.subfolder              10 FREE     L                 $(R1)RT[rt]A|1                                              
 Ì   €   i   2
mtdd.comp.links
[urn,  mtdd.comp.link.name]
$(R1)RT[rt]MTDD["L",rtMCLN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mtdd.comp.link.name         40 FREE     L                 rtMCLN                                                      
 mtdd.comp.link.guid          6 FREE     L                 $(R1)RT[rt]MTDD["L",rtMCLN]|0                               
 mtdd.comp.link.urn          15 PINT     R                 $(R1)RT[rt]MTDD["L",rtMCLN]|1                               
 Ì   €   i   2
compiled.rtf.page2.header
[urn,  crtf.page2.hdr.q]
$(R1)RT[rt]RTH2[rtRTI]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 crtf.page2.hdr.q             2 PINT     R                 rtRTI                                                       
 crtf.page2.hdr.line        100 FREE     L                 $(R1)RT[rt]RTH2[rtRTI]                                      
 Ì   €   i   2
copies.to.status
[urn,  copy.to.status]
$(R1)RT[rt]CS[reCS]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 copy.to.status               6 CHOICE   L                 reCS                                                        
 adm.ct                       1 YN       L                 $(R1)RT[rt]CS[reCS]P|24                                     
 adm.dev                     15 FREE     L                 $(R1)RT[rt]CS[reCS]P|25                                     
 adm.fax                     15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]F|8                                  
 adm.sort.no                  1 INT      R                                                                             
 adm.sort.ord                20 FREE     L                                                                             
 adm.stat                     1 YN       L                 $(R1)RT[rt]CS[reCS]P|26                                     
 att.ct                       1 YN       L                 $(R1)RT[rt]CS[reCS]P|27                                     
 att.dev                     15 FREE     L                 $(R1)RT[rt]CS[reCS]P|28                                     
 att.fax                     15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]F|9                                  
 att.sort.no                  1 INT      R                                                                             
 att.sort.ord                20 FREE     L                                                                             
 att.stat                     1 YN       L                 $(R1)RT[rt]CS[reCS]P|29                                     
 copy.to.status.edit          1 YN       L                 $(R1)RT[rt]CS[reCS]x                                        
 copy.to.status.entered       1 FREE     L                 VAL=IF{IF{@printers[urn,@copy.to.status]:0XS;@fax.prin      
                                                           VAL=ters[urn,@copy.to.status]:0XS} @Z.check.mark.data}      
 dept.ct                      1 YN       L                 $(R1)RT[rt]CS[reCS]P|2                                      
 dept.dev                    15 FREE     L                 $(R1)RT[rt]CS[reCS]P|3                                      
 dept.fax                    15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]F|1                                  
 dept.sort.no                 1 INT      R                                                                             
 dept.sort.ord               20 FREE     L                                                                             
 dept.stat                    1 YN       L                 $(R1)RT[rt]CS[reCS]P|9                                      
 dict.ct                      1 YN       L                 $(R1)RT[rt]CS[reCS]P|4                                      
 dict.dev                    15 FREE     L                 $(R1)RT[rt]CS[reCS]P|5                                      
 dict.fax                    15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]F|2                                  
 dict.sort.no                 1 INT      R                                                                             
 dict.sort.ord               20 FREE     L                                                                             
 dict.stat                    1 YN       L                 $(R1)RT[rt]CS[reCS]P|10                                     
 docs.ct                      1 YN       L                 $(R1)RT[rt]CS[reCS]P|12                                     
 docs.dev                    15 FREE     L                 $(R1)RT[rt]CS[reCS]P|13                                     
 docs.fax                    15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]F|4                                  
 docs.sort.no                 1 INT      R                                                                             
 docs.sort.ord               20 FREE     L                                                                             
 docs.stat                    1 YN       L                 $(R1)RT[rt]CS[reCS]P|14                                     
 fam.ct                       1 YN       L                 $(R1)RT[rt]CS[reCS]P|30                                     
 fam.dev                     15 FREE     L                 $(R1)RT[rt]CS[reCS]P|31                                     
 fam.fax                     15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]F|10                                 
 fam.sort.no                  1 INT      R                                                                             
 fam.sort.ord                20 FREE     L                                                                             
 fam.stat                     1 YN       L                 $(R1)RT[rt]CS[reCS]P|32                                     
 ins.ct                       1 YN       L                 $(R1)RT[rt]CS[reCS]P|15                                     
 ins.dev                     15 FREE     L                 $(R1)RT[rt]CS[reCS]P|16                                     
 ins.fax                     15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]F|5                                  
 ins.sort.no                  1 INT      R                                                                             
 ins.sort.ord                20 FREE     L                                                                             
 ins.stat                     1 YN       L                 $(R1)RT[rt]CS[reCS]P|17                                     
 mr.ct                        1 YN       L                 $(R1)RT[rt]CS[reCS]P|0                                      
 mr.dev                      15 FREE     L                 $(R1)RT[rt]CS[reCS]P|1                                      
 mr.fax                      15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]F|0                                  
 mr.sort.no                   1 INT      R                                                                             
 mr.sort.ord                 20 FREE     L                                                                             
 mr.stat                      1 YN       L                 $(R1)RT[rt]CS[reCS]P|8                                      
 ord.ct                       1 YN       L                 $(R1)RT[rt]CS[reCS]P|6                                      
 ord.dev                     15 FREE     L                 $(R1)RT[rt]CS[reCS]P|7                                      
 ord.fax                     15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]F|3                                  
 ord.sort.no                  1 INT      R                                                                             
 ord.sort.ord                20 FREE     L                                                                             
 ord.stat                     1 YN       L                 $(R1)RT[rt]CS[reCS]P|11                                     
 oth.ct                       1 YN       L                 $(R1)RT[rt]CS[reCS]P|18                                     
 oth.dev                     15 FREE     L                 $(R1)RT[rt]CS[reCS]P|19                                     
 oth.fax                     15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]F|6                                  
 oth.sort.no                  1 INT      R                                                                             
 oth.sort.ord                20 FREE     L                                                                             
 oth.stat                     1 YN       L                 $(R1)RT[rt]CS[reCS]P|20                                     
 patient.ct                   1 YN       L                 $(R1)RT[rt]CS[reCS]P|33                                     
 patient.ct.dis               1 YN       L                 $(R1)RT[rt]CS[reCS]P|38                                     
 patient.ct.er                1 YN       L                 $(R1)RT[rt]CS[reCS]P|36                                     
 patient.ct.in                1 YN       L                 $(R1)RT[rt]CS[reCS]P|35                                     
 patient.ct.out               1 YN       L                 $(R1)RT[rt]CS[reCS]P|37                                     
 patient.stat                 1 YN       L                 $(R1)RT[rt]CS[reCS]P|34                                     
 pri.ct                       1 YN       L                 $(R1)RT[rt]CS[reCS]P|21                                     
 pri.dev                     15 FREE     L                 $(R1)RT[rt]CS[reCS]P|22                                     
 pri.fax                     15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]F|7                                  
 pri.sort.no                  1 INT      R                                                                             
 pri.sort.ord                20 FREE     L                                                                             
 pri.stat                     1 YN       L                 $(R1)RT[rt]CS[reCS]P|23                                     
 ptloc.sort.no                1 INT      R                                                                             
 ptloc.sort.ord              20 FREE     L                                                                             
 Ì   €   i   2
pt.type.printers
[urn,copy.to.status,  pt.copy.to.type,pt.type]
$(R1)RT[rt]CS[reCS]PT[rePCT,rePPT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pt.copy.to.type              4 CHOICE   L                 rePCT                                                       
 pt.type                      3 CHOICE   L                 rePPT                                                       
 pt.type.dev                 15 FREE     L                 $(R1)RT[rt]CS[reCS]PT[rePCT,rePPT]|0                        
 pt.type.fax                 15 FREE     L  UNV.PRINTER    $(R1)RT[rt]CS[reCS]PT[rePCT,rePPT]|1                    
 Ì   €   i   2
doc.copies
[urn,  doc.urn]
$(R1)RT[rt]CD[cd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 doc.urn                      2 URN      L                 cd                                                          
 doc                         10 FREE     L  MIS.DOC        $(R1)RT[rt]CD[cd]|0                                     
 doc.add1                    30 FREE     L                 VAL=%MIS.DOC.get.address(@doc,MIS.DOC.facility,"ADDRES      
                                                           VAL=S")                                                     
 doc.add2                    30 FREE     L                 VAL=%MIS.DOC.get.address(@doc,MIS.DOC.facility,"ADDRES      
                                                           VAL=S2")                                                    
 doc.add3                    30 FREE     L                 VAL=IF{@doc %MIS.DOC.get.address(@doc,MIS.DOC.facility      
                                                           VAL=,"CITY")_", "_%MIS.DOC.get.address(@doc,MIS.DOC.fa      
                                                           VAL=cility,"STATE")_"  "_%MIS.DOC.get.address(@doc,MIS      
                                                           VAL=.DOC.facility,"ZIP")}                                   
 doc.email                   40 FREE     L                 VAL=@MIS.DOC.email[@doc]                                    
 doc.fax                     24 FREE     L                 VAL=@MIS.DOC.fax.number[@doc]                               
 doc.name                    30 FREE     L                 VAL=@MIS.DOC.name[@doc]                                     
 doc.phone                   18 PHONE    L                 VAL=@MIS.DOC.phone[@doc]                                    
 Ì   €   i   2
edit.data
[urn,  edit.urn]
$(R1)RT[rt]E[rtED]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 edit.urn                     3 URN      L                 rtED                                                        
 edit.date                    8 DATE     L                 $(R1)RT[rt]E[rtED]|0                                        
 edit.device                 30 FREE     L  UNV.CLIENT     $(R1)RT[rt]E[rtED]|4                                    
 edit.device.view            10 FREE     L                 VAL=@edit.device:10T                                        
 edit.event                  63 FREE     L                 $(R1)RT[rt]E[rtED]|3                                        
 edit.time                    4 HHMM     L                 $(R1)RT[rt]E[rtED]|1                                        
 edit.user                   10 FREE     L  MIS.USER       $(R1)RT[rt]E[rtED]|2                                    
 edit.user.view              10 FREE     L                 VAL=@edit.user:10T                                          
 Ì   €   i   2
edit.data.old.new
[urn,edit.urn,  edit.line]
$(R1)RT[rt]E[rtED,eln]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 edit.line                    2 PINT     R                 eln                                                         
 edit.data.new              106 FREE     L                 $(R1)RT[rt]E[rtED,eln]|1                                    
 edit.data.new.disp          89 FREE     L                 VAL=@edit.data.new:89T                                      
 edit.data.old              106 FREE     L                 $(R1)RT[rt]E[rtED,eln]|0                                    
 edit.data.old.disp          89 FREE     L                 VAL=@edit.data.old:89T                                      
 Ì   €   i   2
ins.copies
[urn,  ins.urn]
$(R1)RT[rt]CI[ci]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ins.urn                      2 URN      L                 ci                                                          
 ins                         10 FREE     L  MIS.INS        $(R1)RT[rt]CI[ci]|0                                     
 ins.add1                    30 FREE     L                 VAL=@MIS.INS.address[@ins]                                  
 ins.add2                    30 FREE     L                 VAL=@MIS.INS.address2[@ins]                                 
 ins.add3                    30 FREE     L                 VAL=IF{@ins @MIS.INS.city[@ins]_", "_@MIS.INS.state[@i      
                                                           VAL=ns]_"  "_@MIS.INS.zip[@ins]}                            
 ins.email                   40 FREE     L                 VAL=@MIS.INS.email[@ins]                                    
 ins.fax.number              24 FREE     L                 VAL=@MIS.INS.fax.number[@ins]                               
 ins.name                    30 FREE     L                 VAL=@MIS.INS.name[@ins]                                     
 ins.phone                   18 PHONE    L                 VAL=@MIS.INS.phone                                          
 Ì   €   i   2
orders
[urn,  order.urn]
$(R1)RT[rt]O[rou]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 order.urn                    2 URN      L                 rou                                                         
 category                    10 FREE     L  RAD.CAT        VAL=IF{@order.num @RAD.ORD.category[IF{@order;order}]}  
 doctor                      10 FREE     L                 VAL=IF{@order.num @RAD.ORD.doctor[ORD]}                     
 impression.by               40 FREE     L                 $(R1)RT[rt]O[rou]I|0                                        
 link.date                    8 DATE     L                 $(R1)RT[rt]O[rou]|2                                         
 link.time                    4 HHMM     L                 $(R1)RT[rt]O[rou]|3                                         
 link.user                   10 FREE     L  MIS.USER       $(R1)RT[rt]O[rou]|4                                     
 order                       15 URN      L  RAD.ORD        $(R1)RT[rt]O[rou]|0                                     
 order.num                    9 FREE     L                 $(R1)RT[rt]O[rou]|1                                         
 procedure                   30 FREE     L                 VAL=IF{@order.num @RAD.PROC.name[@RAD.ORD.category[IF{      
                                                           VAL=@order;order}^ORD],@RAD.ORD.procedure[ORD]]}            
 result.flag                  1 FREE     L                 VAL=IF{'@order.num "";@RAD.ORD.exam.result[ORD] @Z.che      
                                                           VAL=ck.mark.data;"Y"=IF{@RAD.PROC.proc.result.required      
                                                           VAL=[@RAD.ORD.category[ORD],@RAD.ORD.procedure[ORD]];@      
                                                           VAL=RAD.CAT.result.required[@RAD.ORD.category[ORD]]} "      
                                                           VAL=R"}                                                     
 Ì   €   i   2
findings.text
[urn,order.urn,  finding.q]
$(R1)RT[rt]O[rou]F[rtOF]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 finding.q                    3 PINT     R                 rtOF                                                        
 finding.text                92 TEXT     L                 $(R1)RT[rt]O[rou]F[rtOF]                                    
 Ì   €   i   2
findings.text.modified
[urn,order.urn,  finding.mod.q]
$(R1)RT[rt]O[rou]FMOD[rtOFM]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 finding.mod.q                3 PINT     R                 rtOFM                                                       
 finding.mod.text            92 TEXT     L                 $(R1)RT[rt]O[rou]FMOD[rtOFM]                                
 Ì   €   i   2
impressions.text
[urn,order.urn,  impression.q]
$(R1)RT[rt]O[rou]I[rtOI]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 impression.q                 3 PINT     R                 rtOI                                                        
 impression.text             92 TEXT     L                 $(R1)RT[rt]O[rou]I[rtOI]                                    
 Ì   €   i   2
impressions.text.modified
[urn,order.urn,  impression.mod.q]
$(R1)RT[rt]O[rou]IMOD[rtOIM]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 impression.mod.q             3 PINT     R                 rtOIM                                                       
 impression.mod.text         92 TEXT     L                 $(R1)RT[rt]O[rou]IMOD[rtOIM]                                
 Ì   €   i   2
other.copies
[urn,  oth.urn]
$(R1)RT[rt]CO[co]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 oth.urn                      2 URN      L                 co                                                          
 oth.add1                    30 FREE     L                 $(R1)RT[rt]CO[co]|1                                         
 oth.add2                    30 FREE     L                 $(R1)RT[rt]CO[co]|2                                         
 oth.add3                    30 FREE     L                 $(R1)RT[rt]CO[co]|3                                         
 oth.email                   40 FREE     L                 $(R1)RT[rt]CO[co]|4                                         
 oth.fax.number              24 FREE     L                 $(R1)RT[rt]CO[co]|8                                         
 oth.mnemonic                10 FREE     L                 $(R1)RT[rt]CO[co]|5                                         
 oth.name                    30 FREE     L                 $(R1)RT[rt]CO[co]|6                                         
 oth.name.mnemonic           30 FREE     L                 $(R1)RT[rt]CO[co]|0                                         
 oth.phone                   18 PHONE    L                 $(R1)RT[rt]CO[co]|7                                         
 Ì   €   i   2
other.dictated.bys
[urn,  other.dict.by.q]
$(R1)RT[rt]B[rtDBQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 other.dict.by.q              2 PINT     R                 rtDBQ                                                       
 other.dict.by.1.nam.inv.d   30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.other.dictated.by[1],1      
                                                           VAL=)                                                       
 other.dict.by.1.name        30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.other.dictated.by[1])            
 other.dict.by.1.name.dis    30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.other.dictated.by[1])       
 other.dict.by.1.name.inv    30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.other.dictated.by[1],1)          
 other.dict.by.2.nam.inv.d   30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.other.dictated.by[2],1      
                                                           VAL=)                                                       
 other.dict.by.2.name        30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.other.dictated.by[2])            
 other.dict.by.2.name.dis    30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.other.dictated.by[2])       
 other.dict.by.2.name.inv    30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.other.dictated.by[2],1)          
 other.dict.by.3.nam.inv.d   30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.other.dictated.by[3],1      
                                                           VAL=)                                                       
 other.dict.by.3.name        30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.other.dictated.by[3])            
 other.dict.by.3.name.dis    30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.other.dictated.by[3])       
 other.dict.by.3.name.inv    30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.other.dictated.by[3],1)          
 other.dict.by.4.nam.inv.d   30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.other.dictated.by[4],1      
                                                           VAL=)                                                       
 other.dict.by.4.name        30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.other.dictated.by[4])            
 other.dict.by.4.name.dis    30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.other.dictated.by[4])       
 other.dict.by.4.name.inv    30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.other.dictated.by[4],1)          
 other.dict.by.5.nam.inv.d   30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.other.dictated.by[5],1      
                                                           VAL=)                                                       
 other.dict.by.5.name        30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.other.dictated.by[5])            
 other.dict.by.5.name.dis    30 FREE     L                 VAL=%RAD.RES.keywords(0,"D "_@t.other.dictated.by[5])       
 other.dict.by.5.name.inv    30 FREE     L                 VAL=%RAD.RES.keywords(0,@t.other.dictated.by[5],1)          
 other.dict.by.name          30 FREE     L                 VAL=%RAD.RES.id.dict.by(@t.other.dictated.by,"NAME")        
 other.dictated.by           10 FREE     L                 $(R1)RT[rt]B[rtDBQ]|0                                       
 Ì   €   i   2
purged.order.data
[urn,  purged.order]
$(R1)RT[rt]POD[ro]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 purged.order                15 URN      L  RAD.ORD        ro                                                      
 purged.order.cat            10 FREE     L  RAD.CAT        $(R1)RT[rt]POD[ro]|2                                    
 purged.order.doctor         10 FREE     L  MIS.DOC        $(R1)RT[rt]POD[ro]|4                                    
 purged.order.num             9 FREE     L                 $(R1)RT[rt]POD[ro]|0                                        
 purged.order.ord.date        8 DATE     L                 $(R1)RT[rt]POD[ro]|6                                        
 purged.order.ord.time        4 HHMM     L                 $(R1)RT[rt]POD[ro]|7                                        
 purged.order.proc           10 FREE     L  RAD.PROC       $(R1)RT[rt]POD[ro]|3                                    
 purged.order.svc.date        8 DATE     L                 $(R1)RT[rt]POD[ro]|1                                        
 purged.order.svc.time        4 HHMM     L                 $(R1)RT[rt]POD[ro]|5                                        
 Ì   €   i   2
rcp.copies
[urn,  rcp.urn]
$(R1)RT[rt]CR[cr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 rcp.urn                      2 URN      L                 cr                                                          
 rcp                         10 FREE     L  RAD.RCP        $(R1)RT[rt]CR[cr]|0                                     
 rcp.add1                    30 FREE     L                 VAL=@RAD.RCP.addr1[@rcp]                                    
 rcp.add2                    30 FREE     L                 VAL=@RAD.RCP.addr2[@rcp]                                    
 rcp.add3                    30 FREE     L                 VAL=IF{@rcp @RAD.RCP.city[@rcp]_", "_@RAD.RCP.state[@r      
                                                           VAL=cp]_"  "_@RAD.RCP.zip[@rcp]}                            
 rcp.email                   40 FREE     L                 VAL=@RAD.RCP.email.address[@rcp]                            
 rcp.fax                     24 FREE     L                 VAL=@RAD.RCP.fax.number[@rcp]                               
 rcp.name                    30 FREE     L                 VAL=@RAD.RCP.name[@rcp]                                     
 rcp.phone                   18 PHONE    L                 VAL=@RAD.RCP.phone[@rcp]                                    
 Ì   €   i   2
rpt.messages
[urn,  rpt.msg.date,rpt.msg.time,rpt.msg.urn]
$(R1)RT[rt]MSG[rtMD,rtMT,rtMQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 rpt.msg.date                 8 DATE     L                 rtMD                                                        
 rpt.msg.time                 4 HHMM     L                 rtMT                                                        
 rpt.msg.urn                  6 PINT     R                 rtMQ                                                        
 rpt.msg.type                10 CHOICE   L                 $(R1)RT[rt]MSG[rtMD,rtMT,rtMQ]|0                            
 Ì   €   i   2
responses
[urn,  query]
$(R1)RT[rt]R[ggv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 query                       10 FREE     L  MIS.QUERY      ggv                                                     
 resp.yn.comment             92 QRY.RESP L                 $(R1)RT[rt]R[ggv]|5                                         
 response                    92 QRY.RESP L                 $(R1)RT[rt]R[ggv]|0                                         
 Ì   €   i   2
responses.multiple
[urn,query,  response.q]
$(R1)RT[rt]R[ggv]M[ggvMQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 response.q                   3 PINT     R                 ggvMQ                                                       
 response.mult               70 QRY.RESP L                 $(R1)RT[rt]R[ggv]M[ggvMQ]|0                                 
 Ì   €   i   2
sections
[urn,  section]
$(R1)RT[rt]S[prs]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 section                      2 PINT     R                 prs                                                         
 .use.me7                     0 FREE     L                 $(R1)RT[rt]S[prs]|8                                         
 add.ed                       1 CHOICE   L                 $(R1)RT[rt]S[prs]|9                                         
 blanks                       2 INT      R                 $(R1)RT[rt]S[prs]|6                                         
 canned.text.init             1 YN       L                 $(R1)RT[rt]S[prs]|11                                        
 complete                     1 YN       L                 $(R1)RT[rt]S[prs]|10                                        
 description                 30 FREE     L                 $(R1)RT[rt]S[prs]|0                                         
 draft                        1 YN       L                 $(R1)RT[rt]S[prs]|7                                         
 final                        1 YN       L                 $(R1)RT[rt]S[prs]|4                                         
 form.or.screen              15 FREE     L                 $(R1)RT[rt]S[prs]|2                                         
 inc.pic.desc                 1 YN       L                 $(R1)RT[rt]S[prs]|17                                        
 initial.word.doc            30 FREE     L                 $(R1)RT[rt]S[prs]|13                                        
 modified                     1 CHOICE   L                 $(R1)RT[rt]S[prs]|12                                        
 new.page                     1 YN       L                 $(R1)RT[rt]S[prs]|5                                         
 pic.row                      1 CHOICE   L                 $(R1)RT[rt]S[prs]|15                                        
 pic.width                    4 PDEC     R                 $(R1)RT[rt]S[prs]|16                                        
 req.comp                     3 FREE     L                 VAL=IF{@t.type#0="F"!(@t.type="Impr") "   ";IF{@t.type      
                                                           VAL=="Image" @t.form.or.screen=.ORD} "  ";IF{@t.requir      
                                                           VAL=ed;"N"}_"/"_IF{@t.complete;"N"}}                        
 required                     1 YN       L                 $(R1)RT[rt]S[prs]|3                                         
 type                         6 CHOICE   L                 $(R1)RT[rt]S[prs]|1                                         
 word.bookmark                5 FREE     L                 $(R1)RT[rt]S[prs]|14                                        
 Ì   €   i   2
free.text
[urn,section,  line]
$(R1)RT[rt]S[prs,roL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 line                         3 URN      L                 roL                                                         
 free.text.line             200                            $(R1)RT[rt]S[prs,roL]                                       
 Ì   €   i   2
free.text.modified
[urn,section,  mod.line]
$(R1)RT[rt]S[prs]MOD[roMOD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mod.line                     3 URN      L                 roMOD                                                       
 free.text.mod.line         200                            $(R1)RT[rt]S[prs]MOD[roMOD]                                 
 Ì   €   i   2
mtdd.links
[urn,section,  mtdd.link.name]
$(R1)RT[rt]S[prs]MTDD["L",rtMLN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mtdd.link.name              40 FREE     L                 rtMLN                                                       
 mtdd.link.guid               6 FREE     L                 $(R1)RT[rt]S[prs]MTDD["L",rtMLN]|0                          
 mtdd.link.urn               15 PINT     R                 $(R1)RT[rt]S[prs]MTDD["L",rtMLN]|1                          
 Ì   €   i   2
rich.text.modified
[urn,section,  rich.text.mod.q]
$(R1)RT[rt]S[prs]RTM[rtRTM]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 rich.text.mod.q              3 PINT     R                 rtRTM                                                       
 rich.text.mod.line         200 FREE     L                 $(R1)RT[rt]S[prs]RTM[rtRTM]                                 
 Ì   €   i   2
sections2
[urn,  section2]
$(R1)RT[rt]S2[prs]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 section2                     2 PINT     R                 prs                                                         
 last.pic.urn                 3 PINT     R                 $(R1)RT[rt]S2[prs]UPIC|0                                    
 pic.subfolder                8 FREE     L                 $(R1)RT[rt]S2[prs]UPIC|1                                    
 Ì   €   i   2
addenda
[urn,section2,  addendum]
$(R1)RT[rt]S2[prs]ADD[rtADQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 addendum                     2 PINT     R                 rtADQ                                                       
 add.last.pic.urn             3 PINT     R                 $(R1)RT[rt]S2[prs]ADD[rtADQ]UPIC|0                          
 add.pic.subfolder            8 FREE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]UPIC|1                          
 adden.characters             5 PINT     R                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|16                             
 adden.cosigned.by           10 FREE     L  MIS.DOC        $(R1)RT[rt]S2[prs]ADD[rtADQ]|19                         
 adden.cosigned.date          8 DATE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|20                             
 adden.cosigned.elec          1 YN       L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|22                             
 adden.cosigned.for          10 FREE     L  MIS.DOC        $(R1)RT[rt]S2[prs]ADD[rtADQ]|23                         
 adden.cosigned.time          4 HHMM     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|21                             
 adden.cosigned.user         10 FREE     L  MIS.USER       $(R1)RT[rt]S2[prs]ADD[rtADQ]|24                         
 adden.dict.date              8 DATE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|7                              
 adden.dict.time              4 HHMM     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|8                              
 adden.dictated.by           10 FREE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|6                              
 adden.lines                  5 PINT     R                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|17                             
 adden.seconds                4 PINT     R                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|15                             
 adden.signed.by             10 FREE     L  MIS.DOC        $(R1)RT[rt]S2[prs]ADD[rtADQ]|9                          
 adden.signed.date            8 DATE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|10                             
 adden.signed.electronic      1 YN       L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|12                             
 adden.signed.for            10 FREE     L  MIS.DOC        $(R1)RT[rt]S2[prs]ADD[rtADQ]|13                         
 adden.signed.time            4 HHMM     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|11                             
 adden.signed.user           10 FREE     L  MIS.USER       $(R1)RT[rt]S2[prs]ADD[rtADQ]|14                         
 adden.stats.done             1 FREE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|18                             
 adden.trans.date             8 DATE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|4                              
 adden.trans.time             4 HHMM     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|5                              
 adden.transcribed.by        10 FREE     L  MIS.USER       $(R1)RT[rt]S2[prs]ADD[rtADQ]|3                          
 addendum.date                8 DATE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|0                              
 addendum.time                4 HHMM     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]|1                              
 addendum.user               10 FREE     L  MIS.USER       $(R1)RT[rt]S2[prs]ADD[rtADQ]|2                          
 Ì   €   i   2
addenda.pictures
[urn,section2,addendum,  add.pic.q]
$(R1)RT[rt]S2[prs]ADD[rtADQ]UPIC[rtPQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 add.pic.q                    3 PINT     R                 rtPQ                                                        
 add.pic.desc                60 FREE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]UPIC[rtPQ]|0                    
 add.pic.filename            20 FREE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]UPIC[rtPQ]|3                    
 add.pic.temp                20 FREE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]UPIC[rtPQ]|4                    
 add.pic.urn                  3 PINT     R                 $(R1)RT[rt]S2[prs]ADD[rtADQ]UPIC[rtPQ]|1                    
 Ì   €   i   2
add.pic.annotations
[urn,section2,addendum,add.pic.q,  add.pic.anno.q]
$(R1)RT[rt]S2[prs]ADD[rtADQ]UPIC[rtPQ]A[rtPa]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 add.pic.anno.q               2 PINT     R                 rtPa                                                        
 add.pic.anno               200 FREE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]UPIC[rtPQ]A[rtPa]               
 Ì   €   i   2
add.pic.text
[urn,section2,addendum,add.pic.q,  add.pic.text.q]
$(R1)RT[rt]S2[prs]ADD[rtADQ]UPIC[rtPQ]T[rtPtq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 add.pic.text.q               3 PINT     R                 rtPtq                                                       
 add.pic.text.line           60 TEXT     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]UPIC[rtPQ]T[rtPtq]              
 Ì   €   i   2
addenda.rtf.text
[urn,section2,addendum,  adden.rtf.q]
$(R1)RT[rt]S2[prs]ADD[rtADQ]R[rtAQT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 adden.rtf.q                  3 PINT     R                 rtAQT                                                       
 adden.rtf.line             200 FREE     L                 $(R1)RT[rt]S2[prs]ADD[rtADQ]R[rtAQT]                        
 Ì   €   i   2
pictures
[urn,section2,  picture]
$(R1)RT[rt]S2[prs]PIC[geg]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 picture                     15 FREE     L  MIS.PICTURE    geg                                                     
 picture.added               10 PINT     R                 $(R1)RT[rt]S2[prs]PIC[geg]|0                                
 Ì   €   i   2
user.pictures
[urn,section2,  pic.q]
$(R1)RT[rt]S2[prs]UPIC[rtPQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pic.q                        3 PINT     R                 rtPQ                                                        
 pic.desc                    60 FREE     L                 $(R1)RT[rt]S2[prs]UPIC[rtPQ]|0                              
 pic.filename                20 FREE     L                 $(R1)RT[rt]S2[prs]UPIC[rtPQ]|3                              
 pic.ord.subfolder            8 FREE     L                 $(R1)RT[rt]S2[prs]UPIC[rtPQ]|5                              
 pic.temp                    20 FREE     L                 $(R1)RT[rt]S2[prs]UPIC[rtPQ]|4                              
 pic.urn                      3 PINT     R                 $(R1)RT[rt]S2[prs]UPIC[rtPQ]|1                              
 Ì   €   i   2
user.pic.annotations
[urn,section2,pic.q,  pic.anno.q]
$(R1)RT[rt]S2[prs]UPIC[rtPQ]A[rtPa]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pic.anno.q                   2 PINT     R                 rtPa                                                        
 pic.anno                   200 FREE     L                 $(R1)RT[rt]S2[prs]UPIC[rtPQ]A[rtPa]                         
 Ì   €   i   2
user.pic.text
[urn,section2,pic.q,  pic.text.q]
$(R1)RT[rt]S2[prs]UPIC[rtPQ]T[rtPtq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pic.text.q                   3 PINT     R                 rtPtq                                                       
 pic.text.line               60 TEXT     L                 $(R1)RT[rt]S2[prs]UPIC[rtPQ]T[rtPtq]                        
 Ì   €   i   2
signed.bys
[urn,  signed.by.q]
$(R1)RT[rt]SB[rtSB]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 signed.by.q                  2 PINT     R                 rtSB                                                        
 signed.by                   10 FREE     L  MIS.DOC        $(R1)RT[rt]SB[rtSB]|0                                   
 signed.by.name              30 FREE     L                 VAL=%RAD.RES.id.dict.by(@signed.by,"NAME")                  
 signed.date                  8 DATE     L                 $(R1)RT[rt]SB[rtSB]|4                                       
 signed.electronic            1 YN       L                 $(R1)RT[rt]SB[rtSB]|3                                       
 signed.for                  10 FREE     L  MIS.DOC        $(R1)RT[rt]SB[rtSB]|1                                   
 signed.for.name             30 FREE     L                 VAL=%RAD.RES.id.dict.by(@signed.for,"NAME")                 
 signed.time                  4 HHMM     L                 $(R1)RT[rt]SB[rtSB]|5                                       
 signed.user                 10 FREE     L  MIS.USER       $(R1)RT[rt]SB[rtSB]|2                                   
 Ì     i   2
message.reply.index
[msg.reply.datei,msg.reply.timei,msg.reply.urni]
?(R)RTMSGR[rtMDr,rtMTr,rtMQr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 msg.reply.datei              8 DATE     L                 rtMDr                                                       
 msg.reply.timei              4 HHMM     L                 rtMTr                                                       
 msg.reply.urni               6 PINT     R                 rtMQr                                                       
 msg.datei                    8 DATE     L                 ?(R)RTMSGR[rtMDr,rtMTr,rtMQr]|2                             
 msg.fromi                   10 FREE     L  MIS.USER       ?(R)RTMSGR[rtMDr,rtMTr,rtMQr]|0                         
 msg.timei                    4 HHMM     L                 ?(R)RTMSGR[rtMDr,rtMTr,rtMQr]|3                             
 msg.toi                     10 FREE     L  MIS.USER       ?(R)RTMSGR[rtMDr,rtMTr,rtMQr]|1                         
 msg.urni                     6 PINT     R                 ?(R)RTMSGR[rtMDr,rtMTr,rtMQr]|4                             
 Ì     i   2
messages
[msg.date,msg.time,msg.urn]
*(R)RTMSG[rtMD,rtMT,rtMQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 msg.date                     8 DATE     L                 rtMD                                                        
 msg.time                     4 HHMM     L                 rtMT                                                        
 msg.urn                      6 PINT     R                 rtMQ                                                        
 msg.dft.subject             60 FREE     L                 VAL=(@dept,"report #",@report.num)                          
 msg.dft.subject.ck           1 FREE     L                 VAL=IF{@msg.report^msg.report @msg.subject'=@msg.dft.s      
                                                           VAL=ubject#0}                                               
 msg.from                    10 FREE     L  MIS.USER       *(R)RTMSG[rtMD,rtMT,rtMQ]|1                             
 msg.mailed                   1 CHOICE   L                 *(R)RTMSG[rtMD,rtMT,rtMQ]|5                                 
 msg.new.ck                   1 YN       L                 VAL=IF{"Y"'=c.new;@msg.read "N";"Y"}                        
 msg.provider                10 FREE     L  MIS.DOC        VAL=IF{@MIS.USER.user.doctor[@msg.from];@msg.from}      
 msg.read                     1 YN       L                 *(R)RTMSG[rtMD,rtMT,rtMQ]|6                                 
 msg.reply.date               8 DATE     L                 *(R)RTMSG[rtMD,rtMT,rtMQ]|7                                 
 msg.reply.from              10 FREE     L  MIS.USER       *(R)RTMSG[rtMD,rtMT,rtMQ]|9                             
 msg.reply.needed             1 YN       L                 VAL=IF{@msg.type="TRANS"&'@msg.reply.date "Y";"N"}          
 msg.reply.time               4 HHMM     L                 *(R)RTMSG[rtMD,rtMT,rtMQ]|8                                 
 msg.reply.urn                6 PINT     R                 *(R)RTMSG[rtMD,rtMT,rtMQ]|10                                
 msg.report                  10 URN      L  RAD.RES        *(R)RTMSG[rtMD,rtMT,rtMQ]|4                             
 msg.site.ck                  1 YN       L                 VAL=IF{+c.site[""]_.=. "Y";c.site[@site[@msg.report]]       
                                                           VAL="Y";"N"}                                                
 msg.subject                 60 FREE     L                 *(R)RTMSG[rtMD,rtMT,rtMQ]|3                                 
 msg.to                      10 FREE     L  MIS.USER       *(R)RTMSG[rtMD,rtMT,rtMQ]|2                             
 msg.type                    10 CHOICE   L                 *(R)RTMSG[rtMD,rtMT,rtMQ]|0                                 
 Ì   €   i   2
messages.reply
[msg.date,msg.time,msg.urn,  msg.reply.q]
*(R)RTMSG[rtMD,rtMT,rtMQ]R[rtMRQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 msg.reply.q                  3 PINT     R                 rtMRQ                                                       
 msg.reply                   80 TEXT     L                 *(R)RTMSG[rtMD,rtMT,rtMQ]R[rtMRQ]                           
 Ì   €   i   2
messages.text
[msg.date,msg.time,msg.urn,  msg.text.q]
*(R)RTMSG[rtMD,rtMT,rtMQ]T[rtMTQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 msg.text.q                   3 PINT     R                 rtMTQ                                                       
 msg.text                    80 TEXT     L                 *(R)RTMSG[rtMD,rtMT,rtMQ]T[rtMTQ]                           
 Ì     i   2
mtdd.batches
[mtddb.dept,mtddb.batch]
?(R)MTDDB[rd,mtddB]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mtddb.dept                  10 FREE     L  RAD.DEPT       rd                                                      
 mtddb.batch                 10 PINT     R                 mtddB                                                       
 mtddb.create.date            8 DATE     L                 ?(R)MTDDB[rd,mtddB]|0                                       
 mtddb.create.time            4 HHMM     L                 ?(R)MTDDB[rd,mtddB]|1                                       
 mtddb.create.user           10 FREE     L  UNV.USER       ?(R)MTDDB[rd,mtddB]|2                                   
 mtddb.hold.queue.batch      25 FREE     L                 ?(R)MTDDB[rd,mtddB]|5                                       
 mtddb.print.error.list       1 YN       L                 ?(R)MTDDB[rd,mtddB]|3                                       
 mtddb.status                 8 CHOICE   L                 ?(R)MTDDB[rd,mtddB]|4                                       
 Ì   €   i   2
mtdd.batch.list
[mtddb.dept,mtddb.batch,mtddb.device,  mtddb.q]
?(R)MTDDB[rd,mtddB]D[hup]L[mtddQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mtddb.q                     10 PINT     R                 mtddQ                                                       
 mtddb.label                 10 FREE     L                 ?(R)MTDDB[rd,mtddB]D[hup]L[mtddQ]|1                         
 mtddb.numcopies              1 PINT     R                 ?(R)MTDDB[rd,mtddB]D[hup]L[mtddQ]|3                         
 mtddb.urn                   10 URN      L  RAD.RES        ?(R)MTDDB[rd,mtddB]D[hup]L[mtddQ]|0                     
 mtddb.who                   10 FREE     L                 ?(R)MTDDB[rd,mtddB]D[hup]L[mtddQ]|2                         
 Ì     i   2
rtf.batches
[rtfb.dept,rtfb.batch]
?(R)RTFB[rd,rtfB]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 rtfb.dept                   10 FREE     L  RAD.DEPT       rd                                                      
 rtfb.batch                  10 PINT     R                 rtfB                                                        
 rtfb.create.date             8 DATE     L                 ?(R)RTFB[rd,rtfB]|0                                         
 rtfb.create.time             4 HHMM     L                 ?(R)RTFB[rd,rtfB]|1                                         
 rtfb.create.user            10 FREE     L  UNV.USER       ?(R)RTFB[rd,rtfB]|2                                     
 rtfb.hold.queue.batch       25 FREE     L                 ?(R)RTFB[rd,rtfB]|5                                         
 rtfb.print.error.list        1 YN       L                 ?(R)RTFB[rd,rtfB]|3                                         
 rtfb.status                  8 CHOICE   L                 ?(R)RTFB[rd,rtfB]|4                                         
 Ì   €   i   2
rtf.batch.list
[rtfb.dept,rtfb.batch,rtfb.device,  rtfb.q]
?(R)RTFB[rd,rtfB]D[hup]L[rtfQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 rtfb.q                      10 PINT     R                 rtfQ                                                        
 rtfb.label                  10 FREE     L                 ?(R)RTFB[rd,rtfB]D[hup]L[rtfQ]|1                            
 rtfb.numcopies               1 PINT     R                 ?(R)RTFB[rd,rtfB]D[hup]L[rtfQ]|3                            
 rtfb.urn                    10 URN      L  RAD.RES        ?(R)RTFB[rd,rtfB]D[hup]L[rtfQ]|0                        
 rtfb.who                    10 FREE     L                 ?(R)RTFB[rd,rtfB]D[hup]L[rtfQ]|2                            
 Ì     i   2
signed.status.edit.x
[ss.edit.date,ss.edit.time,ss.edit.q]
?(R)RTSSX[rtssd,rtsst,rtssq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ss.edit.date                 8 DATE     L                 rtssd                                                       
 ss.edit.time                 4 HHMM     L                 rtsst                                                       
 ss.edit.q                    2 PINT     R                 rtssq                                                       
 ss.edit.dept                10 FREE     L  RAD.DEPT       VAL=@dept[@ss.edit.report]                              
 ss.edit.new.status           9 FREE     L                 ?(R)RTSSX[rtssd,rtsst,rtssq]|3                              
 ss.edit.old.status           9 FREE     L                 ?(R)RTSSX[rtssd,rtsst,rtssq]|2                              
 ss.edit.reason              60 FREE     L                 ?(R)RTSSX[rtssd,rtsst,rtssq]|5                              
 ss.edit.report              10 URN      L  RAD.RES        ?(R)RTSSX[rtssd,rtsst,rtssq]|0                          
 ss.edit.site                10 FREE     L  RAD.SITE       ?(R)RTSSX[rtssd,rtsst,rtssq]|4                          
 ss.edit.user                10 FREE     L  MIS.USER       ?(R)RTSSX[rtssd,rtsst,rtssq]|1                          
 Ì     i   2
temp.download.log
[tdl.site,tdl.patient,tdl.res,tdl.form]
/TDOWN[rsi,aa,rt,tdlf]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 tdl.site                    10 FREE     L  RAD.SITE       rsi                                                     
 tdl.patient                 30 URN      L  ADM.PAT        aa                                                      
 tdl.res                     10 URN      L  RAD.RES        rt                                                      
 tdl.form                     5 FREE     L                 tdlf                                                        
 tdl.acct.num                12 FREE                                                                                   
 tdl.date                     8 DATE     L                 /TDOWN[rsi,aa,rt,tdlf]|5                                    
 tdl.down.message            60 FREE     L                 /TDOWN[rsi,aa,rt,tdlf]|4                                    
 tdl.message                 60 FREE                                                                                   
 tdl.name                    30 FREE                                                                                   
 tdl.patient.acct            12 FREE     L                 /TDOWN[rsi,aa,rt,tdlf]|1                                    
 tdl.patient.name            30 FREE     L                 /TDOWN[rsi,aa,rt,tdlf]|0                                    
 tdl.patient.unit            10 FREE     L                 /TDOWN[rsi,aa,rt,tdlf]|2                                    
 tdl.rep.num                 13 FREE     L                 /TDOWN[rsi,aa,rt,tdlf]|3                                    
 tdl.report.num              13 FREE                                                                                   
 tdl.time                     4 HHMM     L                 /TDOWN[rsi,aa,rt,tdlf]|6                                    
 tdl.unit.number             10 FREE                                                                                   
 Ì     i   2
xi.file.report.obr
/MSG["OBR"]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 xi.department               10 FREE     L                 /MSG["OBR"]|3                                               
 xi.dict.by                  10 FREE     L                 /MSG["OBR"]|6                                               
 xi.dict.date.time           12 FREE     L                 /MSG["OBR"]|1                                               
 xi.ov.id                    29 FREE     L                 /MSG["OBR"]|0                                               
 xi.report                   10 FREE     L                 /MSG["OBR"]|4                                               
 xi.report.status             7 FREE     L                 /MSG["OBR"]|5                                               
 xi.trans.by                 10 FREE     L                 /MSG["OBR"]|7                                               
 xi.trans.date.time          12 FREE     L                 /MSG["OBR"]|2                                               
 Ì   €   i   2
xi.file.report.obr.orders
[xi.ord.urn]
/MSG["OBR"]O[xioU]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 xi.ord.urn                   3 URN      L                 xioU                                                        
 xi.rad.ord.cat              10 FREE     L                 /MSG["OBR"]O[xioU]|0                                        
 xi.rad.ord.num               9 FREE     L                 /MSG["OBR"]O[xioU]|2                                        
 xi.rad.ord.urn              15 URN      L  RAD.ORD        /MSG["OBR"]O[xioU]|1                                    
 Ì     i   2
xi.file.report.obx
[xi.rt.urn]
/MSG["OBX",xirtU]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 xi.rt.urn                    3 URN      L                 xirtU                                                       
 xi.report.text             255 FREE     L                 /MSG["OBX",xirtU]                                           
 Ì     i   2
xi.file.report.pid
/MSG["PID"]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 xi.encounter.number         18 FREE     L                 /MSG["PID"]|2                                               
 xi.mri.urn                  10 FREE     L                 /MSG["PID"]|0                                               
 xi.patient                  12 FREE     L                 /MSG["PID"]|1                                               

 Index Files                        Subscripts/Physical Base

 activity.x                         [dept,activity.date,urn]
                                      ?(R)RTA[rd,rtAD,rt]

 archive.id.x                       [dept,comp.report.num,urn]
                                      ?(R)RTAI[rd,rtr,rt]

 archive.x                          [archive.date,urn]
                                      ?(R)RTAR[rtARD,rt]

 audit.trail.x                      [dept,dev,date,time,urn,label,who] = status
                                      ?(R)RTAT[rd,rtqD,rtqDT,rtqTM,rt,rtqL,rtqW]

 change.x                           [date,dept,urn]
                                      ?(R)RTAX[rtqDT,rd,rt]

 delay.queue.x                      [dev,date,time,urn,label,who]
                                      ?(R)RTDQ[rtqD,rtqDT,rtqTM,rt,rtqL,rtqW]

 delete.x                           [dept,patient,urn]
                                      ?(R)RTDR[rd,aa,rt]

 dict.x                             [dept,dictated.by,init.date,urn]
                                      ?(R)RTD[rd,ggg,rtid,rt]

 download.queue                     [urn,download.format,download.folder,download.status]
                                      ?(R)RTDLQ[rt,redfm,redf,reds]

 error.log.x                        [dept,date,time,urn,label,who,err.code]
                                      ?(R)RTEL[rd,rtqDT,rtqTM,rt,rtqL,rtqW,rtqEC]

 esigned.x                          [activity.date,dictated.by,dept,urn]
                                      ?(R)RTES[rtAD,ggg,rd,rt]

 hold.queue.x                       [dept,urn,occurence,dev]
                                      ?(R)RTHQ[rd,rt,rtocc,rtqD]

 icr.x                              [patient,dictated.by,dept,report,icr.reason,date]
                                      ?(R)RTICR[aa,ggg,rd,re,rsn,rtqDT]

 link.x                             [patient,mri.urn]
                                      ?(R)RTL[aa,ea]

 order.x                            [order,urn]
                                      ?(R)RTO[ro,rt]

 ov.id.x                            [ov.sender,ov.id] = urn
                                      ?(R)RTI[rtSN,rtID]

 pat.x                              [dept,patient,urn]
                                      ?(R)RTP[rd,aa,rt]

 print.queue.x                      [dev,date,time,urn,label,who]
                                      ?(R)RTPQ[rtqD,rtqDT,rtqTM,rt,rtqL,rtqW]

 pt.activity.x                      [patient,date,urn]
                                      ?(R)RTAP[aa,rtqDT,rt]

 pt.date.activity.x                 [date,patient,urn]
                                      ?(R)RTAD[rtqDT,aa,rt]

 report.x                           [dept,comp.report.num,urn]
                                      ?(R)RTR[rd,rtr,rt]

 reprint.queue.x                    [dept,batch,urn,occurence,dev]
                                      ?(R)RTRQ[rd,rtqB,rt,rtocc,rtqD]

 sched.log                          [dept,site,date,time,urn]
                                      ?(R)RTSL[rd,rsi,rtqDT,rtqTM,rt]

 status.x                           [dept,rank.status,status.date,urn]
                                      ?(R)RTS[rd,rts,rtsd,rt]

 temp.audit.trail.x                 [dept,dev,date,time,urn,label,who]
                                      /TATX[rd,rtqD,rtqDT,rtqTM,rt,rtqL,rtqW]

 temp.hold.queue.x                  [dept,urn,occurence,dev] = print.user
                                      /THQTHQ[rd,rt,rtocc,rtqD]

 trans.stats.add.x                  [activity.date,urn,section,addendum]
                                      ?(R)RTTA[rtAD,rt,prs,rtADQ]

 trans.stats.x                      [dept,sign.date,urn]
                                      ?(R)RTTD[rd,rtSD,rt]

 trans.x                            [dept,transcribed.by,init.date,urn]
                                      ?(R)RTT[rd,gu,rtid,rt]

 urn.x                              [urn]
                                      *(R)RTZ[rt]