Ì i 2
ee.drugs (ee.drugs)
[ee.drug.q]
/TSEE[tseeq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ee.drug.q 3 PINT R tseeq
ee.drug 10 FREE L PHA.DRUG /TSEE[tseeq]|0
ee.drug.charge 9 MONEY R /TSEE[tseeq]|3
ee.drug.cost 9 DEC R /TSEE[tseeq]|9
ee.drug.cost.ui 9 DEC R /TSEE[tseeq]|5
ee.drug.debit.credit 3 CHOICE L /TSEE[tseeq]|1
ee.drug.desc 26 FREE L /TSEE[tseeq]|6
ee.drug.qty 9 PDEC R /TSEE[tseeq]|8
ee.drug.qty.ui 10 FREE L /TSEE[tseeq]|2
ee.drug.ui 15 FREE L /TSEE[tseeq]|4
ee.drug.ui.cnt 7 PDEC R /TSEE[tseeq]|7
zcus.uk.ee.num.labels 3 PINT R /TSEE[tseeq]ZCUSUK|0
zcus.uk.rx 10 URN L PHA.RX /TSEE[tseeq]ZCUSUK|1
zcus.uk.rx.supply.amount 9 PINT R /TSEE[tseeq]ZCUSUK|2
Ì € i 2
Inv Debit/Credit Comments (zcus.uk.ee.drug.comments)
[ee.drug.q, zcus.uk.ee.drug.comment.q]
/TSEE[tseeq]ZCUS.C[tDCq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.ee.drug.comment.q 3 PINT R tDCq
zcus.uk.ee.any.comments.f 1 FREE L VAL=IF{@First(zcus.uk.ee.drug.comment.q) @Z.check.mark
VAL=}
zcus.uk.ee.drug.comment 60 FREE L /TSEE[tseeq]ZCUS.C[tDCq]
Ì i 2
pha.stats.gl.batches (gl.batches)
[gl.urn,gl.rx.urn,gl.txn.date,gl.txn.q,gl.txn.med,gl.account.type,gl.account]
:TSGL[gb,tr,trXD,tuzt,tf,tsGAT,ga]
Field Name Len Dat Typ J DPM Offset/Local/VAL
gl.urn 8 URN L gb
gl.rx.urn 10 URN L PHA.RX tr
gl.txn.date 8 DATE L trXD
gl.txn.q 10 PINT R tuzt
gl.txn.med 10 FREE L PHA.DRUG tf
gl.account.type 1 CHOICE L tsGAT
gl.account 25 FREE L MIS.GL.ACCOUNT ga
gl.batch.amount 12 SMONEY R :TSGL[gb,tr,trXD,tuzt,tf,tsGAT,ga]|0
Ì i 2
pha.stats.inventory.txns (inventory.txns)
[txn.date,txn.q]
:TSX[tsxD,tsxQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
txn.date 8 DATE L tsxD
txn.q 10 PINT R tsxQ
txn.charge 9 MONEY R :TSX[tsxD,tsxQ]|1
txn.cost 9 PDEC R :TSX[tsxD,tsxQ]|6
txn.dept 15 FREE L MIS.GL.DEPT :TSX[tsxD,tsxQ]|7
txn.entered 9 PINT R :TSX[tsxD,tsxQ]|8
txn.inventory 10 FREE L MM.INVENT :TSX[tsxD,tsxQ]|5
txn.items 9 PDEC R :TSX[tsxD,tsxQ]|4
txn.location 10 FREE L MIS.LOCN.DICT :TSX[tsxD,tsxQ]|9
txn.med 10 FREE L PHA.DRUG :TSX[tsxD,tsxQ]|3
txn.type 1 CHOICE L :TSX[tsxD,tsxQ]|0
txn.user 10 FREE L MIS.USER :TSX[tsxD,tsxQ]|2
Ì i 2
pha.statistics.file (main)
[date,sort.1,sort.2]
?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 ?TS[ts,ts1,ts2]|0
shift.2.count 8 PINT R ?TS[ts,ts1,ts2]|1
shift.3.count 8 PINT R ?TS[ts,ts1,ts2]|2
shift.start.time 4 HHMM L
Ì i 2
pha.mm.below.zero.queue (mm.below.zero.queue)
[mm.bz.inventory,mm.bz.item,mm.bz.q]
: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 73 URN L MM.ITEM mt
mm.bz.q 3 PINT R tsbq
mm.bz.date 8 DATE L :TSB[mi,mt,tsbq]|3
mm.bz.dept 15 FREE L MIS.GL.DEPT :TSB[mi,mt,tsbq]|2
mm.bz.qty 8 PDEC R :TSB[mi,mt,tsbq]|0
mm.bz.type 2 CHOICE L :TSB[mi,mt,tsbq]|4
mm.bz.user 10 FREE L MIS.USER :TSB[mi,mt,tsbq]|1
zcus.uk.bz.pha.gl.dept 15 FREE L MIS.GL.DEPT :TSB[mi,mt,tsbq]ZCUSUK|0
zcus.uk.bz.pha.rx.number 11 FREE L :TSB[mi,mt,tsbq]ZCUSUK|2
zcus.uk.bz.pha.rx.urn 10 URN L PHA.RX :TSB[mi,mt,tsbq]ZCUSUK|1
zcus.uk.bz.pha.txn.time 10 FREE L :TSB[mi,mt,tsbq]ZCUSUK|3
Ì i 2
pha.inventory.errors (mm.errors)
[mm.err.inventory,mm.err.date,mm.err.q]
: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 :TSE[mi,tsed,tseq]|5
mm.err.item 73 URN L MM.ITEM :TSE[mi,tsed,tseq]|1
mm.err.msg 50 FREE L :TSE[mi,tsed,tseq]|4
mm.err.qty 8 PINT R :TSE[mi,tsed,tseq]|3
mm.err.stock 18 URN L MM.STOCK :TSE[mi,tsed,tseq]|2
mm.err.type 1 CHOICE L :TSE[mi,tsed,tseq]|0
Ì i 2
pha.mm.partial.item.queue (mm.partial.item.queue)
[mm.pi.inventory,mm.pi.item]
: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 73 URN L MM.ITEM mt
mm.pi.qty 8 PDEC R :TSP[mi,mt]|0
Ì i 2
pha.mm.queue (mm.queue)
[mm.seconds,mm.q]
: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 :TSM[tsms,tsmq]D|14
mm.bill.code 10 FREE L :TSM[tsms,tsmq]D|7
mm.category 8 FREE L MM.CATEGORY :TSM[tsms,tsmq]D|8
mm.desc.1 30 FREE L :TSM[tsms,tsmq]D|3
mm.desc.2 30 FREE L :TSM[tsms,tsmq]D|4
mm.device 15 FREE L :TSM[tsms,tsmq]D|10
mm.drug 10 FREE L PHA.DRUG :TSM[tsms,tsmq]D|0
mm.eoc 7 FREE L MIS.GL.EOC :TSM[tsms,tsmq]D|6
mm.generic.name 30 FREE L :TSM[tsms,tsmq]D2|2
mm.gl.dept 15 FREE L MIS.GL.DEPT :TSM[tsms,tsmq]D|13
mm.inv.dept 15 FREE L MIS.GL.DEPT :TSM[tsms,tsmq]I|5
mm.inv.drug 10 FREE L PHA.DRUG :TSM[tsms,tsmq]I|2
mm.inv.drug.qty 8 PDEC R :TSM[tsms,tsmq]I|3
mm.inv.from 10 FREE L MM.INVENT :TSM[tsms,tsmq]I|7
mm.inv.rx.urn 10 URN L PHA.RX :TSM[tsms,tsmq]I|4
mm.inv.to 10 FREE L MM.INVENT :TSM[tsms,tsmq]I|8
mm.inv.txn.date 8 DATE L :TSM[tsms,tsmq]I|6
mm.inv.user 10 FREE L MIS.USER :TSM[tsms,tsmq]I|1
mm.inventory 10 FREE L MM.INVENT :TSM[tsms,tsmq]I|0
mm.item 73 URN L MM.ITEM :TSM[tsms,tsmq]D|1
mm.item.no 10 FREE L :TSM[tsms,tsmq]D|12
mm.mfr 10 FREE L MIS.MFR :TSM[tsms,tsmq]D|5
mm.name 30 FREE L :TSM[tsms,tsmq]D|2
mm.ndc.din.number 12 FREE L :TSM[tsms,tsmq]D2|3
mm.no.errors 1 FREE L :TSM[tsms,tsmq]|3
mm.pha.db 12 FREE L MIS.APPL :TSM[tsms,tsmq]|2
mm.pkg 40 FREE L :TSM[tsms,tsmq]D|11
mm.pt.eoc 7 FREE L MIS.GL.EOC :TSM[tsms,tsmq]D2|4
mm.tax.code 3 FREE L MIS.TAX.CODE :TSM[tsms,tsmq]D2|1
mm.taxable 1 YN L :TSM[tsms,tsmq]D2|0
mm.type 2 CHOICE L :TSM[tsms,tsmq]|0
mm.unit.issue 1 FREE L :TSM[tsms,tsmq]|4
mm.updated 1 YN L :TSM[tsms,tsmq]|1
mm.user 10 FREE L MIS.USER :TSM[tsms,tsmq]D|9
zcus.uk.pha.gl.dept 15 FREE L MIS.GL.DEPT :TSM[tsms,tsmq]I["ZCUSUK"]|0
zcus.uk.pha.rx.number 11 FREE L :TSM[tsms,tsmq]I["ZCUSUK"]|2
zcus.uk.pha.rx.urn 10 URN L PHA.RX :TSM[tsms,tsmq]I["ZCUSUK"]|1
zcus.uk.pha.txn.time 10 FREE L :TSM[tsms,tsmq]I["ZCUSUK"]|3
Ì € i 2
pha.mm.drug.inventories (mm.drug.inventories)
[mm.seconds,mm.q, mm.drug.inventory]
: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 73 URN L MM.ITEM :TSM[tsms,tsmq]D["I",mi]|0
mm.max.level 6 PDEC R :TSM[tsms,tsmq]D["I",mi]|5
mm.min.level 6 PDEC R :TSM[tsms,tsmq]D["I",mi]|4
mm.par 6 PDEC R :TSM[tsms,tsmq]D["I",mi]|2
mm.pt.ui 4 FREE L :TSM[tsms,tsmq]D["I",mi]|8
mm.pt.ui.us 7 PINT R :TSM[tsms,tsmq]D["I",mi]|9
mm.shelf 10 FREE L :TSM[tsms,tsmq]D["I",mi]|3
mm.stock.active 1 YN L :TSM[tsms,tsmq]D["I",mi]|6
mm.ui 4 FREE L :TSM[tsms,tsmq]D["I",mi]|1
mm.ui.us 7 PINT R :TSM[tsms,tsmq]D["I",mi]|7
Ì € i 2
pha.mm.drug.inv.locations (mm.drug.inv.locations)
[mm.seconds,mm.q,mm.drug.inventory, mm.drug.inv.location]
: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
pha.mm.vendor.data (mm.vendor.data)
[mm.seconds,mm.q, mm.ven.q]
: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 :TSM[tsms,tsmq]D["V",tsv]|0
mm.ven.cat.no 10 FREE L :TSM[tsms,tsmq]D["V",tsv]|1
mm.ven.conv.pkg.size 10 FREE L :TSM[tsms,tsmq]D["V",tsv]|5
mm.ven.cost.per.up 11 MONEY R :TSM[tsms,tsmq]D["V",tsv]|2
mm.ven.up 4 FREE L :TSM[tsms,tsmq]D["V",tsv]|3
mm.ven.up.cnt 5 PDEC R :TSM[tsms,tsmq]D["V",tsv]|4
Ì € i 2
pha.mm.inventory.items (mm.inventory.items)
[mm.seconds,mm.q, mm.inv.item]
:TSM[tsms,tsmq]I["T",mt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mm.inv.item 73 URN L MM.ITEM mt
mm.inv.comment 20 FREE L :TSM[tsms,tsmq]I["T",mt]|1
mm.inv.qty 8 PDEC R :TSM[tsms,tsmq]I["T",mt]|0
Ì i 2
pha.stats.usage (usage)
[usort,uperiod,ukey,umed,ufac,usite,upt.type]
: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 :TSU[tss,gp,tsk,tf,gqb,tdsi,tsp]|3
ucost 11 MONEY R :TSU[tss,gp,tsk,tf,gqb,tdsi,tsp]|4
udose.count 8 INT R :TSU[tss,gp,tsk,tf,gqb,tdsi,tsp]|1
urx.count 6 INT R :TSU[tss,gp,tsk,tf,gqb,tdsi,tsp]|0
uunit.count 8 INT R :TSU[tss,gp,tsk,tf,gqb,tdsi,tsp]|2
Ì i 2
pha.stats.usage.can (usage.can)
[ucsort,ucperiod,uckey,ucinv,uceoc,ucfac,ucsite,ucpt.type]
: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 :TSUC[tss,gp,tsk,mi,ge,gqb,tdsi,tsp]|3
uccost 11 MONEY R :TSUC[tss,gp,tsk,mi,ge,gqb,tdsi,tsp]|4
ucdose.count 8 INT R :TSUC[tss,gp,tsk,mi,ge,gqb,tdsi,tsp]|1
ucrx.count 6 INT R :TSUC[tss,gp,tsk,mi,ge,gqb,tdsi,tsp]|0
ucunit.count 8 INT R :TSUC[tss,gp,tsk,mi,ge,gqb,tdsi,tsp]|2
Ì i 2
zcus.uk.inv.lbl.reprint (zcus.uk.inv.lbl.reprint)
[zcus.uk.ilr.urn]
:TSZCUSUK.ILR[tsILU]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.ilr.urn 10 PINT R tsILU
zcus.uk.ilr.date 8 DATE L :TSZCUSUK.ILR[tsILU]|2
zcus.uk.ilr.debit.credit 1 FREE L :TSZCUSUK.ILR[tsILU]|7
zcus.uk.ilr.fragment 60 FREE L :TSZCUSUK.ILR[tsILU]|8
zcus.uk.ilr.generic.id 72 FREE L VAL=@ee.drug's.generic.id
zcus.uk.ilr.inventory 10 FREE L MM.INVENT :TSZCUSUK.ILR[tsILU]|1
zcus.uk.ilr.location 10 FREE L :TSZCUSUK.ILR[tsILU]|3
zcus.uk.ilr.med 10 FREE L PHA.DRUG :TSZCUSUK.ILR[tsILU]|4
zcus.uk.ilr.num.labels 3 PINT R :TSZCUSUK.ILR[tsILU]|5
zcus.uk.ilr.print.time 4 HHMM L :TSZCUSUK.ILR[tsILU]|0
zcus.uk.ilr.quantity 10 PINT R :TSZCUSUK.ILR[tsILU]|6
Ì € i 2
zcus.uk.inv.lbl.reprint.data (zcus.uk.inv.lbl.reprint.d)
[zcus.uk.ilr.urn, zcus.uk.print.data.q]
:TSZCUSUK.ILR[tsILU]ZCUS[tsPDQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.print.data.q 3 PINT R tsPDQ
zcus.uk.print.data 250 FREE L :TSZCUSUK.ILR[tsILU]ZCUS[tsPDQ]
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
pha.stats.gl.period.index [ucperiod,gl.urn]
gl.period.x :TSGLP[gp,gb]
pha.statistics.shift.index [shift.start.time] = shift
shift.x :TSS[tsh]
zcus.uk.inv.lbl.reprint.x [zcus.uk.ilr.inventory,zcus.uk.ilr.date,zcus.uk.ilr.location,zcus.uk.ilr.generic
zcus.uk.inv.lbl.reprint.x :TSZCUSUK.ILRX[mi,tsILD,tsILL,isilG,tsILU]
|
|
| | | | | | | | | | | | | | | |