Ì 2
pha.u.background.job (background.job)
/.PHA.U.bkg.job
Field Name Len Dat Typ J DPM Offset/Local/VAL
background.job.number 4 PINT R /.PHA.U.bkg.job|0
background.process.name 30 FREE L /.PHA.U.bkg.job|1
bkg.mm.process.lock 50 FREE L VAL="PHA MM Background Job"
Ì 2
pha.u.dictionary.xrefs (dictionary.xrefs)
[dictionary.xref.dict.1,dictionary.xref.urn.1,dictionary.xref.dict.2,dictionary.xref.urn.2]
&TUZD[tuzdA,tuzdB,tuzdC,tuzdD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dictionary.xref.dict.1 15 FREE L tuzdA
dictionary.xref.urn.1 15 FREE L tuzdB
dictionary.xref.dict.2 15 FREE L tuzdC
dictionary.xref.urn.2 15 FREE L tuzdD
dictionary.xref.active 1 YN L &TUZD[tuzdA,tuzdB,tuzdC,tuzdD]|2
dictionary.xref.active.ck 1 YN L VAL=IF{/XPG "Y";@dictionary.xref.active}
dictionary.xref.disp.dic 15 FREE L &TUZD[tuzdA,tuzdB,tuzdC,tuzdD]|0
dictionary.xref.disp.mne 15 FREE L &TUZD[tuzdA,tuzdB,tuzdC,tuzdD]|1
Ì 2
pha.print.queue (print.queue)
[print.device,print.priority,print.q]
:TUZQ[tuzqD,tuzqP,tuzqQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
print.device 20 FREE L tuzqD
print.priority 1 CHOICE L tuzqP
print.q 3 PINT R tuzqQ
pq.label.credit 8 DEC R :TUZQ[tuzqD,tuzqP,tuzqQ]LAB|4
pq.label.dispense 8 DEC R :TUZQ[tuzqD,tuzqP,tuzqQ]LAB|3
pq.label.rx 10 URN L PHA.RX :TUZQ[tuzqD,tuzqP,tuzqQ]LAB|0
pq.label.xfer.date 8 DATE L :TUZQ[tuzqD,tuzqP,tuzqQ]LAB|1
pq.label.xfer.seq.no 2 PINT R :TUZQ[tuzqD,tuzqP,tuzqQ]LAB|5
pq.label.xfer.time 4 HHMM L :TUZQ[tuzqD,tuzqP,tuzqQ]LAB|2
pq.mar.blank.pgs 2 INT R :TUZQ[tuzqD,tuzqP,tuzqQ]MAR|4
pq.mar.format 10 FREE L PHA.MARF :TUZQ[tuzqD,tuzqP,tuzqQ]MAR|0
pq.mar.start.date 8 DATE L :TUZQ[tuzqD,tuzqP,tuzqQ]MAR|2
pq.mar.start.time 4 HHMM L :TUZQ[tuzqD,tuzqP,tuzqQ]MAR|3
pq.mar.urn 10 FREE L :TUZQ[tuzqD,tuzqP,tuzqQ]MAR|1
pq.rl.c.batch.num 3 FREE L :TUZQ[tuzqD,tuzqP,tuzqQ]RL|2
pq.rl.format 10 FREE L PHA.RLF :TUZQ[tuzqD,tuzqP,tuzqQ]RL|0
pq.rl.menu.arg 10 FREE L :TUZQ[tuzqD,tuzqP,tuzqQ]RL|1
pq.rl.order.type 10 FREE L PHA.OT :TUZQ[tuzqD,tuzqP,tuzqQ]RL|3
print.date 8 DATE L :TUZQ[tuzqD,tuzqP,tuzqQ]|1
print.err 30 FREE L :TUZQ[tuzqD,tuzqP,tuzqQ]|5
print.msg 80 FREE L :TUZQ[tuzqD,tuzqP,tuzqQ]|4
print.time 4 HHMM L :TUZQ[tuzqD,tuzqP,tuzqQ]|2
print.type 3 FREE L :TUZQ[tuzqD,tuzqP,tuzqQ]|0
print.user 10 FREE L MIS.USER :TUZQ[tuzqD,tuzqP,tuzqQ]|3
Ì € 2
pha.print.queue.refill.batches (print.queue.refill.batchs)
[print.device,print.priority,print.q, pq.rl.urn]
:TUZQ[tuzqD,tuzqP,tuzqQ]RL["B",tl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pq.rl.urn 10 URN L PHA.REF tl
Ì 2
pha.schedule.queue (schedule.queue)
[schedule.seconds,schedule.q]
:TUZS[tuzS,tuzs]
Field Name Len Dat Typ J DPM Offset/Local/VAL
schedule.seconds 9 PINT R tuzS
schedule.q 2 PINT R tuzs
schedule.date 8 DATE L VAL=%Z.date.in.magic(@schedule.seconds)
schedule.msg 20 FREE L :TUZS[tuzS,tuzs]|3
schedule.record 10 FREE L :TUZS[tuzS,tuzs]|2
schedule.rx 10 URN L PHA.RX :TUZS[tuzS,tuzs]|1
schedule.time 4 HHMM L VAL=%Z.time.out(@schedule.seconds)
schedule.type 2 CHOICE L :TUZS[tuzS,tuzs]|0
schedule.user 10 FREE L MIS.USER :TUZS[tuzS,tuzs]|4
Ì € 2
pha.schedule.comments (schedule.comments)
[schedule.seconds,schedule.q, schedule.comment.q]
:TUZS[tuzS,tuzs]C[tuzC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
schedule.comment.q 2 PINT R tuzC
schedule.comment 60 FREE L :TUZS[tuzS,tuzs]C[tuzC]
Ì 2
pha.transaction.queue (txn.queue)
[txn.q]
:TUZT[tuzt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
txn.q 10 PINT R tuzt
txn.account 1 FREE L :TUZT[tuzt]|16
txn.billing.code 10 FREE L :TUZT[tuzt]|8
txn.bottle.type 2 PINT R :TUZT[tuzt]|19
txn.charge 9 MONEY R :TUZT[tuzt]|7
txn.charge.type 10 URN L PHA.CT :TUZT[tuzt]|17
txn.complete 9 PINT R :TUZT[tuzt]|4
txn.complete.date 8 DATE L VAL=%Z.date.in.magic(@txn.complete)
txn.complete.time 4 HHMM L VAL=%Z.time.out(@txn.complete)
txn.cost 9 PDEC R :TUZT[tuzt]|15
txn.ctrl 1 FREE L :TUZT[tuzt]|12
txn.date 8 DATE L VAL=%Z.date.in.magic(@txn.entered)
txn.disp.forms 9 PDEC R :TUZT[tuzt]|18
txn.doses 9 PDEC R :TUZT[tuzt]|6
txn.entered 9 PINT R :TUZT[tuzt]|3
txn.inventory 10 FREE L MM.INVENT :TUZT[tuzt]|14
txn.items 9 PDEC R :TUZT[tuzt]|11
txn.med 10 FREE L PHA.DRUG :TUZT[tuzt]|10
txn.order.type 5 CHOICE L :TUZT[tuzt]|5
txn.patient 30 FREE L PHA.PAT :TUZT[tuzt]|1
txn.rtn.flag 5 FREE L :TUZT[tuzt]|20
txn.rx 10 URN L PHA.RX :TUZT[tuzt]|2
txn.service 10 FREE L MIS.SVC.DICT :TUZT[tuzt]|13
txn.service.date 8 DATE L VAL=%Z.date.in.magic(@txn.service.seconds)
txn.service.seconds 9 PINT R :TUZT[tuzt]|21
txn.service.time 4 HHMM L VAL=%Z.time.out(@txn.service.seconds)
txn.time 4 HHMM L VAL=%Z.time.out(@txn.entered)
txn.type 1 FREE L :TUZT[tuzt]|0
txn.type.type 1 FREE L VAL=@PHA.PARAM.txn.table.type[@txn.type]
txn.user 10 FREE L MIS.USER :TUZT[tuzt]|9
Ì € 2
pha.transaction.components (txn.components)
[txn.q, txn.comp.med]
:TUZT[tuzt]C[tf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
txn.comp.med 10 FREE L PHA.DRUG tf
txn.comp.charge 9 MONEY R :TUZT[tuzt]C[tf]|0
txn.comp.cost 9 PDEC5 R :TUZT[tuzt]C[tf]|1
txn.comp.ctrl.sch 10 FREE L PHA.CS :TUZT[tuzt]C[tf]|3
txn.comp.items 9 PDEC5 R :TUZT[tuzt]C[tf]|2
Ì 2
zcus.uk.ep.queued.rx.top (zcus.uk.ep.queued.rx.top)
[zcus.uk.ep.queued.rx]
?TUZZCUSRXQ[tr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.ep.queued.rx 10 URN L PHA.RX tr
Ì € 2
zcus.uk.ep.queued.inv.tr (zcus.uk.ep.queued.inv.tq)
[zcus.uk.ep.queued.rx, zcus.uk.ep.q.inv.tq.loc,zcus.uk.ep.q.inv.tq.inv,zcus.uk.ep.q.inv.tq.drug]
?TUZZCUSRXQ[tr]ZCUSITQ[ggn,mi,tf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.ep.q.inv.tq.loc 10 FREE L PHA.LOC ggn
zcus.uk.ep.q.inv.tq.inv 10 FREE L MM.INVENT mi
zcus.uk.ep.q.inv.tq.drug 10 FREE L PHA.DRUG tf
zcus.uk.ep.q.inv.tq.qty 10 PINT R ?TUZZCUSRXQ[tr]ZCUSITQ[ggn,mi,tf]|0
Ì € 2
zcus.uk.ep.queued.rx.tq (zcus.uk.ep.queued.rx.it)
[zcus.uk.ep.queued.rx, zcus.uk.ep.q.it.date.time,zcus.uk.ep.q.it.inventory,zcus.uk.ep.q.it.q]
?TUZZCUSRXQ[tr]ZCUSTQ[trTDT,mi,trtQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.ep.q.it.date.time 13 FREE L trTDT
zcus.uk.ep.q.it.inventory 10 FREE L PHA.INV mi
zcus.uk.ep.q.it.q 3 PINT R trtQ
zcus.uk.ep.q.it.bot.type 3 PINT R ?TUZZCUSRXQ[tr]ZCUSTQ[trTDT,mi,trtQ]|1
zcus.uk.ep.q.it.doses 10 INT R ?TUZZCUSRXQ[tr]ZCUSTQ[trTDT,mi,trtQ]|0
Ì € 2
zcus.uk.ep.queued.rx.it.x (zcus.uk.ep.queued.rx.it.x)
[zcus.uk.ep.queued.rx, zcus.uk.ep.q.itx.urn,zcus.uk.ep.q.itx.dt.tm,zcus.uk.ep.q.itx.inv,zcus.uk.ep.q.itx.dsp.manq]
?TUZZCUSRXQ[tr]ZCUSTQX[tr,trdmA,mi,trdmQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.ep.q.itx.urn 10 URN L PHA.RX tr
zcus.uk.ep.q.itx.dt.tm 13 FREE L trdmA
zcus.uk.ep.q.itx.inv 10 FREE L PHA.INV mi
zcus.uk.ep.q.itx.dsp.manq 10 FREE L trdmQ
Ì 2
zcus.uk.ep.queued.txns (zcus.uk.ep.queued.txns)
[zcus.uk.ep.txn.q.rx.urn,zcus.uk.ep.txn.q]
:TUZZCUSEPTXNQ[tr,tuztZ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.ep.txn.q.rx.urn 10 URN L PHA.RX tr
zcus.uk.ep.txn.q 10 PINT R tuztZ
zcus.uk.ep.txn.q.account 1 FREE L :TUZZCUSEPTXNQ[tr,tuztZ]|16
zcus.uk.ep.txn.q.bill.cod 10 FREE L :TUZZCUSEPTXNQ[tr,tuztZ]|8
zcus.uk.ep.txn.q.bot.type 2 PINT R :TUZZCUSEPTXNQ[tr,tuztZ]|19
zcus.uk.ep.txn.q.ch.type 10 URN L PHA.CT :TUZZCUSEPTXNQ[tr,tuztZ]|17
zcus.uk.ep.txn.q.charge 9 MONEY R :TUZZCUSEPTXNQ[tr,tuztZ]|7
zcus.uk.ep.txn.q.complete 9 PINT R :TUZZCUSEPTXNQ[tr,tuztZ]|4
zcus.uk.ep.txn.q.cost 9 PDEC R :TUZZCUSEPTXNQ[tr,tuztZ]|15
zcus.uk.ep.txn.q.ctrl 1 FREE L :TUZZCUSEPTXNQ[tr,tuztZ]|12
zcus.uk.ep.txn.q.disp.for 9 PDEC R :TUZZCUSEPTXNQ[tr,tuztZ]|18
zcus.uk.ep.txn.q.doses 9 PDEC R :TUZZCUSEPTXNQ[tr,tuztZ]|6
zcus.uk.ep.txn.q.entered 9 PINT R :TUZZCUSEPTXNQ[tr,tuztZ]|3
zcus.uk.ep.txn.q.invent 10 FREE L MM.INVENT :TUZZCUSEPTXNQ[tr,tuztZ]|14
zcus.uk.ep.txn.q.items 9 PDEC R :TUZZCUSEPTXNQ[tr,tuztZ]|11
zcus.uk.ep.txn.q.med 10 FREE L PHA.DRUG :TUZZCUSEPTXNQ[tr,tuztZ]|10
zcus.uk.ep.txn.q.ot 5 CHOICE L :TUZZCUSEPTXNQ[tr,tuztZ]|5
zcus.uk.ep.txn.q.patient 30 FREE L PHA.PAT :TUZZCUSEPTXNQ[tr,tuztZ]|1
zcus.uk.ep.txn.q.rtn.flag 5 FREE L :TUZZCUSEPTXNQ[tr,tuztZ]|20
zcus.uk.ep.txn.q.rx 10 URN L PHA.RX :TUZZCUSEPTXNQ[tr,tuztZ]|2
zcus.uk.ep.txn.q.serv.sec 9 PINT R :TUZZCUSEPTXNQ[tr,tuztZ]|21
zcus.uk.ep.txn.q.service 10 FREE L MIS.SVC.DICT :TUZZCUSEPTXNQ[tr,tuztZ]|13
zcus.uk.ep.txn.q.type 1 FREE L :TUZZCUSEPTXNQ[tr,tuztZ]|0
zcus.uk.ep.txn.q.uk.gldpt 15 FREE L MIS.GL.DEPT :TUZZCUSEPTXNQ[tr,tuztZ]ZCUSUK|0
zcus.uk.ep.txn.q.user 10 FREE L MIS.USER :TUZZCUSEPTXNQ[tr,tuztZ]|9
Ì € 2
zcus.uk.ep.queued.txn.cmp (zcus.uk.ep.queued.txn.cmp)
[zcus.uk.ep.txn.q.rx.urn,zcus.uk.ep.txn.q, zcus.uk.ep.txn.q.c.med]
:TUZZCUSEPTXNQ[tr,tuztZ]ZCUSC[tf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.ep.txn.q.c.med 10 FREE L PHA.DRUG tf
zcus.uk.ep.txn.q.c.charge 9 MONEY R :TUZZCUSEPTXNQ[tr,tuztZ]ZCUSC[tf]|0
zcus.uk.ep.txn.q.c.cost 9 PDEC5 R :TUZZCUSEPTXNQ[tr,tuztZ]ZCUSC[tf]|1
zcus.uk.ep.txn.q.c.ctlsch 10 FREE L PHA.CS :TUZZCUSEPTXNQ[tr,tuztZ]ZCUSC[tf]|3
zcus.uk.ep.txn.q.c.items 9 PDEC5 R :TUZZCUSEPTXNQ[tr,tuztZ]ZCUSC[tf]|2
Ì € 2
zcus.uk.ep.queued.txn.cmt (zcus.uk.ep.queued.txn.cmt)
[zcus.uk.ep.txn.q.rx.urn,zcus.uk.ep.txn.q, zcus.uk.ep.txn.q.cmt.q]
:TUZZCUSEPTXNQ[tr,tuztZ]ZCUSCMT[tuztX]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.ep.txn.q.cmt.q 2 PINT R tuztX
zcus.uk.ep.txn.q.comment 92 FREE L :TUZZCUSEPTXNQ[tr,tuztZ]ZCUSCMT[tuztX]
|
|
| | | | | | | | | | | | |