sHelp
                                     PHA.STATS
     i   2
 inventory.txns
 main
 mm.below.zero.queue
 mm.errors
 mm.partial.item.queue
 mm.queue
   mm.drug.inventories
     mm.drug.inv.locations
   mm.vendor.data
   mm.inventory.items
 ord.use.dl.sort.q
 ord.use.doc.q
 ord.use.doc.type.q
 ord.use.ott
 order.usage.compile
   order.iv.add.carr
   order.iv.tpn
     order.iv.tpn.rx
   order.usage.med
     order.usage
     order.usage.med.ord.type
 usage
 usage.can

 Ì     i   2
inventory.txns
[txn.date,txn.q]
*(T5)TSX[txsD,txsQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.date                     8 DATE     L                 txsD                                                        
 txn.q                        3 PINT     R                 txsQ                                                        
 txn.charge                   9 MONEY    R                 *(T5)TSX[txsD,txsQ]|1                                       
 txn.cost                     9 PDEC     R                 *(T5)TSX[txsD,txsQ]|6                                       
 txn.dept                    15 FREE     L  MIS.GL.DEPT    *(T5)TSX[txsD,txsQ]|7                                   
 txn.entered                  9 PINT     R                 *(T5)TSX[txsD,txsQ]|8                                       
 txn.inventory               10 FREE     L  MM.INVENT      *(T5)TSX[txsD,txsQ]|5                                   
 txn.items                    9 PDEC     R                 *(T5)TSX[txsD,txsQ]|4                                       
 txn.location                10 FREE     L  MIS.LOCN       *(T5)TSX[txsD,txsQ]|9                                   
 txn.med                     10 FREE     L  PHA.DRUG       *(T5)TSX[txsD,txsQ]|3                                   
 txn.type                     1 CHOICE   L                 *(T5)TSX[txsD,txsQ]|0                                       
 txn.user                    10 FREE     L  MIS.USER       *(T5)TSX[txsD,txsQ]|2                                   
 Ì   €   i   2
main
[date,sort.1,sort.2]
*(T5)TS[ts,ts1,ts2]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 date                         8 DATE     L                 ts                                                          
 sort.1                      10 FREE     L                 ts1                                                         
 sort.2                      10 FREE     L                 ts2                                                         
 shift                        1 CHOICE   L                                                                             
 shift.1.count                8 PINT     R                 *(T5)TS[ts,ts1,ts2]|0                                       
 shift.2.count                8 PINT     R                 *(T5)TS[ts,ts1,ts2]|1                                       
 shift.3.count                8 PINT     R                 *(T5)TS[ts,ts1,ts2]|2                                       
 shift.start.time             4 HHMM     L                                                                             
 Ì     i   2
mm.below.zero.queue
[mm.bz.inventory,mm.bz.item,mm.bz.q]
?(T)TSB[mi,mt,tsbq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mm.bz.inventory             10 FREE     L  MM.INVENT      mi                                                      
 mm.bz.item                  43 URN      L  MM.ITEM        mt                                                      
 mm.bz.q                      3 PINT     R                 tsbq                                                        
 mm.bz.date                   8 DATE     L                 ?(T)TSB[mi,mt,tsbq]|3                                       
 mm.bz.dept                  15 FREE     L  MIS.GL.DEPT    ?(T)TSB[mi,mt,tsbq]|2                                   
 mm.bz.qty                    8 PDEC     R                 ?(T)TSB[mi,mt,tsbq]|0                                       
 mm.bz.type                   2 CHOICE   L                 ?(T)TSB[mi,mt,tsbq]|4                                       
 mm.bz.user                  10 FREE     L  MIS.USER       ?(T)TSB[mi,mt,tsbq]|1                                   
 Ì     i   2
mm.errors
[mm.err.inventory,mm.err.date,mm.err.q]
*(T1)TSE[mi,tsed,tseq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mm.err.inventory            10 FREE     L  MM.INVENT      mi                                                      
 mm.err.date                  8 DATE     L                 tsed                                                        
 mm.err.q                     3 PINT     R                 tseq                                                        
 mm.err.drug                 10 FREE     L  PHA.DRUG       *(T1)TSE[mi,tsed,tseq]|5                                
 mm.err.item                 43 URN      L  MM.ITEM        *(T1)TSE[mi,tsed,tseq]|1                                
 mm.err.msg                  50 FREE     L                 *(T1)TSE[mi,tsed,tseq]|4                                    
 mm.err.qty                   8 PINT     R                 *(T1)TSE[mi,tsed,tseq]|3                                    
 mm.err.stock                18 URN      L  MM.STOCK       *(T1)TSE[mi,tsed,tseq]|2                                
 mm.err.type                  1 CHOICE   L                 *(T1)TSE[mi,tsed,tseq]|0                                    
 Ì     i   2
mm.partial.item.queue
[mm.pi.inventory,mm.pi.item]
?(T)TSP[mi,mt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mm.pi.inventory             10 FREE     L  MM.INVENT      mi                                                      
 mm.pi.item                  43 URN      L  MM.ITEM        mt                                                      
 mm.pi.qty                    8 PDEC     R                 ?(T)TSP[mi,mt]|0                                            
 Ì     i   2
mm.queue
[mm.seconds,mm.q]
*(T1)TSM[tsms,tsmq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mm.seconds                   9 PINT     R                 tsms                                                        
 mm.q                         2 PINT     R                 tsmq                                                        
 mm.active                    1 YN       L                 *(T1)TSM[tsms,tsmq]D|14                                     
 mm.bill.code                10 FREE     L                 *(T1)TSM[tsms,tsmq]D|7                                      
 mm.category                  8 FREE     L  MM.CATEGORY    *(T1)TSM[tsms,tsmq]D|8                                  
 mm.desc.1                   30 FREE     L                 *(T1)TSM[tsms,tsmq]D|3                                      
 mm.desc.2                   30 FREE     L                 *(T1)TSM[tsms,tsmq]D|4                                      
 mm.device                   15 FREE     L                 *(T1)TSM[tsms,tsmq]D|10                                     
 mm.drug                     10 FREE     L  PHA.DRUG       *(T1)TSM[tsms,tsmq]D|0                                  
 mm.eoc                       7 FREE     L  MIS.GL.EOC     *(T1)TSM[tsms,tsmq]D|6                                  
 mm.generic.name             30 FREE     L                 *(T1)TSM[tsms,tsmq]D2|2                                     
 mm.gl.dept                  15 FREE     L  MIS.GL.DEPT    *(T1)TSM[tsms,tsmq]D|13                                 
 mm.inv.dept                 15 FREE     L  MIS.GL.DEPT    *(T1)TSM[tsms,tsmq]I|5                                  
 mm.inv.drug                 10 FREE     L  PHA.DRUG       *(T1)TSM[tsms,tsmq]I|2                                  
 mm.inv.drug.qty              8 PDEC     R                 *(T1)TSM[tsms,tsmq]I|3                                      
 mm.inv.rx.urn               10 URN      L  PHA.RX         *(T1)TSM[tsms,tsmq]I|4                                  
 mm.inv.txn.date              8 DATE     L                 *(T1)TSM[tsms,tsmq]I|6                                      
 mm.inv.user                 10 FREE     L  MIS.USER       *(T1)TSM[tsms,tsmq]I|1                                  
 mm.inventory                10 FREE     L  MM.INVENT      *(T1)TSM[tsms,tsmq]I|0                                  
 mm.item                     43 URN      L  MM.ITEM        *(T1)TSM[tsms,tsmq]D|1                                  
 mm.item.no                  10 FREE     L                 *(T1)TSM[tsms,tsmq]D|12                                     
 mm.mfr                      10 FREE     L  MIS.MFR        *(T1)TSM[tsms,tsmq]D|5                                  
 mm.name                     30 FREE     L                 *(T1)TSM[tsms,tsmq]D|2                                      
 mm.ndc.din.number           12 FREE     L                 *(T1)TSM[tsms,tsmq]D2|3                                     
 mm.no.errors                 1 FREE     L                 *(T1)TSM[tsms,tsmq]|3                                       
 mm.pha.db                   12 FREE     L  MIS.APPL.DB    *(T1)TSM[tsms,tsmq]|2                                   
 mm.pkg                      40 FREE     L                 *(T1)TSM[tsms,tsmq]D|11                                     
 mm.pt.eoc                    7 FREE     L  MIS.GL.EOC     *(T1)TSM[tsms,tsmq]D2|4                                 
 mm.tax.code                  3 FREE     L  MIS.TAX.CODE   *(T1)TSM[tsms,tsmq]D2|1                                 
 mm.taxable                   1 YN       L                 *(T1)TSM[tsms,tsmq]D2|0                                     
 mm.type                      2 CHOICE   L                 *(T1)TSM[tsms,tsmq]|0                                       
 mm.unit.issue                1 FREE     L                 *(T1)TSM[tsms,tsmq]|4                                       
 mm.updated                   1 YN       L                 *(T1)TSM[tsms,tsmq]|1                                       
 mm.user                     10 FREE     L  MIS.USER       *(T1)TSM[tsms,tsmq]D|9                                  
 Ì   €   i   2
mm.drug.inventories
[mm.seconds,mm.q,  mm.drug.inventory]
*(T1)TSM[tsms,tsmq]D["I",mi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mm.drug.inventory           10 FREE     L  MM.INVENT      mi                                                      
 mm.drug.item                43 URN      L  MM.ITEM        *(T1)TSM[tsms,tsmq]D["I",mi]|0                          
 mm.max.level                 6 PDEC     R                 *(T1)TSM[tsms,tsmq]D["I",mi]|5                              
 mm.min.level                 6 PDEC     R                 *(T1)TSM[tsms,tsmq]D["I",mi]|4                              
 mm.par                       6 PDEC     R                 *(T1)TSM[tsms,tsmq]D["I",mi]|2                              
 mm.pt.ui                     4 FREE     L                 *(T1)TSM[tsms,tsmq]D["I",mi]|8                              
 mm.pt.ui.us                  7 PINT     R                 *(T1)TSM[tsms,tsmq]D["I",mi]|9                              
 mm.shelf                    10 FREE     L                 *(T1)TSM[tsms,tsmq]D["I",mi]|3                              
 mm.stock.active              1 YN       L                 *(T1)TSM[tsms,tsmq]D["I",mi]|6                              
 mm.ui                        4 FREE     L                 *(T1)TSM[tsms,tsmq]D["I",mi]|1                              
 mm.ui.us                     7 PINT     R                 *(T1)TSM[tsms,tsmq]D["I",mi]|7                              
 Ì   €   i   2
mm.drug.inv.locations
[mm.seconds,mm.q,mm.drug.inventory,  mm.drug.inv.location]
*(T1)TSM[tsms,tsmq]D["I",mi]L[tsmL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mm.drug.inv.location        10 FREE     L                 tsmL                                                        
 Ì   €   i   2
mm.vendor.data
[mm.seconds,mm.q,  mm.ven.q]
*(T1)TSM[tsms,tsmq]D["V",tsv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mm.ven.q                     2 PINT     R                 tsv                                                         
 mm.ven                      11 FREE     L  MIS.VEN        *(T1)TSM[tsms,tsmq]D["V",tsv]|0                         
 mm.ven.cat.no               10 FREE     L                 *(T1)TSM[tsms,tsmq]D["V",tsv]|1                             
 mm.ven.conv.pkg.size        10 FREE     L                 *(T1)TSM[tsms,tsmq]D["V",tsv]|5                             
 mm.ven.cost.per.up          11 MONEY    R                 *(T1)TSM[tsms,tsmq]D["V",tsv]|2                             
 mm.ven.up                    4 FREE     L                 *(T1)TSM[tsms,tsmq]D["V",tsv]|3                             
 mm.ven.up.cnt                5 PDEC     R                 *(T1)TSM[tsms,tsmq]D["V",tsv]|4                             
 Ì   €   i   2
mm.inventory.items
[mm.seconds,mm.q,  mm.inv.item]
*(T1)TSM[tsms,tsmq]I["T",mt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mm.inv.item                 43 URN      L  MM.ITEM        mt                                                      
 mm.inv.comment              20 FREE     L                 *(T1)TSM[tsms,tsmq]I["T",mt]|1                              
 mm.inv.qty                   8 PDEC     R                 *(T1)TSM[tsms,tsmq]I["T",mt]|0                              
 Ì     i   2
ord.use.dl.sort.q
[ord.dl.sort.q]
/TSODL[odlSQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ord.dl.sort.q                2 PINT     R                 odlSQ                                                       
 ord.dl.sort.field           15 FREE     L                 /TSODL[odlSQ]                                               
 Ì     i   2
ord.use.doc.q
[ord.use.dr.q]
/TSODR[ouDRQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ord.use.dr.q                 3 PINT     R                 ouDRQ                                                       
 ord.use.dr.doc              10 FREE     L  MIS.DOC        /TSODR[ouDRQ]|0                                         
 Ì     i   2
ord.use.doc.type.q
[ord.use.dr.type.q]
/TSODRTYP[ouDDG]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ord.use.dr.type.q            3 PINT     R                 ouDDG                                                       
 ord.use.dr.doc.type         10 FREE     L  MIS.DOC.TYPE   /TSODRTYP[ouDDG]|0                                      
 Ì     i   2
ord.use.ott
[ord.use.ott.q]
/TSOTT[ouOTQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ord.use.ott.q                3 PINT     R                 ouOTQ                                                       
 ord.use.ott.ott              5 CHOICE   L                 /TSOTT[ouOTQ]                                               
 Ì     i   2
order.usage.compile
[ou.compile.q]
*(T5)TSO[ouQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ou.compile.q                 3 PINT     R                 ouQ                                                         
 ou.bkg.job.num              10 PINT     R                 *(T5)TSO[ouQ]|8                                             
 ou.compile.date              8 DATE     L                 *(T5)TSO[ouQ]|3                                             
 ou.compile.end              10 PINT     R                 *(T5)TSO[ouQ]|5                                             
 ou.compile.end.rx           10 PINT     R                 *(T5)TSO[ouQ]|7                                             
 ou.compile.start            10 PINT     R                 *(T5)TSO[ouQ]|4                                             
 ou.compile.start.rx         10 PINT     R                 *(T5)TSO[ouQ]|6                                             
 ou.from.date                 8 DATE     L                 *(T5)TSO[ouQ]|0                                             
 ou.ott.alt.cnt               8 PINT     R                 *(T5)TSO[ouQ]OTT|4                                          
 ou.ott.comp.cnt              8 PINT     R                 *(T5)TSO[ouQ]OTT|2                                          
 ou.ott.iv.cnt                8 PINT     R                 *(T5)TSO[ouQ]OTT|1                                          
 ou.ott.med.cnt               8 PINT     R                 *(T5)TSO[ouQ]OTT|0                                          
 ou.ott.split.cnt             8 PINT     R                 *(T5)TSO[ouQ]OTT|3                                          
 ou.thru.date                 8 DATE     L                 *(T5)TSO[ouQ]|1                                             
 ou.user                     10 FREE     L  MIS.USER       *(T5)TSO[ouQ]|2                                         
 Ì   €   i   2
order.iv.add.carr
[ou.compile.q,  iv.add.1,iv.add.2,iv.add.3,iv.carr.1,iv.carr.2]
*(T5)TSO[ouQ]IV.AC[tfA1,tfA2,tfA3,tfC1,tfC2]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 iv.add.1                    10 FREE     L  PHA.DRUG       tfA1                                                    
 iv.add.2                    10 FREE     L  PHA.DRUG       tfA2                                                    
 iv.add.3                    10 FREE     L  PHA.DRUG       tfA3                                                    
 iv.carr.1                   10 FREE     L  PHA.DRUG       tfC1                                                    
 iv.carr.2                   10 FREE     L  PHA.DRUG       tfC2                                                    
 iv.add.carr.cnt              8 PINT     R                 *(T5)TSO[ouQ]IV.AC[tfA1,tfA2,tfA3,tfC1,tfC2]                
 Ì   €   i   2
order.iv.tpn
[ou.compile.q,  iv.additive.cnt,iv.carrier.cnt]
*(T5)TSO[ouQ]IV.TPN[ivADc,ivCRc]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 iv.additive.cnt              8 PINT     R                 ivADc                                                       
 iv.carrier.cnt               8 PINT     R                 ivCRc                                                       
 iv.tpn.cnt                   8 PINT     R                 *(T5)TSO[ouQ]IV.TPN[ivADc,ivCRc]                            
 Ì   €   i   2
order.iv.tpn.rx
[ou.compile.q,iv.additive.cnt,iv.carrier.cnt,  order.iv.tpn.rx.urn]
*(T5)TSO[ouQ]IV.TPN[ivADc,ivCRc]TR[tr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 order.iv.tpn.rx.urn         10 URN      L  PHA.RX         tr                                                      
 order.iv.tpn.rx.number      11 FREE     L                 *(T5)TSO[ouQ]IV.TPN[ivADc,ivCRc]TR[tr]                      
 Ì   €   i   2
order.usage.med
[ou.compile.q,  ou.med]
*(T5)TSO[ouQ]M[tf]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ou.med                      10 FREE     L  PHA.DRUG       tf                                                      
 ou.med.alt.cnt               8 PINT     R                 *(T5)TSO[ouQ]M[tf]|5                                        
 ou.med.comp.cnt              8 PINT     R                 *(T5)TSO[ouQ]M[tf]|3                                        
 ou.med.iv.cnt                8 PINT     R                 *(T5)TSO[ouQ]M[tf]|2                                        
 ou.med.med.cnt               8 PINT     R                 *(T5)TSO[ouQ]M[tf]|1                                        
 ou.med.split.cnt             8 PINT     R                 *(T5)TSO[ouQ]M[tf]|4                                        
 ou.med.total.cnt             8 PINT     R                 *(T5)TSO[ouQ]M[tf]|0                                        
 Ì   €   i   2
order.usage
[ou.compile.q,ou.med,  ou.provider,ou.prov.type,ou.order.type.type,ou.ord.type,ou.dose,ou.route
*(T5)TSO[ouQ]M[tf]D[ggg,ggi,oTT,tdo,oD,tdr,dPD,ggw,oSC,aG3,a

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ou.provider                 10 FREE     L  MIS.DOC        ggg                                                     
 ou.prov.type                10 FREE     L  MIS.DOC.TYPE   ggi                                                     
 ou.order.type.type           5 CHOICE   L                 oTT                                                         
 ou.ord.type                 10 FREE     L  PHA.OT         tdo                                                     
 ou.dose                      9 PDEC     R                 oD                                                          
 ou.route                    10 FREE     L  PHA.ROUTES     tdr                                                     
 ou.dose.per.day              9 PDEC     R                 dPD                                                         
 ou.sig                      20 FREE     L  MIS.DIR        ggw                                                     
 ou.schedule                  3 CHOICE   L                 oSC                                                         
 ou.age.p.a.g                 5 PINT     R                 aG3                                                         
 ou.age.6                     5 PINT     R                 aG6                                                         
 ou.pt.sex                    1 CHOICE   L                 sX                                                          
 ou.pt.drg.diag              10 FREE     L                 oDX                                                         
 ou.prn.reason               10 FREE     L                 oPRN                                                        
 ou.count                    10 PDEC     R                 *(T5)TSO[ouQ]M[tf]D[ggg,ggi,oTT,tdo,oD,tdr,dPD,ggw,oSC,aG3,a
 Ì   €   i   2
order.usage.med.ord.type
[ou.compile.q,ou.med,  ou.med.order.type]
*(T5)TSO[ouQ]M[tf]OT[tdo]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ou.med.order.type           10 FREE     L  PHA.OT         tdo                                                     
 ou.med.ord.type.cnt            PINT     R                 *(T5)TSO[ouQ]M[tf]OT[tdo]                                   
 Ì     i   2
usage
[usort,uperiod,ukey,umed,ufac,usite,upt.type]
*(T5)TSU[tss,gp,tsk,tf,gqb,tdsi,tsp]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 usort                        4 CHOICE   L                 tss                                                         
 uperiod                     10 FREE     L  MIS.GL.PERIOD  gp                                                      
 ukey                        10 FREE     L                 tsk                                                         
 umed                        10 FREE     L  PHA.DRUG       tf                                                      
 ufac                        10 FREE     L  MIS.FACILITY   gqb                                                     
 usite                       10 FREE     L  PHA.SITE       tdsi                                                    
 upt.type                     1 CHOICE   L                 tsp                                                         
 ucharge                     11 MONEY    R                 *(T5)TSU[tss,gp,tsk,tf,gqb,tdsi,tsp]|3                      
 ucost                       11 MONEY    R                 *(T5)TSU[tss,gp,tsk,tf,gqb,tdsi,tsp]|4                      
 udose.count                  8 INT      R                 *(T5)TSU[tss,gp,tsk,tf,gqb,tdsi,tsp]|1                      
 urx.count                    6 INT      R                 *(T5)TSU[tss,gp,tsk,tf,gqb,tdsi,tsp]|0                      
 uunit.count                  8 INT      R                 *(T5)TSU[tss,gp,tsk,tf,gqb,tdsi,tsp]|2                      
 Ì     i   2
usage.can
[ucsort,ucperiod,uckey,ucinv,uceoc,ucfac,ucsite,ucpt.type]
*(T5)TSUC[tss,gp,tsk,mi,ge,gqb,tdsi,tsp]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ucsort                       4 CHOICE   L                 tss                                                         
 ucperiod                    10 FREE     L  MIS.GL.PERIOD  gp                                                      
 uckey                       10 FREE     L                 tsk                                                         
 ucinv                       10 FREE     L  PHA.INV        mi                                                      
 uceoc                        7 FREE     L  MIS.GL.EOC     ge                                                      
 ucfac                       10 FREE     L  MIS.FACILITY   gqb                                                     
 ucsite                      10 FREE     L  PHA.SITE       tdsi                                                    
 ucpt.type                    1 CHOICE   L                 tsp                                                         
 uccharge                    11 MONEY    R                 *(T5)TSUC[tss,gp,tsk,mi,ge,gqb,tdsi,tsp]|3                  
 uccost                      11 MONEY    R                 *(T5)TSUC[tss,gp,tsk,mi,ge,gqb,tdsi,tsp]|4                  
 ucdose.count                 8 INT      R                 *(T5)TSUC[tss,gp,tsk,mi,ge,gqb,tdsi,tsp]|1                  
 ucrx.count                   6 INT      R                 *(T5)TSUC[tss,gp,tsk,mi,ge,gqb,tdsi,tsp]|0                  
 ucunit.count                 8 INT      R                 *(T5)TSUC[tss,gp,tsk,mi,ge,gqb,tdsi,tsp]|2                  

 Index Files                        Subscripts/Physical Base

 shift.x                            [shift.start.time] = shift
                                      ?(T)TSS[tsh]