Ì i 2
mm.stock.pt.stocks.prod.info (input.pt.stocks.prod.info)
[inp.stock.seq.no, inp.item.info]
/MHP[msS]I[mhI]
Field Name Len Dat Typ J DPM Offset/Local/VAL
inp.item.info 3 PINT R mhI
inp.item.exp.date 8 DATE L /MHP[msS]I[mhI]|2
inp.item.lot.number 30 FREE L /MHP[msS]I[mhI]|1
inp.item.serial.number 30 FREE L /MHP[msS]I[mhI]|0
Ì i 2
mm.stock.pt (main)
[inventory,number]
*MH[mi,mh]
Field Name Len Dat Typ J DPM Offset/Local/VAL
inventory 10 FREE L MM.INVENT mi
number 6 PINT R mh
bar.database 12 FREE L MIS.APPL *MH[mi,mh]|4
date 8 DATE L *MH[mi,mh]|0
description 30 FREE L *MH[mi,mh]|6
id 20 FREE L
number.items 4 PINT R *MH[mi,mh]|8
number.patients 4 PINT R *MH[mi,mh]|9
patient.detail 1 YN L *MH[mi,mh]|2
patient.rev.site 10 FREE L MIS.REV.SITE *MH[mi,mh]|10
post.date 8 DATE L *MH[mi,mh]|3
status 9 CHOICE L *MH[mi,mh]|1
time.sharing.open 1 YN L *MH[mi,mh]|7
Ì € i 2
mm.stock.pt.patients (patients)
[inventory,number, pt]
*MH[mi,mh]P[mhp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pt 12 FREE L mhp
pt.clin.proc 30 FREE L *MH[mi,mh]P[mhp]|2
pt.old.pt 12 FREE L *MH[mi,mh]P[mhp]|3
pt.provider 10 FREE L MIS.DOC.DICT *MH[mi,mh]P[mhp]|1
pt.svc.date 8 DATE L *MH[mi,mh]P[mhp]|0
Ì € i 2
mm.stock.pt.patients.stocks (pt.stocks)
[inventory,number,pt, pt.stock.no]
*MH[mi,mh]P[mhp,msN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pt.stock.no 18 FREE L msN
pt.int.number 12 FREE L *MH[mi,mh]P[mhp,msN]|3
pt.oe.urn 10 URN L OE.ORD *MH[mi,mh]P[mhp,msN]|4
pt.old.int.number 12 FREE L *MH[mi,mh]P[mhp,msN]|5
pt.qty.um 4 PINT R *MH[mi,mh]P[mhp,msN]|1
pt.stock 18 URN L MM.STOCK *MH[mi,mh]P[mhp,msN]|0
pt.stock.description 30 FREE L VAL=@MM.ITEM.description[@MM.STOCK.item[@pt.stock]]
pt.um 4 FREE L *MH[mi,mh]P[mhp,msN]|2
Ì € i 2
mm.stock.pt.stock.product.info (pt.stocks.prod.info)
[inventory,number,pt,pt.stock.no, pt.item.info]
*MH[mi,mh]P[mhp,msN]I[mhI]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pt.item.info 3 PINT R mhI
pt.item.exp.date 8 DATE L *MH[mi,mh]P[mhp,msN]I[mhI]|2
pt.item.lot.number 30 FREE L *MH[mi,mh]P[mhp,msN]I[mhI]|1
pt.item.serial.number 30 FREE L *MH[mi,mh]P[mhp,msN]I[mhI]|0
Ì € i 2
mm.stock.pt.stocks (stocks)
[inventory,number, stock.no]
*MH[mi,mh]S[msN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
stock.no 18 FREE L msN
qty.on.hand.um 7 PINT R VAL=(@MM.STOCK.qty.on.hand[@stock]/@um.us)
qty.um 4 PINT R *MH[mi,mh]S[msN]|1
stock 18 URN L MM.STOCK *MH[mi,mh]S[msN]|0
stock.description 30 FREE L VAL=@MM.ITEM.description[@MM.STOCK.item[@stock]]
txn.charge 10 DEC4 R *MH[mi,mh]S[msN]|2
um 4 FREE L *MH[mi,mh]S[msN]|3
um.us 7 PINT R *MH[mi,mh]S[msN]|4
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
mm.stock.pt.date.index [inventory,date,number]
date.x ?MHI[mi,mhd,mh]
mm.stock.pt.post.date.index [bar.database,post.date,inventory,number]
post.date.x ?MHPD[iaD,mhPD,mi,mh]
|
|
| | | | |