sHelp
                                     PHA.STATUS
       2
   pha.status.file
     pha.status.by.database
     pha.status.formulary.svc.dat
       pha.status.formulary.svc.text
     pha.status.releases
       pha.status.conversions
     pha.status.rx.numbers

 Ì       2
pha.status.file    (main) 
:TSTATUS

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 adv.access                   5 PINT     R                 :TSTATUS["ADV"]|6                                           
 adv.adr.report.format        5 PINT     R                 :TSTATUS["ADV"]|11                                          
 adv.claim.field              5 PINT     R                 :TSTATUS["ADV"]|8                                           
 adv.claim.form               5 PINT     R                 :TSTATUS["ADV"]|9                                           
 adv.dis.sum.format           5 PINT     R                 :TSTATUS["ADV"]|13                                          
 adv.mar.admin.format         5 PINT     R                 :TSTATUS["ADV"]|12                                          
 adv.mar.format               5 PINT     R                 :TSTATUS["ADV"]|1                                           
 adv.mar.section              5 PINT     R                 :TSTATUS["ADV"]|2                                           
 adv.mar.summary.format       5 PINT     R                 :TSTATUS["ADV"]|7                                           
 adv.order.group              5 PINT     R                 :TSTATUS["ADV"]|0                                           
 adv.profile.format           5 PINT     R                 :TSTATUS["ADV"]|5                                           
 adv.refill.list.format       5 PINT     R                 :TSTATUS["ADV"]|3                                           
 adv.refill.list.section      5 PINT     R                 :TSTATUS["ADV"]|4                                           
 adv.site                     5 PINT     R                 :TSTATUS["ADV"]|10                                          
 archive.queries.converted    1 YN       L                 :TSTATUS["ARCH"]|1                                          
 bar.current.status          30 FREE     L                 :TSTATUS["BAR"]|2                                           
 bar.job.number               4 PINT     R                 VAL=:.LOCK.P["PHA BAR CMPL..."_@.db]|4                      
 bar.last.done.date           8 DATE     L                 :TSTATUS["BAR"]|1                                           
 bar.last.done.time           4 HHMM     L                 :TSTATUS["BAR"]|4                                           
 bar.last.start.date          8 DATE     L                 :TSTATUS["BAR"]|0                                           
 bar.last.start.time          4 HHMM     L                 :TSTATUS["BAR"]|3                                           
 bar.tape.last.done.date      8 DATE     L                 :TSTATUS|7                                                  
 bkg.current.activity        30 FREE     L                 :TSTATUS["BKG"]|15                                          
 bkg.job.number               4 PINT     R                 VAL=:.LOCK.P["PHA BKG..."_@.db]|4                           
 bkg.last.activity            9 PINT     R                 :TSTATUS["BKG"]|0                                           
 bkg.last.activity.date       8 DATE     L                 VAL=%Z.date.in.magic(@PHA.STATUS.bkg.last.activity)         
 bkg.last.activity.time       4 HHMM     L                 VAL=%Z.time.out(@PHA.STATUS.bkg.last.activity)              
 bkg.last.adm.xfer.date       8 DATE     L                 VAL=%Z.date.in.magic(@bkg.last.adm.xfer.record#0S#0.)       
 bkg.last.adm.xfer.record     8 PINT     R                 :TSTATUS["BKG"]|3                                           
 bkg.last.adm.xfer.time       4 HHMM     L                 VAL=%Z.time.out(@bkg.last.adm.xfer.record#0S#0.)            
 bkg.last.infce.hour.check    9 PINT     R                 :TSTATUS["BKG"]|16                                          
 bkg.last.mm.act.date         8 DATE     L                 VAL=%Z.date.in.magic(@bkg.last.mm.activity)                 
 bkg.last.mm.act.time         4 HHMM     L                 VAL=%Z.time.out(@bkg.last.mm.activity)                      
 bkg.last.mm.activity         9 PINT     R                 :TSTATUS["BKG"]|5                                           
 bkg.last.mm.activity.q       2 PINT     R                 :TSTATUS["BKG"]|6                                           
 bkg.last.mm.pha.date         8 DATE     L                 :TSTATUS["BKG"]|7                                           
 bkg.last.mm.pha.q            3 PINT     R                 :TSTATUS["BKG"]|8                                           
 bkg.last.txn                10 PINT     R                 :TSTATUS["BKG"]|4                                           
 bkg.off                      1 YN       L                 :TSTATUS["BKG"]|2                                           
 bkg.print.queue.halt         1 PINT     R                 :TSTATUS["BKG"]|14                                          
 bkg.status                  20 CHOICE   L                 :TSTATUS["BKG"]|1                                           
 dc.list.last.printed         9 PINT     R                 :TSTATUS|10                                                 
 due.cmpl.last.done.date      8 DATE     L                 :TSTATUS|15                                                 
 fsv.data.purge.done          1 FREE     L                 :TSTATUS|16                                                 
 last.archive.fm.date         8 DATE     L                 :TSTATUS["ARCH"]|0                                          
 last.oe.bkg.lock            20 FREE     L                 :TSTATUS["BKG"]|12                                          
 last.one.time.order.urn     10 PINT     R                 :TSTATUS|17                                                 
 mnr.current.status          30 FREE     L                 :TSTATUS["MNR"]|2                                           
 mnr.date.error               1 CHOICE   L                 :TSTATUS["MNR"]|5                                           
 mnr.job.number               4 PINT     R                 VAL=:.LOCK.P["PHA MDNT RUN..."_@.db]|4                      
 mnr.last.done.date           8 DATE     L                 :TSTATUS["MNR"]|1                                           
 mnr.last.done.time           4 HHMM     L                 :TSTATUS["MNR"]|4                                           
 mnr.last.start.date          8 DATE     L                 :TSTATUS["MNR"]|0                                           
 mnr.last.start.time          4 HHMM     L                 :TSTATUS["MNR"]|3                                           
 next.adr.urn                10 PINT     R                 :TSTATUS|14                                                 
 next.claim.urn              10 PINT     R                 :TSTATUS|11                                                 
 next.clin.inter.urn         10 PINT     R                 :TSTATUS|6                                                  
 next.drug.number            10 PINT     R                 :TSTATUS|2                                                  
 next.due.urn                 8 PINT     R                 :TSTATUS|13                                                 
 next.infce.urn              10 PINT     R                 :TSTATUS|9                                                  
 next.print.queue.num        10 PINT     R                 :TSTATUS|5                                                  
 next.refill.urn             10 PINT     R                 :TSTATUS|4                                                  
 next.rx.urn                 10 PINT     R                 :TSTATUS|0                                                  
 next.search.urn              8 PINT     R                 :TSTATUS|1                                                  
 next.unv.rx.number           8 PINT     R                 :TSTATUS|3                                                  
 num.one.time.orders          5 PINT     R                 :TSTATUS|18                                                 
 oe.bkg.job.number            4 PINT     R                 VAL=:.LOCK.P["PHA OE..."_@.db]|4                            
 oe.bkg.off                   1 YN       L                 :TSTATUS["BKG"]|9                                           
 oe.bkg.status                7 CHOICE   L                 :TSTATUS["BKG"]|11                                          
 oe.last.activity             9 PINT     R                 :TSTATUS["BKG"]|10                                          
 oe.last.activity.date        8 DATE     L                 VAL=%Z.date.in.magic(@PHA.STATUS.oe.last.activity)          
 oe.last.activity.time        4 HHMM     L                 VAL=%Z.time.out(@PHA.STATUS.oe.last.activity)               
 onc.gen.ready.to.retrieve    1 YN       L                 :TSTATUS|19                                                 
 restrict.doses.to.credit     9 PINT     R                 :TSTATUS|12                                                 
 sdv.access.order.fields      5 PINT     R                 :TSTATUS["SDV"]|8                                           
 sdv.act.code.names           5 PINT     R                 :TSTATUS["SDV"]|13                                          
 sdv.audit.trail.names        5 PINT     R                 :TSTATUS["SDV"]|4                                           
 sdv.barcode.formats          5 PINT     R                 :TSTATUS["SDV"]|10                                          
 sdv.data.fields              5 PINT     R                 :TSTATUS["SDV"]|1                                           
 sdv.defaults                 5 PINT     R                 :TSTATUS["SDV"]|0                                           
 sdv.device.usage             5 PINT     R                 :TSTATUS["SDV"]|5                                           
 sdv.emar.warn.types          5 PINT     R                 :TSTATUS["SDV"]|12                                          
 sdv.iv.rate.keywords         5 PINT     R                 :TSTATUS["SDV"]|14                                          
 sdv.mpg.screens              5 PINT     R                 :TSTATUS["SDV"]|2                                           
 sdv.process.functions        5 PINT     R                 :TSTATUS["SDV"]|3                                           
 sdv.refill.list.table        5 PINT     R                 :TSTATUS["SDV"]|6                                           
 sdv.review.activities        5 PINT     R                 :TSTATUS["SDV"]|11                                          
 sdv.rpt.formats              5 PINT     R                 :TSTATUS["SDV"]|9                                           
 sdv.txn.type.table           5 PINT     R                 :TSTATUS["SDV"]|7                                           
 txn.flag                    10 PINT     R                 :TSTATUS["BKG"]|13                                          
 workload.last.done.date      8 DATE     L                 :TSTATUS|8                                                  
 Ì       2
pha.status.by.database    (by.database) 
[database]
:TSTATUS["DB",iaD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 database                    12 FREE     L  MIS.APPL       iaD                                                     
 bar.cmpl.last.done.date      8 DATE     L                 :TSTATUS["DB",iaD]|0                                        
 Ì       2
pha.status.formulary.svc.dat    (formulary.service.data) 
[formulary.service]
:TSTATUS["FS",tsFS]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 formulary.service            3 CHOICE   L                 tsFS                                                        
 fsv.aller.created            8 DATE     L                 :TSTATUS["FS",tsFS]|8                                       
 fsv.aller.expires            8 DATE     L                 :TSTATUS["FS",tsFS]|9                                       
 fsv.dose.chek.created        8 DATE     L                 :TSTATUS["FS",tsFS]|10                                      
 fsv.dose.chek.expires        8 DATE     L                 :TSTATUS["FS",tsFS]|11                                      
 fsv.drug.disease.created     8 DATE     L                 :TSTATUS["FS",tsFS]|16                                      
 fsv.drug.disease.expires     8 DATE     L                 :TSTATUS["FS",tsFS]|17                                      
 fsv.drug.int.created         8 DATE     L                 :TSTATUS["FS",tsFS]|0                                       
 fsv.drug.int.expires         8 DATE     L                 :TSTATUS["FS",tsFS]|1                                       
 fsv.drug.notes.created       8 DATE     L                 :TSTATUS["FS",tsFS]|14                                      
 fsv.drug.notes.expires       8 DATE     L                 :TSTATUS["FS",tsFS]|15                                      
 fsv.iv.incomp.created        8 DATE     L                 :TSTATUS["FS",tsFS]|2                                       
 fsv.iv.incomp.expires        8 DATE     L                 :TSTATUS["FS",tsFS]|3                                       
 fsv.pt.ed.created            8 DATE     L                 :TSTATUS["FS",tsFS]|4                                       
 fsv.pt.ed.expires            8 DATE     L                 :TSTATUS["FS",tsFS]|5                                       
 fsv.pt.ed.span.created       8 DATE     L                 :TSTATUS["FS",tsFS]|6                                       
 fsv.pt.ed.span.expires       8 DATE     L                 :TSTATUS["FS",tsFS]|7                                       
 fsv.ultidose.created         8 DATE     L                 :TSTATUS["FS",tsFS]|12                                      
 fsv.ultidose.expires         8 DATE     L                 :TSTATUS["FS",tsFS]|13                                      
 Ì       2
pha.status.formulary.svc.text    (formulary.service.text) 
[formulary.service, fsv.text.q]
:TSTATUS["FS",tsFS]T[tsFSq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 fsv.text.q                   2 PINT     R                 tsFSq                                                       
 fsv.text                    80 FREE     L                 :TSTATUS["FS",tsFS]T[tsFSq]                                 
 Ì       2
pha.status.releases    (releases) 
[release]
:TSTATUS["R",tsrel]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 release                      6 PDEC     R                 tsrel                                                       
 Ì       2
pha.status.conversions    (conversions) 
[release, cfs]
:TSTATUS["R",tsrel]C[tscfs]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cfs                          6 FREE     L                 tscfs                                                       
 cfs.date                     8 DATE     L                 :TSTATUS["R",tsrel]C[tscfs]|1                               
 cfs.done                     1 YN       L                 :TSTATUS["R",tsrel]C[tscfs]|0                               
 Ì       2
pha.status.rx.numbers    (rx.numbers) 
[rx.site]
:TSTATUS["RX",tdsi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 rx.site                     10 FREE     L  PHA.SITE       tdsi                                                    
 next.inp.rx.number           9 PINT     R                 :TSTATUS["RX",tdsi]|0                                       
 next.out.rx.number           9 PINT     R                 :TSTATUS["RX",tdsi]|1