Ì i 2
check.batches
[check.batch.urn]
*(T2)TLCB[tlcb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
check.batch.urn 10 URN L tlcb
check.batch.cart 10 FREE L PHA.CART *(T2)TLCB[tlcb]|1
check.batch.create.date 8 DATE L *(T2)TLCB[tlcb]|4
check.batch.create.time 4 HHMM L *(T2)TLCB[tlcb]|5
check.batch.create.user 10 FREE L MIS.USER *(T2)TLCB[tlcb]|6
check.batch.date 8 DATE L *(T2)TLCB[tlcb]|2
check.batch.time 4 HHMM L *(T2)TLCB[tlcb]|3
check.batch.type 2 CHOICE L *(T2)TLCB[tlcb]|0
Ì € i 2
check.batch.patients
[check.batch.urn, check.batch.patient.q]
*(T2)TLCB[tlcb]P[tlcbP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
check.batch.patient.q 2 PINT R tlcbP
check.batch.check.total 2 PINT R *(T2)TLCB[tlcb]P[tlcbP]|2
check.batch.med.total 2 PINT R *(T2)TLCB[tlcb]P[tlcbP]|1
check.batch.patient 30 URN L ADM.PAT *(T2)TLCB[tlcb]P[tlcbP]|0
Ì € i 2
check.batch.meds
[check.batch.urn,check.batch.patient.q, check.batch.med.q]
*(T2)TLCB[tlcb]P[tlcbP]M[tlcbM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
check.batch.med.q 2 PINT R tlcbM
check.batch.med 10 FREE L PHA.DRUG *(T2)TLCB[tlcb]P[tlcbP]M[tlcbM]|0
check.batch.med.count 9 PDEC5 R *(T2)TLCB[tlcb]P[tlcbP]M[tlcbM]|2
check.batch.med.disp 20 FREE L *(T2)TLCB[tlcb]P[tlcbP]M[tlcbM]|1
Ì i 2
main
[urn]
*(T2)TL[tl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 10 URN L tl
batch.check.date 8 DATE L *(T2)TL[tl]|11
batch.check.time 4 HHMM L *(T2)TL[tl]|12
batch.check.user 10 FREE L MIS.USER *(T2)TL[tl]|13
batch.create.date 8 DATE L *(T2)TL[tl]|6
batch.create.time 4 HHMM L *(T2)TL[tl]|7
batch.create.user 10 FREE L MIS.USER *(T2)TL[tl]|8
batch.date 8 DATE L *(T2)TL[tl]|3
batch.end.date 8 DATE L *(T2)TL[tl]|9
batch.end.time 4 HHMM L *(T2)TL[tl]|10
batch.number 3 PINT R *(T2)TL[tl]|5
batch.time 4 HHMM L *(T2)TL[tl]|4
bkg.report.flag 1 YN L *(T2)TL[tl]BKG|0
bkg.worksheet.flag 1 YN L *(T2)TL[tl]BKG|1
cart 10 FREE L PHA.CART *(T2)TL[tl]|1
order.group 10 FREE L PHA.OG *(T2)TL[tl]|2
print.cpi 2 CHOICE L *(T2)TL[tl]M["L"]|0
print.cpl 3 PINT R *(T2)TL[tl]M["L"]|3
print.lpi 2 CHOICE L *(T2)TL[tl]M["L"]|1
print.lpp 3 PINT R *(T2)TL[tl]M["L"]|4
print.page.hdr 70 FREE L *(T2)TL[tl]M["F"]|0
print.page.trailer 70 FREE L *(T2)TL[tl]M["F"]|1
print.ps 3 PINT R *(T2)TL[tl]M["L"]|2
print.title 55 FREE L *(T2)TL[tl]M|0
type 2 CHOICE L *(T2)TL[tl]|0
Ì € i 2
batch.links
[urn, batch.link.urn]
*(T2)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
batch.patients
[urn, batch.patient]
*(T2)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 *(T2)TL[tl]P[aa]|2
batch.location 10 FREE L MIS.LOCN *(T2)TL[tl]P[aa]|3
batch.room 10 FREE L MIS.ROOM *(T2)TL[tl]P[aa]|1
batch.room.q 3 PINT R *(T2)TL[tl]P[aa]|0
Ì € i 2
batch.entry
[urn,batch.patient, batch.rx.urn]
*(T2)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 *(T2)TL[tl]P[aa]B[tr]|8
batch.add.time 4 HHMM L *(T2)TL[tl]P[aa]B[tr]|9
batch.add.user 10 FREE L MIS.USER *(T2)TL[tl]P[aa]B[tr]|10
batch.apm.inventory 10 FREE L MM.INVENT *(T2)TL[tl]P[aa]B[tr]|13
batch.check.count 9 PDEC5 R *(T2)TL[tl]P[aa]B[tr]|16
batch.dispense 9 PDEC5 R *(T2)TL[tl]P[aa]B[tr]|0
batch.doses 4 INT R *(T2)TL[tl]P[aa]B[tr]|2
batch.doses.calc 4 INT R *(T2)TL[tl]P[aa]B[tr]|7
batch.items 9 PDEC5 R *(T2)TL[tl]P[aa]B[tr]|5
batch.items.calc 9 PDEC5 R *(T2)TL[tl]P[aa]B[tr]|6
batch.last.bottle 3 INT R *(T2)TL[tl]P[aa]B[tr]|11
batch.late 9 PDEC5 R *(T2)TL[tl]P[aa]B[tr]|1
batch.messages.only 1 YN L *(T2)TL[tl]P[aa]B[tr]|14
batch.out.refill 3 INT R *(T2)TL[tl]P[aa]B[tr]|12
batch.rule.err.wo.msg 1 YN L *(T2)TL[tl]P[aa]B[tr]|15
batch.rx.schedule 3 CHOICE L *(T2)TL[tl]P[aa]B[tr]|4
batch.rx.status 2 CHOICE L *(T2)TL[tl]P[aa]B[tr]|3
Ì € i 2
batch.alt.entry
[urn,batch.patient,batch.rx.urn, batch.alt.bottle.type]
*(T2)TL[tl]P[aa]B[tr]A[trBT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.alt.bottle.type 2 PINT R trBT
batch.alt.dispense 9 PDEC5 R *(T2)TL[tl]P[aa]B[tr]A[trBT]|0
batch.alt.doses 4 INT R *(T2)TL[tl]P[aa]B[tr]A[trBT]|2
batch.alt.late 9 PDEC5 R *(T2)TL[tl]P[aa]B[tr]A[trBT]|1
Ì € i 2
batch.alt.dispensing
[urn,batch.patient,batch.rx.urn,batch.alt.bottle.type, batch.alt.disp.date.time]
*(T2)TL[tl]P[aa]B[tr]A[trBT]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 *(T2)TL[tl]P[aa]B[tr]A[trBT]B[trdA]
Ì € i 2
batch.dispensing
[urn,batch.patient,batch.rx.urn, batch.dispense.date.time]
*(T2)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 *(T2)TL[tl]P[aa]B[tr]D[trdA]
Ì € i 2
batch.messages
[urn,batch.patient,batch.rx.urn, batch.message.q]
*(T2)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 *(T2)TL[tl]P[aa]B[tr]M[trBMQ]|0
batch.message.date 8 DATE L *(T2)TL[tl]P[aa]B[tr]M[trBMQ]|1
batch.message.rule.msg 60 FREE L *(T2)TL[tl]P[aa]B[tr]M[trBMQ]|4
batch.message.time 4 HHMM L *(T2)TL[tl]P[aa]B[tr]M[trBMQ]|2
batch.message.user 10 FREE L MIS.USER *(T2)TL[tl]P[aa]B[tr]M[trBMQ]|3
Ì € i 2
batch.message.text
[urn,batch.patient,batch.rx.urn,batch.message.q, batch.message.text.q]
*(T2)TL[tl]P[aa]B[tr]M[trBMQ]T[trBMT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.message.text.q 3 PINT R trBMT
batch.message.text.line 80 TEXT L *(T2)TL[tl]P[aa]B[tr]M[trBMQ]T[trBMT]
Ì € i 2
batch.worksheet
[urn,batch.patient,batch.rx.urn, batch.wksht.med]
*(T2)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 *(T2)TL[tl]P[aa]B[tr]W[tf]|0
Ì € i 2
batch.transfer
[urn,batch.patient, batch.transfer.date.time]
*(T2)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.CART.room.x[@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 *(T2)TL[tl]P[aa]T[tltDT]|0
batch.transfer.old 20 FREE L *(T2)TL[tl]P[aa]T[tltDT]|1
batch.transfer.time 4 HHMM L VAL=batch.transfer.date.time#1.
Ì € i 2
bkg.order.type.flags
[urn, bkg.order.type]
*(T2)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 *(T2)TL[tl]BKG["OT",tdo]|0
Ì € i 2
print.params.sections
[urn, print.sec.q]
*(T2)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 *(T2)TL[tl]M["S",tdrfS]|2
print.indent 2 PINT R *(T2)TL[tl]M["S",tdrfS]|3
print.patient.cont.hdr 70 FREE L *(T2)TL[tl]M["S",tdrfS]F|1
print.patient.hdr 70 FREE L *(T2)TL[tl]M["S",tdrfS]F|0
print.patient.trailer 70 FREE L *(T2)TL[tl]M["S",tdrfS]F|2
print.rx.detail 70 FREE L *(T2)TL[tl]M["S",tdrfS]F2|1
print.rx.hdr 70 FREE L *(T2)TL[tl]M["S",tdrfS]F2|0
print.rx.trailer 70 FREE L *(T2)TL[tl]M["S",tdrfS]F2|2
print.sec.hdr 70 FREE L *(T2)TL[tl]M["S",tdrfS]|0
print.sec.trailer 70 FREE L *(T2)TL[tl]M["S",tdrfS]|1
Ì € i 2
print.params.meds
[urn,print.sec.q, print.med.type]
*(T2)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 *(T2)TL[tl]M["S",tdrfS]M[tdrsM]|0
Ì € i 2
print.params.sec.types
[urn,print.sec.q, print.sec.type]
*(T2)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 *(T2)TL[tl]M["S",tdrfS]T[tdrsT]|0
Ì € i 2
print.params.sort.by
[urn,print.sec.q, print.sort.by.q]
*(T2)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 *(T2)TL[tl]M["S",tdrfS]B[tdrsB]
Ì € i 2
print.params.sort.order
[urn,print.sec.q,print.sort.by.q, print.sort.order.q]
*(T2)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 *(T2)TL[tl]M["S",tdrfS]B[tdrsB]O[tdrsO]|1
print.sort.order 8 FREE L *(T2)TL[tl]M["S",tdrfS]B[tdrsB]O[tdrsO]|0
Ì i 2
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
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 12 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
rpt.params
/TLF
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.menu.arg 10 FREE L /TLF|0
Index Files Subscripts/Physical Base
batch.out.x [type,cart,order.group,batch.date,batch.number] = urn
?(T)TLBO[tddY,tdd,tdog,tlD,tlB]
batch.x [type,cart,order.group,batch.date,batch.time,batch.number] = urn
?(T)TLB[tddY,tdd,tdog,tlD,tlT,tlB]
check.batch.x [check.batch.type,check.batch.cart,check.batch.date,check.batch.time,check.batch
?(T)TLCBL[tddY,tdd,tlcbD,tlcbT,tlcb]
order.batch.x [type,cart,order.type,batch.date,batch.time,batch.number] = urn
?(T)TLA[tddY,tdd,tdo,tlD,tlT,tlB]
order.type.x [cart,order.type,urn] = urn
?(T)TLO[tdd,tdo,tl]
type.x [type,cart,urn] = urn
?(T)TLY[tddY,tdd,tl]
|
|
| | | | | | | | | | | | | | | | | | | | | |