sHelp
                                     PHA.STATUS
       2
 main
   by.database
   dict.last.edits
   formulary.service.data
     formulary.service.text
   releases
     conversions
   rx.numbers

 Ì   €     2
main
*(T1)TSTATUS

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ...use.me.1                  5 PINT     R                 *(T1)TSTATUS["SDV"]|7                                       
 adm.bkg.off                  1 YN       L                 *(T1)TSTATUS["BKG"]|14                                      
 adm.bkg.status               7 CHOICE   L                 *(T1)TSTATUS["BKG"]|13                                      
 adv.access                   5 PINT     R                 *(T1)TSTATUS["ADV"]|6                                       
 adv.adr.report.format        5 PINT     R                 *(T1)TSTATUS["ADV"]|11                                      
 adv.claim.field              5 PINT     R                 *(T1)TSTATUS["ADV"]|8                                       
 adv.claim.form               5 PINT     R                 *(T1)TSTATUS["ADV"]|9                                       
 adv.mar.admin.format         5 PINT     R                 *(T1)TSTATUS["ADV"]|10                                      
 adv.mar.format               5 PINT     R                 *(T1)TSTATUS["ADV"]|1                                       
 adv.mar.section              5 PINT     R                 *(T1)TSTATUS["ADV"]|2                                       
 adv.mar.summary.format       5 PINT     R                 *(T1)TSTATUS["ADV"]|7                                       
 adv.order.group              5 PINT     R                 *(T1)TSTATUS["ADV"]|0                                       
 adv.profile.format           5 PINT     R                 *(T1)TSTATUS["ADV"]|5                                       
 adv.refill.list.format       5 PINT     R                 *(T1)TSTATUS["ADV"]|3                                       
 adv.refill.list.section      5 PINT     R                 *(T1)TSTATUS["ADV"]|4                                       
 bar.tape.last.done.date      8 DATE     L                 *(T1)TSTATUS|7                                              
 bill.bkg.status              7 CHOICE   L                 *(T1)TSTATUS["BKG"]|16                                      
 bkg.job.number               5 PINT     R                 VAL=@MIS.PROCESS.unique.lock.x[@.db,"BKG JOB"]              
 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                 *(T1)TSTATUS["BKG"]|3                                       
 bkg.last.adm.xfer.time       4 HHMM     L                 VAL=%Z.time.out(@bkg.last.adm.xfer.record#0S#0.)            
 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                 *(T1)TSTATUS["BKG"]|5                                       
 bkg.last.mm.activity.q       2 PINT     R                 *(T1)TSTATUS["BKG"]|6                                       
 bkg.last.mm.pha.date         8 DATE     L                 *(T1)TSTATUS["BKG"]|7                                       
 bkg.last.mm.pha.q            3 PINT     R                 *(T1)TSTATUS["BKG"]|8                                       
 bkg.last.txn                10 PINT     R                 *(T1)TSTATUS["BKG"]|4                                       
 bkg.off                      1 YN       L                 *(T1)TSTATUS["BKG"]|2                                       
 bkg.status                   7 CHOICE   L                 *(T1)TSTATUS["BKG"]|1                                       
 dc.list.last.printed         9 PINT     R                 *(T1)TSTATUS|10                                             
 due.cmpl.last.done.date      8 DATE     L                 *(T1)TSTATUS|15                                             
 fdb.ddim.version             3 CHOICE   L                 *(T1)TSTATUS|17                                             
 fdb.version                  3 FREE     L                 *(T1)TSTATUS|19                                             
 fsv.data.purge.done          1 FREE     L                 *(T1)TSTATUS|16                                             
 last.archive.fm.date         8 DATE     L                 *(T1)TSTATUS["ARCH"]|0                                      
 last.oe.bkg.lock            20 FREE     L                 *(T1)TSTATUS["BKG"]|12                                      
 mnr.current.status          30 FREE     L                 *(T1)TSTATUS["MNR"]|2                                       
 mnr.job.number               5 PINT     R                 VAL=@MIS.PROCESS.unique.lock.x[@.db,"MIDNITE RUN"]          
 mnr.last.done.date           8 DATE     L                 *(T1)TSTATUS["MNR"]|1                                       
 mnr.last.done.time           4 HHMM     L                 *(T1)TSTATUS["MNR"]|4                                       
 mnr.last.start.date          8 DATE     L                 *(T1)TSTATUS["MNR"]|0                                       
 mnr.last.start.time          4 HHMM     L                 *(T1)TSTATUS["MNR"]|3                                       
 next.adr.urn                10 PINT     R                 *(T1)TSTATUS|14                                             
 next.check.batch.urn        10 PINT     R                 *(T1)TSTATUS|18                                             
 next.claim.urn              10 PINT     R                 *(T1)TSTATUS|11                                             
 next.clin.inter.urn         10 PINT     R                 *(T1)TSTATUS|6                                              
 next.drug.number            10 PINT     R                 *(T1)TSTATUS|2                                              
 next.due.urn                 8 PINT     R                 *(T1)TSTATUS|13                                             
 next.infce.urn              10 PINT     R                 *(T1)TSTATUS|9                                              
 next.print.queue.num        10 PINT     R                 *(T1)TSTATUS|5                                              
 next.refill.urn             10 PINT     R                 *(T1)TSTATUS|4                                              
 next.rx.urn                 10 PINT     R                 *(T1)TSTATUS|0                                              
 next.search.urn              8 PINT     R                 *(T1)TSTATUS|1                                              
 next.unv.rx.number           8 PINT     R                 *(T1)TSTATUS|3                                              
 oe.bkg.job.number            5 PINT     R                 VAL=@MIS.PROCESS.unique.lock.x[@.db,"OE INTERFACE"]         
 oe.bkg.off                   1 YN       L                 *(T1)TSTATUS["BKG"]|9                                       
 oe.bkg.status                7 CHOICE   L                 *(T1)TSTATUS["BKG"]|11                                      
 oe.last.activity             9 PINT     R                 *(T1)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)               
 sdv.audit.trail.names        5 PINT     R                 *(T1)TSTATUS["SDV"]|4                                       
 sdv.barcode.formats          5 PINT     R                 *(T1)TSTATUS["SDV"]|9                                       
 sdv.data.fields              5 PINT     R                 *(T1)TSTATUS["SDV"]|1                                       
 sdv.defaults                 5 PINT     R                 *(T1)TSTATUS["SDV"]|0                                       
 sdv.device.usage             5 PINT     R                 *(T1)TSTATUS["SDV"]|5                                       
 sdv.mpg.screens              5 PINT     R                 *(T1)TSTATUS["SDV"]|2                                       
 sdv.process.functions        5 PINT     R                 *(T1)TSTATUS["SDV"]|3                                       
 sdv.refill.list.table        5 PINT     R                 *(T1)TSTATUS["SDV"]|6                                       
 sdv.review.activities        5 PINT     R                 *(T1)TSTATUS["SDV"]|10                                      
 sdv.txn.type.table           5 PINT     R                 *(T1)TSTATUS["SDV"]|8                                       
 txn.flag                    10 PINT     R                 *(T1)TSTATUS["BKG"]|15                                      
 workload.last.done.date      8 DATE     L                 *(T1)TSTATUS|8                                              
 Ì   €     2
by.database
[database]
*(T1)TSTATUS["DB",gn1]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 database                    12 FREE     L  MIS.APPL.DB    gn1                                                     
 bar.cmpl.cur.date.time      13 FREE     L                 VAL=@bar.cmpl.curr.end.date_._@bar.cmpl.cur.end.time        
 bar.cmpl.curr.date           8 DATE     L                 *(T1)TSTATUS["DB",gn1]|3                                    
 bar.cmpl.curr.end.time       4 HHMM     L                 *(T1)TSTATUS["DB",gn1]|4                                    
 bar.cmpl.last.batch.num      4 INT      R                 *(T1)TSTATUS["DB",gn1]|2                                    
 bar.cmpl.last.done.date      8 DATE     L                 *(T1)TSTATUS["DB",gn1]|0                                    
 bar.cmpl.last.end.time       4 HHMM     L                 *(T1)TSTATUS["DB",gn1]|1                                    
 bar.cmpl.last.et.disp        4 HHMM     L                 VAL=IF{@bar.cmpl.last.end.time^BCT_.=. "";BCT'=2400;23      
                                                           VAL=59}                                                     
 Ì   €     2
dict.last.edits
[dict.le.dict]
*(T1)TSTATUS["LE",tbdle]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 dict.le.dict                20 FREE     L                 tbdle                                                       
 dict.le.date                 8 DATE     L                 VAL=%Z.date.in.magic(@PHA.STATUS.dict.le.seconds)           
 dict.le.device              30 FREE     L  UNV.CLIENT     *(T1)TSTATUS["LE",tbdle]|2                              
 dict.le.mnemonic            30 FREE     L                 *(T1)TSTATUS["LE",tbdle]|3                                  
 dict.le.seconds              9 PINT     R                 *(T1)TSTATUS["LE",tbdle]|0                                  
 dict.le.time                 4 HHMM     L                 VAL=%Z.time.out(@PHA.STATUS.dict.le.seconds)                
 dict.le.user                10 FREE     L  MIS.USER       *(T1)TSTATUS["LE",tbdle]|1                              
 Ì   €     2
formulary.service.data
[formulary.service]
*(T1)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                 *(T1)TSTATUS["FS",tsFS]|8                                   
 fsv.aller.expires            8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|9                                   
 fsv.dose.chek.created        8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|12                                  
 fsv.dose.chek.expires        8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|13                                  
 fsv.drug.int.created         8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|0                                   
 fsv.drug.int.expires         8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|1                                   
 fsv.drug.notes.created       8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|16                                  
 fsv.drug.notes.expires       8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|17                                  
 fsv.iv.incomp.created        8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|2                                   
 fsv.iv.incomp.expires        8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|3                                   
 fsv.pt.ed.created            8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|4                                   
 fsv.pt.ed.expires            8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|5                                   
 fsv.pt.ed.fren.created       8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|10                                  
 fsv.pt.ed.fren.expires       8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|11                                  
 fsv.pt.ed.span.created       8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|6                                   
 fsv.pt.ed.span.expires       8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|7                                   
 fsv.ultidose.created         8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|14                                  
 fsv.ultidose.expires         8 DATE     L                 *(T1)TSTATUS["FS",tsFS]|15                                  
 Ì   €     2
formulary.service.text
[formulary.service,  fsv.text.q]
*(T1)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 TEXT     L                 *(T1)TSTATUS["FS",tsFS]T[tsFSq]                             
 Ì   €     2
releases
[release]
*(T1)TSTATUS["R",tsrel]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 release                      6 PDEC     R                 tsrel                                                       
 Ì   €     2
conversions
[release,  cfs]
*(T1)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                 *(T1)TSTATUS["R",tsrel]C[tscfs]|1                           
 cfs.done                     1 YN       L                 *(T1)TSTATUS["R",tsrel]C[tscfs]|0                           
 cfs.finish.time             12 PINT     R                 *(T1)TSTATUS["R",tsrel]C[tscfs]|3                           
 cfs.results                 50 FREE     L                 *(T1)TSTATUS["R",tsrel]C[tscfs]|4                           
 cfs.start.time              12 PINT     R                 *(T1)TSTATUS["R",tsrel]C[tscfs]|2                           
 cfs.time                    12 PINT     R                 VAL=@cfs.finish.time-@cfs.start.time                        
 Ì   €     2
rx.numbers
[rx.site]
*(T1)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                 *(T1)TSTATUS["RX",tdsi]|0                                   
 next.out.rx.number           9 PINT     R                 *(T1)TSTATUS["RX",tdsi]|1                                   
 next.unv.rx.number.site      8 PINT     R                 *(T1)TSTATUS["RX",tdsi]|2