Ì € i 2
list
[id]
&(M)MHTL[mhtl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
id 10 FREE L mhtl
active 1 YN L &(M)MHTL[mhtl]|0
description 30 FREE L &(M)MHTL[mhtl]|1
inv.check 1 YN L VAL=IF{%MM.INVENT.security(@MM.HHT.inventory,1,"","")
VAL="N";"Y"}
inventory 10 FREE L MM.INVENT &(M)MHTL[mhtl]|2
last.update 10 PINT R &(M)MHTL[mhtl]UPD
Ì € i 2
list.stocks
[id, seq]
&(M)MHTL[mhtl]S[mhtlS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
seq 4 PINT R mhtlS
location 10 FREE L &(M)MHTL[mhtl]S[mhtlS]|1
stock.no 18 URN L MM.STOCK &(M)MHTL[mhtl]S[mhtlS]|0
Ì € i 2
main
*(M)MHT
Field Name Len Dat Typ J DPM Offset/Local/VAL
session.counter 10 PINT R *(M)MHT|0
Ì € i 2
sessions
[session.number]
*(M)MHT[mht]
Field Name Len Dat Typ J DPM Offset/Local/VAL
session.number 6 PINT R mht
session.date 8 DATE L *(M)MHT[mht]|0
session.error.message 70 FREE L *(M)MHT[mht]|4
session.num.batches 6 INT R *(M)MHT[mht]|7
session.num.batches.cncl 6 INT R *(M)MHT[mht]|10
session.num.batches.pst 6 INT R *(M)MHT[mht]|9
session.num.errors 6 INT R *(M)MHT[mht]|8
session.rcvd.date 8 DATE L *(M)MHT[mht]|1
session.rcvd.time 4 TIME L *(M)MHT[mht]|2
session.status 10 CHOICE L *(M)MHT[mht]|5
session.status.date 4 DATE L *(M)MHT[mht]|6
session.user 10 FREE L MIS.USER *(M)MHT[mht]|3
Ì € i 2
batches
[session.number, batch.number]
*(M)MHT[mht]B[mhtb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.number 6 PINT R mhtb
batch.bar.db 12 FREE L MIS.APPL *(M)MHT[mht]B[mhtb]|11
batch.comment 25 FREE L *(M)MHT[mht]B[mhtb]|4
batch.date 8 DATE L *(M)MHT[mht]B[mhtb]|3
batch.dept 15 FREE L MIS.GL.DEPT *(M)MHT[mht]B[mhtb]|14
batch.dept.err 5 CHOICE L *(M)MHT[mht]B[mhtb]|15
batch.dept.name 30 FREE L VAL=@MIS.GL.DEPT.name[@batch.dept]
batch.for.inventory 10 FREE L MM.INVENT *(M)MHT[mht]B[mhtb]|12
batch.for.inventory.err 5 CHOICE L *(M)MHT[mht]B[mhtb]|13
batch.inventory 10 FREE L MM.INVENT *(M)MHT[mht]B[mhtb]|1
batch.inventory.err 5 CHOICE L *(M)MHT[mht]B[mhtb]|2
batch.inventory.rpt 10 FREE L VAL=IF{"*"_@batch.inventory.err_"*"'="**";@batch.inven
VAL=tory}
batch.num.errors 6 INT R *(M)MHT[mht]B[mhtb]|9
batch.post.level 1 PINT R *(M)MHT[mht]B[mhtb]|16
batch.ref.number 10 FREE L *(M)MHT[mht]B[mhtb]|10
batch.status 10 CHOICE L *(M)MHT[mht]B[mhtb]|7
batch.status.date 8 DATE L *(M)MHT[mht]B[mhtb]|8
batch.type 3 CHOICE L *(M)MHT[mht]B[mhtb]|0
batch.type.text 6 FREE L VAL=%MM.HHT.batch.type.text(@batch.type)
batch.user 10 FREE L MIS.USER *(M)MHT[mht]B[mhtb]|5
batch.user.err 5 CHOICE L *(M)MHT[mht]B[mhtb]|6
Ì € i 2
batch.log
[session.number,batch.number, sbl.q]
*(M)MHT[mht]B[mhtb]W[mhtW]
Field Name Len Dat Typ J DPM Offset/Local/VAL
sbl.q 3 PINT R mhtW
sbl.text 75 FREE L *(M)MHT[mht]B[mhtb]W[mhtW]|0
Ì € i 2
batch.records
[session.number,batch.number, record.number]
*(M)MHT[mht]B[mhtb]R[mhtr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
record.number 6 PINT R mhtr
record.err 1 YN L *(M)MHT[mht]B[mhtb]R[mhtr]|9
record.posted 1 YN L *(M)MHT[mht]B[mhtb]R[mhtr]|10
record.pt.id 15 FREE L *(M)MHT[mht]B[mhtb]R[mhtr]|7
record.pt.id.err 3 CHOICE L *(M)MHT[mht]B[mhtb]R[mhtr]|8
record.pt.id.rpt 15 FREE L VAL=IF{"*"_@record.patient.id.err_"*"'="**";@record.pa
VAL=tient.id}
record.qty1 10 FREE L *(M)MHT[mht]B[mhtb]R[mhtr]|3
record.qty1.err 3 CHOICE L *(M)MHT[mht]B[mhtb]R[mhtr]|4
record.qty1.rpt 10 FREE L VAL=IF{"*"_@record.qty1.err_"*"'="**";@record.qty1}
record.qty2 10 FREE L *(M)MHT[mht]B[mhtb]R[mhtr]|5
record.qty2.err 3 CHOICE L *(M)MHT[mht]B[mhtb]R[mhtr]|6
record.qty2.rpt 10 FREE L VAL=IF{"*"_@record.qty2.err_"*"'="**";@record.qty2}
record.stock.no 10 FREE L *(M)MHT[mht]B[mhtb]R[mhtr]|1
record.stock.no.err 3 CHOICE L *(M)MHT[mht]B[mhtb]R[mhtr]|2
record.stock.no.rpt 10 FREE L VAL=IF{"*"_@record.stock.no.err_"*"'="**";@record.stoc
VAL=k.no}
record.stock.urn 18 URN L MM.STOCK *(M)MHT[mht]B[mhtb]R[mhtr]|11
record.type 10 CHOICE L *(M)MHT[mht]B[mhtb]R[mhtr]|0
record.um 4 FREE L VAL=IF{@record.type=041 @MM.STOCK.pt.unit.of.issue[@re
VAL=cord.stock.urn];@MM.STOCK.unit.of.issue[@record.st
VAL=ock.urn]}
Ì € i 2
record.list
[session.number, recrd.type,recrd.batch.num]
*(M)MHT[mht]P[mhtbT,mhtb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
recrd.type 3 FREE L mhtbT
recrd.batch.num 6 PINT R mhtb
recrd.inventory 10 FREE L MM.INVENT *(M)MHT[mht]P[mhtbT,mhtb]|0
recrd.number 6 FREE L *(M)MHT[mht]P[mhtbT,mhtb]|1
Index Files Subscripts/Physical Base
session.date.x [session.date,session.number]
?(M)MHTX[mhtD,mht]
|
|
| | | | | | |