Ì € i 2
pha.refill.list.batch.links (batch.links)
[urn, batch.link.urn]
?TL[tl]L[tlBL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.link.urn 10 URN L PHA.REF tlBL
Ì € i 2
pha.refill.list.batch.patients (batch.patients)
[urn, batch.patient]
?TL[tl]P[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.patient 30 FREE L PHA.PAT aa
batch.bed 3 FREE L ?TL[tl]P[aa]|2
batch.location 10 FREE L MIS.LOCN.DICT ?TL[tl]P[aa]|3
batch.room 10 FREE L MIS.ROOM.DICT ?TL[tl]P[aa]|1
batch.room.q 3 PINT R ?TL[tl]P[aa]|0
Ì € i 2
pha.refill.list.batch.entry (batch.entry)
[urn,batch.patient, batch.rx.urn]
?TL[tl]P[aa]B[tr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.rx.urn 10 URN L PHA.RX tr
batch.add.date 8 DATE L ?TL[tl]P[aa]B[tr]|8
batch.add.time 4 HHMM L ?TL[tl]P[aa]B[tr]|9
batch.add.user 10 FREE L MIS.USER ?TL[tl]P[aa]B[tr]|10
batch.atc.date 8 DATE L ?TL[tl]P[aa]B[tr]MA|1
batch.atc.msg 4 CHOICE L ?TL[tl]P[aa]B[tr]MA|0
batch.atc.time 4 TIME L ?TL[tl]P[aa]B[tr]MA|2
batch.dispense 9 PDEC5 R ?TL[tl]P[aa]B[tr]|0
batch.doses 4 INT R ?TL[tl]P[aa]B[tr]|2
batch.doses.calc 4 INT R ?TL[tl]P[aa]B[tr]|7
batch.inventory 10 FREE L MM.INVENT ?TL[tl]P[aa]B[tr]|15
batch.items 9 PDEC5 R ?TL[tl]P[aa]B[tr]|5
batch.items.calc 9 PDEC5 R ?TL[tl]P[aa]B[tr]|6
batch.last.bottle 3 INT R ?TL[tl]P[aa]B[tr]|11
batch.late 9 PDEC5 R ?TL[tl]P[aa]B[tr]|1
batch.messages.only 1 YN L ?TL[tl]P[aa]B[tr]|13
batch.out.refill 3 INT R ?TL[tl]P[aa]B[tr]|12
batch.rule.err.wo.msg 1 YN L ?TL[tl]P[aa]B[tr]|14
batch.rx.schedule 3 CHOICE L ?TL[tl]P[aa]B[tr]|4
batch.rx.status 2 CHOICE L ?TL[tl]P[aa]B[tr]|3
Ì € i 2
pha.refill.list.bch.alt.entry (batch.alt.entry)
[urn,batch.patient,batch.rx.urn, batch.alt.bottle.type]
?TL[tl]P[aa]B[tr]A[trABT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.alt.bottle.type 2 PINT R trABT
batch.alt.dispense 9 PDEC5 R ?TL[tl]P[aa]B[tr]A[trABT]|0
batch.alt.doses 4 INT R ?TL[tl]P[aa]B[tr]A[trABT]|2
batch.alt.late 9 PDEC5 R ?TL[tl]P[aa]B[tr]A[trABT]|1
Ì € i 2
pha.refill.list.batch.alt.disp (batch.alt.dispensing)
[urn,batch.patient,batch.rx.urn,batch.alt.bottle.type, batch.alt.disp.date.time]
?TL[tl]P[aa]B[tr]A[trABT]B[trdA]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.alt.disp.date.time 13 FREE L trdA
batch.alt.disp.time 4 HHMM L ?TL[tl]P[aa]B[tr]A[trABT]B[trdA]
Ì € i 2
pha.refill.list.batch.dispense (batch.dispensing)
[urn,batch.patient,batch.rx.urn, batch.dispense.date.time]
?TL[tl]P[aa]B[tr]D[trdA]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.dispense.date.time 13 FREE L trdA
batch.dispense.time 4 HHMM L ?TL[tl]P[aa]B[tr]D[trdA]
Ì € i 2
pha.refill.list.batch.message (batch.messages)
[urn,batch.patient,batch.rx.urn, batch.message.q]
?TL[tl]P[aa]B[tr]M[trBMQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.message.q 3 PINT R trBMQ
batch.message 4 CHOICE L ?TL[tl]P[aa]B[tr]M[trBMQ]|0
batch.message.data 30 FREE L ?TL[tl]P[aa]B[tr]M[trBMQ]|5
batch.message.date 8 DATE L ?TL[tl]P[aa]B[tr]M[trBMQ]|1
batch.message.rule.msg 60 FREE L ?TL[tl]P[aa]B[tr]M[trBMQ]|4
batch.message.time 4 HHMM L ?TL[tl]P[aa]B[tr]M[trBMQ]|2
batch.message.user 10 FREE L MIS.USER ?TL[tl]P[aa]B[tr]M[trBMQ]|3
Ì € i 2
pha.refill.list.batch.wksht (batch.worksheet)
[urn,batch.patient,batch.rx.urn, batch.wksht.med]
?TL[tl]P[aa]B[tr]W[tf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.wksht.med 10 FREE L PHA.DRUG tf
batch.wksht.disp.forms 9 PDEC5 R ?TL[tl]P[aa]B[tr]W[tf]|0
Ì € i 2
pha.refill.list.transfers (batch.transfer)
[urn,batch.patient, batch.transfer.date.time]
?TL[tl]P[aa]T[tltDT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.transfer.date.time 16 FREE L tltDT
batch.transfer.cart 10 FREE L VAL=%PHA.REF.batch.transfer.cart(@batch.transfer.old)
batch.transfer.date 8 DATE L VAL=batch.transfer.date.time#.
batch.transfer.dt.and.tm 13 FREE L VAL=%Z.date.out(@batch.transfer.date)_"-"_(@batch.tran
VAL=sfer.time)
batch.transfer.new 20 FREE L ?TL[tl]P[aa]T[tltDT]|0
batch.transfer.old 20 FREE L ?TL[tl]P[aa]T[tltDT]|1
batch.transfer.time 4 HHMM L VAL=batch.transfer.date.time#1.
Ì € i 2
pha.refill.list.bkg.ot.flags (bkg.order.type.flags)
[urn, bkg.order.type]
?TL[tl]BKG["OT",tdo]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bkg.order.type 10 FREE L PHA.OT tdo
bkg.order.type.flag 1 YN L ?TL[tl]BKG["OT",tdo]|0
Ì € i 2
pha.refill.list.section.params (print.params.sections)
[urn, print.sec.q]
?TL[tl]M["S",tdrfS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
print.sec.q 1 PINT R tdrfS
print.generic.trade.both 1 CHOICE L ?TL[tl]M["S",tdrfS]|2
print.indent 2 PINT R ?TL[tl]M["S",tdrfS]|3
print.patient.cont.hdr 70 FREE L ?TL[tl]M["S",tdrfS]F|1
print.patient.hdr 70 FREE L ?TL[tl]M["S",tdrfS]F|0
print.patient.trailer 70 FREE L ?TL[tl]M["S",tdrfS]F|2
print.rx.detail 70 FREE L ?TL[tl]M["S",tdrfS]F2|1
print.rx.hdr 70 FREE L ?TL[tl]M["S",tdrfS]F2|0
print.rx.trailer 70 FREE L ?TL[tl]M["S",tdrfS]F2|2
print.sec.hdr 70 FREE L ?TL[tl]M["S",tdrfS]|0
print.sec.trailer 70 FREE L ?TL[tl]M["S",tdrfS]|1
Ì € i 2
pha.refill.list.med.params (print.params.meds)
[urn,print.sec.q, print.med.type]
?TL[tl]M["S",tdrfS]M[tdrsM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
print.med.type 5 FREE L tdrsM
print.med 1 YN L ?TL[tl]M["S",tdrfS]M[tdrsM]|0
Ì € i 2
pha.refill.list.sec.type.param (print.params.sec.types)
[urn,print.sec.q, print.sec.type]
?TL[tl]M["S",tdrfS]T[tdrsT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
print.sec.type 5 FREE L tdrsT
print.section 1 YN L ?TL[tl]M["S",tdrfS]T[tdrsT]|0
Ì € i 2
pha.refill.list.sort.by.params (print.params.sort.by)
[urn,print.sec.q, print.sort.by.q]
?TL[tl]M["S",tdrfS]B[tdrsB]
Field Name Len Dat Typ J DPM Offset/Local/VAL
print.sort.by.q 2 PINT R tdrsB
print.sort.by 8 CHOICE L ?TL[tl]M["S",tdrfS]B[tdrsB]
Ì € i 2
pha.refill.list.sort.ord.param (print.params.sort.order)
[urn,print.sec.q,print.sort.by.q, print.sort.order.q]
?TL[tl]M["S",tdrfS]B[tdrsB]O[tdrsO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
print.sort.order.q 2 PINT R tdrsO
print.sort.format 8 CHOICE L ?TL[tl]M["S",tdrfS]B[tdrsB]O[tdrsO]|1
print.sort.order 8 FREE L ?TL[tl]M["S",tdrfS]B[tdrsB]O[tdrsO]|0
Ì i 2
pha.refill.list.report.fields (rpt.fields)
[rpt.rx.urn]
/TLR[tr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.rx.urn 10 URN L PHA.RX tr
rpt.rx.setup 1 FREE L VAL=/PHA.REF.urn^PHA.REF.urn,/PHA.REF.section^PHA.REF.
VAL=section,/PHA.REF.patient^PHA.REF.patient,/PHA.REF.
VAL=rx.urn^PHA.REF.rx.urn
Ì € i 2
pha.refill.list.report.meds (rpt.fields.meds)
[rpt.rx.urn, rpt.med]
/TLR[tr]M[tf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.med 10 FREE L PHA.DRUG tf
rpt.med.dispense 9 PDEC R /TLR[tr]M[tf]|1
rpt.med.dose 9 PDEC R /TLR[tr]M[tf]|0
rpt.med.generic 10 FREE L VAL=@PHA.DRUG.generic
rpt.med.generic.id 72 FREE L VAL=@PHA.DRUG.generic.id
rpt.med.generic.name 30 FREE L VAL=@PHA.DRUG.generic.name
rpt.med.late 9 PDEC R /TLR[tr]M[tf]|2
rpt.med.trade.name 45 FREE L VAL=@PHA.DRUG.name
rpt.med.volume 9 PDEC R /TLR[tr]M[tf]|3
Ì i 2
pha.refill.list.report.params (rpt.params)
/TLF
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.menu.arg 10 FREE L /TLF|0
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
pha.refill.list.out.batch.indx [type,cart,order.group,batch.date,batch.number] = urn
batch.out.x :TLBO[tddY,tdd,tdog,tlD,tlB]
pha.refill.list.batch.index [type,cart,order.group,batch.date,batch.time,batch.number] = urn
batch.x :TLB[tddY,tdd,tdog,tlD,tlT,tlB]
pha.refill.list.ord.bch.index [type,cart,order.type,batch.date,batch.time,batch.number] = urn
order.batch.x :TLA[tddY,tdd,tdo,tlD,tlT,tlB]
pha.refill.list.ord.type.index [cart,order.type,urn] = urn
order.type.x :TLO[tdd,tdo,tl]
pha.refill.list.type.index [type,cart,urn] = urn
type.x :TLY[tddY,tdd,tl]
|
|
| | | | | | | | | | | | | | | | |