sHelp
                                     PHA.STATS
     i   2
 emar.dtl.admin.stats
   emar.dtl.admin.stats.2
 emar.dtl.pat.stats
 emar.oc.map
   emar.oc.map.cmt
 emar.sum.admin.stats
   emar.sum.admin.stats.2
 emar.sum.pat.stats
 emar.warn.types
 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
emar.dtl.admin.stats
[emar.dtl.date]
*(T5)TSED[edd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 emar.dtl.date                8 DATE     L                 edd                                                         
 emar.dtl.num.admin           5 PINT     R                 *(T5)TSED[edd]|0                                            
 emar.dtl.num.admin.wrn       5 PINT     R                 *(T5)TSED[edd]|5                                            
 emar.dtl.num.nadmin.wrn      5 PINT     R                 *(T5)TSED[edd]|6                                            
 emar.dtl.num.pt.scan         5 PINT     R                 *(T5)TSED[edd]|4                                            
 emar.dtl.num.pt.ver          5 PINT     R                 *(T5)TSED[edd]|3                                            
 emar.dtl.num.scan            5 PINT     R                 *(T5)TSED[edd]|1                                            
 emar.dtl.num.warn            5 PINT     R                 *(T5)TSED[edd]|2                                            
 Ì   €   i   2
emar.dtl.admin.stats.2
[emar.dtl.date,  emar.dtl.activity.type,emar.dtl.location,emar.dtl.admin.user,emar.dtl.admin.dr
*(T5)TSED[edd,edat,ggn,gu,tf,tdr,tdb,ggg,gu2]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 emar.dtl.activity.type      10 FREE     L                 edat                                                        
 emar.dtl.location           10 FREE     L  MIS.LOCN       ggn                                                     
 emar.dtl.admin.user         10 FREE     L  MIS.USER       gu                                                      
 emar.dtl.admin.drug         10 FREE     L  PHA.DRUG       tf                                                      
 emar.dtl.admin.route        10 FREE     L  PHA.ROUTES     tdr                                                     
 emar.dtl.drug.type          10 FREE     L  PHA.DRUG.TYPE  tdb                                                     
 emar.dtl.order.dr           10 FREE     L  MIS.DOC        ggg                                                     
 emar.dtl.enter.user         10 FREE     L  MIS.USER       gu2                                                     
 emar.dtl.next.act.type      10 FREE     L                 VAL=>*(T5)TSED[emar.dtl.date,X]                          
 emar.dtl.next.adm.drug      10 FREE     L                 VAL=>*(T5)TSED[emar.dtl.date,emar.dtl.activity.type      
                                                           VAL=,emar.dtl.location,emar.dtl.admin.user,X]               
 emar.dtl.next.adm.route     10 FREE     L                 VAL=>*(T5)TSED[emar.dtl.date,emar.dtl.activity.type      
                                                           VAL=,emar.dtl.location,emar.dtl.admin.user,emar.dtl.ad      
                                                           VAL=min.drug,X]                                             
 emar.dtl.next.adm.user      10 FREE     L                 VAL=>*(T5)TSED[emar.dtl.date,emar.dtl.activity.type      
                                                           VAL=,emar.dtl.location,X]                                   
 emar.dtl.next.drug.type     10 FREE     L                 VAL=>*(T5)TSED[emar.dtl.date,emar.dtl.activity.type      
                                                           VAL=,emar.dtl.location,emar.dtl.admin.user,emar.dtl.ad      
                                                           VAL=min.drug,emar.dtl.admin.route,X]                        
 emar.dtl.next.ent.user      10 FREE     L                 VAL=>*(T5)TSED[emar.dtl.date,emar.dtl.activity.type      
                                                           VAL=,emar.dtl.location,emar.dtl.admin.user,emar.dtl.ad      
                                                           VAL=min.drug,emar.dtl.admin.route,emar.dtl.drug.type,e      
                                                           VAL=mar.dtl.order.dr,X]                                     
 emar.dtl.next.loc           10 FREE     L                 VAL=>*(T5)TSED[emar.dtl.date,emar.dtl.activity.type      
                                                           VAL=,X]                                                     
 emar.dtl.next.order.dr      10 FREE     L                 VAL=>*(T5)TSED[emar.dtl.date,emar.dtl.activity.type      
                                                           VAL=,emar.dtl.location,emar.dtl.admin.user,emar.dtl.ad      
                                                           VAL=min.drug,emar.dtl.admin.route,emar.dtl.drug.type,X      
                                                           VAL=]                                                       
 emar.dtl.num.filed           4 PINT     R                 *(T5)TSED[edd,edat,ggn,gu,tf,tdr,tdb,ggg,gu2]|1             
 emar.dtl.num.received        4 PINT     R                 *(T5)TSED[edd,edat,ggn,gu,tf,tdr,tdb,ggg,gu2]|0             
 Ì     i   2
emar.dtl.pat.stats
[emar.dtl.pt.date,emar.dtl.pt.location]
*(T5)TSEDP[edpd,ggn]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 emar.dtl.pt.date             8 DATE     L                 edpd                                                        
 emar.dtl.pt.location        10 FREE     L  MIS.LOCN       ggn                                                     
 emar.dtl.pt.acct.mtc.file    5 PINT     R                 *(T5)TSEDP[edpd,ggn]|2                                      
 emar.dtl.pt.acct.mtc.tot     5 PINT     R                 *(T5)TSEDP[edpd,ggn]|0                                      
 emar.dtl.pt.unit.match       5 PINT     R                 *(T5)TSEDP[edpd,ggn]|1                                      
 Ì     i   2
emar.oc.map
[emar.oc.map.q]
*(T5)TSEOM[eomcq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 emar.oc.map.q                4 PINT     R                 eomcq                                                       
 emar.oc.map.last.date        8 DATE     L                 *(T5)TSEOM[eomcq]|0                                         
 Ì   €   i   2
emar.oc.map.cmt
[emar.oc.map.q,  emar.oc.map.line.q]
*(T5)TSEOM[eomcq]CMT[eomlq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 emar.oc.map.line.q           4 PINT     R                 eomlq                                                       
 emar.oc.map.line            60 FREE     L                 *(T5)TSEOM[eomcq]CMT[eomlq]                                 
 emar.oc.map.line.1          60 FREE     L                 VAL=@emar.oc.map.cmt[1]                                     
 Ì     i   2
emar.sum.admin.stats
[emar.sum]
*(T5)TSEM[emd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 emar.sum                     6 FREE     L                 emd                                                         
 emar.sum.num.admin           6 PINT     R                 *(T5)TSEM[emd]|0                                            
 emar.sum.num.admin.wrn       6 PINT     R                 *(T5)TSEM[emd]|5                                            
 emar.sum.num.notadmin.wrn    6 PINT     R                 *(T5)TSEM[emd]|6                                            
 emar.sum.num.pt.scan         6 PINT     R                 *(T5)TSEM[emd]|4                                            
 emar.sum.num.pt.ver          6 PINT     R                 *(T5)TSEM[emd]|3                                            
 emar.sum.num.scan            6 PINT     R                 *(T5)TSEM[emd]|1                                            
 emar.sum.num.warn            6 PINT     R                 *(T5)TSEM[emd]|2                                            
 Ì   €   i   2
emar.sum.admin.stats.2
[emar.sum,  emar.sum.activity.type,emar.sum.location,emar.sum.admin.user,emar.sum.admin.drug,em
*(T5)TSEM[emd,edat,ggn,gu,tf,tdr,tdb,ggg,gu2]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 emar.sum.activity.type      10 FREE     L                 edat                                                        
 emar.sum.location           10 FREE     L  MIS.LOCN       ggn                                                     
 emar.sum.admin.user         10 FREE     L  MIS.USER       gu                                                      
 emar.sum.admin.drug         10 FREE     L  PHA.DRUG       tf                                                      
 emar.sum.admin.route        10 FREE     L  PHA.ROUTES     tdr                                                     
 emar.sum.drug.type          10 FREE     L  PHA.DRUG.TYPE  tdb                                                     
 emar.sum.order.dr           10 FREE     L  MIS.DOC        ggg                                                     
 emar.sum.enter.user         10 FREE     L  MIS.USER       gu2                                                     
 emar.sum.next.act.type      10 FREE     L                 VAL=>*(T5)TSEM[emar.sum,X]                               
 emar.sum.next.admin.drug    10 FREE     L                 VAL=>*(T5)TSEM[emar.sum,emar.sum.activity.type,emar      
                                                           VAL=.sum.location,emar.sum.admin.user,X]                    
 emar.sum.next.admin.route   10 FREE     L                 VAL=>*(T5)TSEM[emar.sum,emar.sum.activity.type,emar      
                                                           VAL=.sum.location,emar.sum.admin.user,emar.sum.admin.d      
                                                           VAL=rug,X]                                                  
 emar.sum.next.admin.user    10 FREE     L                 VAL=>*(T5)TSEM[emar.sum,emar.sum.activity.type,emar      
                                                           VAL=.sum.location,X]                                        
 emar.sum.next.drug.type     10 FREE     L                 VAL=>*(T5)TSEM[emar.sum,emar.sum.activity.type,emar      
                                                           VAL=.sum.location,emar.sum.admin.user,emar.sum.admin.d      
                                                           VAL=rug,emar.sum.admin.route,X]                             
 emar.sum.next.ent.user      10 FREE     L                 VAL=>*(T5)TSEM[emar.sum,emar.sum.activity.type,emar      
                                                           VAL=.sum.location,emar.sum.admin.user,emar.sum.admin.d      
                                                           VAL=rug,emar.sum.admin.route,emar.sum.drug.type,emar.s      
                                                           VAL=um.order.dr,X]                                          
 emar.sum.next.loc           10 FREE     L                 VAL=>*(T5)TSEM[emar.sum,emar.sum.activity.type,X]        
 emar.sum.next.order.dr      10 FREE     L                 VAL=>*(T5)TSEM[emar.sum,emar.sum.activity.type,emar      
                                                           VAL=.sum.location,emar.sum.admin.user,emar.sum.admin.d      
                                                           VAL=rug,emar.sum.admin.route,emar.sum.drug.type,X]          
 emar.sum.num.filed           4 PINT     R                 *(T5)TSEM[emd,edat,ggn,gu,tf,tdr,tdb,ggg,gu2]|1             
 emar.sum.num.received        4 PINT     R                 *(T5)TSEM[emd,edat,ggn,gu,tf,tdr,tdb,ggg,gu2]|0             
 Ì     i   2
emar.sum.pat.stats
[emar.sum.pt.month,emar.sum.pt.location]
*(T5)TSEMP[empm,ggn]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 emar.sum.pt.month            6 FREE     L                 empm                                                        
 emar.sum.pt.location        10 FREE     L  MIS.LOCN       ggn                                                     
 emar.sum.pt.acct.mtc.file    5 PINT     R                 *(T5)TSEMP[empm,ggn]|2                                      
 emar.sum.pt.acct.mtc.tot     5 PINT     R                 *(T5)TSEMP[empm,ggn]|0                                      
 emar.sum.pt.unit.match       5 PINT     R                 *(T5)TSEMP[empm,ggn]|1                                      
 Ì     i   2
emar.warn.types
[emar.warn.type.mnemonic]
&(T)TSWT[ewtm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 emar.warn.type.mnemonic     10 FREE     L                 ewtm                                                        
 emar.warn.type.active        1 YN       L                 &(T)TSWT[ewtm]|0                                            
 emar.warn.type.desc         35 FREE     L                 &(T)TSWT[ewtm]|1                                            
 Ì     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.from                 10 FREE     L  MM.INVENT      *(T1)TSM[tsms,tsmq]I|7                                  
 mm.inv.rx.urn               10 URN      L  PHA.RX         *(T1)TSM[tsms,tsmq]I|4                                  
 mm.inv.to                   10 FREE     L  MM.INVENT      *(T1)TSM[tsms,tsmq]I|8                                  
 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

 emar.oc.map.x                      [emar.oc.map.line.1,emar.oc.map.q]
                                      *(T5)TSEOMX[eoml1,eomcq]

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