sHelp
                                     RAD.STATUS
       2
 main
   dept.queues
   print.queues
   releases
   site.data
     site.dept.data

 Ì   €     2
main
*(R)RSTATUS

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 adm.bkg.status               7 CHOICE   L                 *(R)RSTATUS|2                                               
 billing.job.completed       13 FREE     L                 *(R)RSTATUS|6                                               
 bkg.job.number              10 PINT     R                 VAL=@MIS.PROCESS.unique.lock.x[@.db,"BKG JOB"]              
 bkg.ord.archive.last.date    8 DATE     L                 *(R)RSTATUS|14                                              
 bkg.rpt.archive.last.date    8 DATE     L                 *(R)RSTATUS|15                                              
 bkg.status                   7 CHOICE   L                 *(R)RSTATUS|1                                               
 bkg.status.mm               10 CHOICE   L                 *(R)RSTATUS["A"]|3                                          
 bkg.status.mm.last.date      8 DATE     L                 *(R)RSTATUS["A"]|4                                          
 bkg.status.mm.last.time      4 HHMM     L                 *(R)RSTATUS["A"]|5                                          
 file.software.version       10 FREE     L                 *(R)RSTATUS|0                                               
 last.adm.xfer.date           8 DATE     L                 VAL=%Z.date.in.magic(@last.adm.xfer.subscript#0S#.)         
 last.adm.xfer.subscript      8 FREE     L                 *(R)RSTATUS|4                                               
 last.adm.xfer.time           4 HHMM     L                 VAL=%Z.time.out(@last.adm.xfer.subscript#0S#.)              
 last.bar.trsfr.date.time    15 FREE     L                 *(R)RSTATUS|16                                              
 last.dept.sched.day          3 CHOICE   L                 *(R)RSTATUS["A"]|6                                          
 last.dept.sched.time         4 HHMM     L                 *(R)RSTATUS["A"]|7                                          
 last.device                 15 FREE     L                 *(R)RSTATUS|5                                               
 last.oe.bkg.lock            20 FREE     L                 *(R)RSTATUS|13                                              
 mnr.current.status          30 FREE     L                 *(R)RSTATUS["MNR"]|2                                        
 mnr.job.number              10 PINT     R                 VAL=@MIS.PROCESS.unique.lock.x[@.db,"MIDNITE RUN"]          
 mnr.last.done.date           8 DATE     L                 *(R)RSTATUS["MNR"]|1                                        
 mnr.last.done.time           4 HHMM     L                 *(R)RSTATUS["MNR"]|4                                        
 mnr.last.start.date          8 DATE     L                 *(R)RSTATUS["MNR"]|0                                        
 mnr.last.start.time          4 HHMM     L                 *(R)RSTATUS["MNR"]|3                                        
 next.mri.follow.up.urn      10 PINT     R                 *(R)RSTATUS["A"]|8                                          
 next.report.search.urn      10 PINT     R                 *(R)RSTATUS["A"]|2                                          
 next.search.urn             10 PINT     R                 *(R)RSTATUS["A"]|0                                          
 next.stat.urn               10 PINT     R                 *(R)RSTATUS["A"]|1                                          
 oe.bkg.job.number           10 PINT     R                 VAL=@MIS.PROCESS.unique.lock.x[@.db,"OE INTERFACE"]         
 oe.bkg.off                   1 YN       L                 *(R)RSTATUS|11                                              
 oe.bkg.status                7 CHOICE   L                 *(R)RSTATUS|10                                              
 oe.last.activity             9 PINT     R                 *(R)RSTATUS|12                                              
 oe.last.activity.date        8 DATE     L                 VAL=%Z.date.in.magic(@RAD.STATUS.oe.last.activity)          
 oe.last.activity.time        4 HHMM     L                 VAL=%Z.time.out(@RAD.STATUS.oe.last.activity)               
 print.bkg.status             7 CHOICE   L                 *(R)RSTATUS|3                                               
 statistics.job.complete      3 CHOICE   L                 *(R)RSTATUS|7                                               
 statistics.job.start.date    8 DATE     L                 *(R)RSTATUS|8                                               
 workload.last.done.date      8 DATE     L                 *(R)RSTATUS|9                                               
 Ì   €     2
dept.queues
[dept]
*(R)RSTATUS["D",rd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 dept                        10 FREE     L  RAD.DEPT       rd                                                      
 print.queue.current          3 FREE     L                 VAL=IF{"Y"=@print.queue.on "ON";"OFF"}                      
 print.queue.new              3 FREE     L                 VAL=IF{"Y"=@print.queue.on "OFF";"ON"}                      
 print.queue.on               1 YN       L                 *(R)RSTATUS["D",rd]|0                                       
 Ì   €     2
print.queues
[pq.dept,pq.site]
*(R)RSTATUS["PQ",rd,rsi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pq.dept                     10 FREE     L  RAD.DEPT       rd                                                      
 pq.site                     10 FREE     L  RAD.SITE       rsi                                                     
 pq.current                   3 FREE     L                 VAL=IF{"Y"=@pq.on "ON";"OFF"}                               
 pq.last.occurence            1 YN       L                 *(R)RSTATUS["PQ",rd,rsi]|1                                  
 pq.new                       3 FREE     L                 VAL=IF{"Y"=@pq.on "OFF";"ON"}                               
 pq.on                        1 YN       L                 *(R)RSTATUS["PQ",rd,rsi]|0                                  
 Ì   €     2
releases
[release]
*(R)RSTATUS["R",roREL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 release                      6 DEC      R                 roREL                                                       
 Ì   €     2
site.data
[site]
*(R)RSTATUS["S",rsi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 site                        10 FREE     L  RAD.SITE       rsi                                                     
 Ì   €     2
site.dept.data
[site,  site.dept]
*(R)RSTATUS["S",rsi]D[rd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 site.dept                   10 FREE     L  RAD.DEPT       rd                                                      
 last.rt.del.date             8 DATE     L                 *(R)RSTATUS["S",rsi]D[rd]|0