Ì i 2
exceptions
[proc.exp.db,proc.exp.fac,proc.exp.cat,proc.exp.order.type,proc.exp.date,proc.exp.time,proc.exp
&(HX)HXEX[hxexD,hxexF,hxexC,hxzt,hxexd,hxext,gu]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.exp.db 12 FREE L MIS.APPL.DB hxexD
proc.exp.fac 10 FREE L MIS.FACILITY hxexF
proc.exp.cat 10 FREE L OE.CAT hxexC
proc.exp.order.type 10 FREE L RXM.ORD.TYPE hxzt
proc.exp.date 10 DATE10 L hxexd
proc.exp.time 4 HHMM L hxext
proc.exp.user 10 FREE L MIS.USER gu
Ì € i 2
proc.exceptions
[proc.exp.db,proc.exp.fac,proc.exp.cat,proc.exp.order.type,proc.exp.date,proc.exp.time,proc.exp
&(HX)HXEX[hxexD,hxexF,hxexC,hxzt,hxexd,hxext,gu]P[hxexc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.exp.count 5 PINT R hxexc
proc.exp.mne 10 FREE L &(HX)HXEX[hxexD,hxexF,hxexC,hxzt,hxexd,hxext,gu]P[hxexc]|0
proc.exp.name 30 FREE L &(HX)HXEX[hxexD,hxexF,hxexC,hxzt,hxexd,hxext,gu]P[hxexc]|1
Ì i 2
main
[mnemonic]
&(HX)HXE[hxe]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 10 FREE L hxe
active 1 YN L &(HX)HXE[hxe]|0
description 30 FREE L &(HX)HXE[hxe]|1
dft.display.name 20 FREE L &(HX)HXE[hxe]|2
duplicate.time 6 FREE L &(HX)HXE[hxe]|5
ear.dft.cpt.code 10 FREE L &(HX)HXE[hxe]|9
keyword 30 FREE L
last.update 10 FREE L &(HX)HXE[hxe]UPD|0
last.update.date 8 DATE L VAL=%Z.date.in.magic(@last.update)
last.update.date.time 15 FREE L VAL=%Z.date.out(@last.update.date,"",10)_"-"_@last.upd
VAL=ate.time'="-"
last.update.time 4 HHMM L VAL=%Z.time.out(@last.update)
last.update.user 10 FREE L MIS.USER &(HX)HXE[hxe]UPD|1
office.injection 1 YN L &(HX)HXE[hxe]|8
order.type 10 FREE L RXM.ORD.TYPE &(HX)HXE[hxe]|3
referral.service 10 FREE L MIS.ABS.SVC &(HX)HXE[hxe]|6
results.overdue.days 3 PINT R &(HX)HXE[hxe]|7
series.count 3 PINT R &(HX)HXE[hxe]S|2
series.order 1 YN L &(HX)HXE[hxe]S|0
series.order.period 10 FREE L RXM.ORD.PERIOD &(HX)HXE[hxe]S|1
series.stop.days 3 PINT R &(HX)HXE[hxe]S|3
Ì € i 2
cpt.codes
[mnemonic, cpt.code]
&(HX)HXE[hxe]C[gsp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cpt.code 10 FREE L MIS.CPT gsp
Ì € i 2
diagnoses
[mnemonic, diag.code]
&(HX)HXE[hxe]DX[gsk]
Field Name Len Dat Typ J DPM Offset/Local/VAL
diag.code 10 FREE L MIS.DIAG gsk
Ì € i 2
facilities
[mnemonic, facility]
&(HX)HXE[hxe]F[gqb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
facility 10 FREE L MIS.FACILITY gqb
ear.cpt.code 10 FREE L &(HX)HXE[hxe]F[gqb]|1
health.maint.item 10 FREE L EAR.HLTH.MAINT &(HX)HXE[hxe]F[gqb]|0
Ì € i 2
locations
[mnemonic,facility, location]
&(HX)HXE[hxe]F[gqb]L[ggn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
location 10 FREE L MIS.LOCN ggn
checkout 1 CHOICE L &(HX)HXE[hxe]F[gqb]L[ggn]|8
checkout.category 10 FREE L PWM.CAT &(HX)HXE[hxe]F[gqb]L[ggn]|15
confidential 1 YN L &(HX)HXE[hxe]F[gqb]L[ggn]|0
dft.enforce.req 1 YN L &(HX)HXE[hxe]F[gqb]L[ggn]|11
dft.order.period 10 FREE L RXM.ORD.PERIOD &(HX)HXE[hxe]F[gqb]L[ggn]|1
dft.perf.site 10 FREE L &(HX)HXE[hxe]F[gqb]L[ggn]|2
dft.priority 1 CHOICE L &(HX)HXE[hxe]F[gqb]L[ggn]|14
document.screen 15 FREE L MIS.SCREEN &(HX)HXE[hxe]F[gqb]L[ggn]|13
modifier.screen 15 FREE L MIS.SCREEN &(HX)HXE[hxe]F[gqb]L[ggn]|4
oe.category 10 FREE L &(HX)HXE[hxe]F[gqb]L[ggn]|5
oe.interface 3 CHOICE L &(HX)HXE[hxe]F[gqb]L[ggn]|12
oe.procedure 10 DEC R &(HX)HXE[hxe]F[gqb]L[ggn]|6
oe.procedure.mnemonic 10 FREE L &(HX)HXE[hxe]F[gqb]L[ggn]|7
phy.enforce.req 1 YN L &(HX)HXE[hxe]F[gqb]L[ggn]|10
phy.modifier.screen 15 FREE L MIS.SCREEN &(HX)HXE[hxe]F[gqb]L[ggn]|9
query.screen 15 FREE L MIS.SCREEN &(HX)HXE[hxe]F[gqb]L[ggn]|3
sch.office.appt.type 10 FREE L SCH.APPT.TYPE &(HX)HXE[hxe]F[gqb]L[ggn]|16
Ì € i 2
dft.queries
[mnemonic,facility,location, dft.query]
&(HX)HXE[hxe]F[gqb]L[ggn]DQ[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dft.query 10 FREE L MIS.QUERY ggv
dft.query.response 60 FREE L &(HX)HXE[hxe]F[gqb]L[ggn]DQ[ggv]|0
Ì € i 2
office.proc.age.groups
[mnemonic,facility,location, op.from.age]
&(HX)HXE[hxe]F[gqb]L[ggn]OP[hxeOA]
Field Name Len Dat Typ J DPM Offset/Local/VAL
op.from.age 7 AGE.SORT L hxeOA
Ì € i 2
office.proc.diagnostics
[mnemonic,facility,location,op.from.age, op.proc.seq.not.used]
&(HX)HXE[hxe]F[gqb]L[ggn]OP[hxeOA]D[hxeOP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
op.proc.seq.not.used 3 PINT R hxeOP
op.proc.not.used 10 FREE L RXM.PROC &(HX)HXE[hxe]F[gqb]L[ggn]OP[hxeOA]D[hxeOP]|0
op.proc.ok.check.not.used 1 FREE L VAL=IF{@op.proc.ok @Z.check.mark.data;""}
op.proc.ok.not.used 1 FREE L &(HX)HXE[hxe]F[gqb]L[ggn]OP[hxeOA]D[hxeOP]|1
op.proc.ok.yn.not.used 1 YN L VAL=IF{@op.proc.ok "Y";"N"}
Ì € i 2
office.proc.meds
[mnemonic,facility,location,op.from.age, op.med.q]
&(HX)HXE[hxe]F[gqb]L[ggn]OP[hxeOA]M[hxeOM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
op.med.q 3 PINT R hxeOM
document.admin 1 YN L &(HX)HXE[hxe]F[gqb]L[ggn]OP[hxeOA]M[hxeOM]|3
op.med 20 FREE L RXM.DRUG &(HX)HXE[hxe]F[gqb]L[ggn]OP[hxeOA]M[hxeOM]|0
op.med.dosage 10 FREE L &(HX)HXE[hxe]F[gqb]L[ggn]OP[hxeOA]M[hxeOM]|1
op.med.order.check 1 FREE L VAL=IF{@op.med.order.ok @Z.check.mark.data;""}
op.med.order.ok 1 FREE L &(HX)HXE[hxe]F[gqb]L[ggn]OP[hxeOA]M[hxeOM]|2
op.med.order.ok.yn 1 YN L VAL=IF{@op.med.order.ok "Y";"N"}
Ì € i 2
print.formats
[mnemonic,facility,location, prt.format.seq]
&(HX)HXE[hxe]F[gqb]L[ggn]PF[hxepfQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
prt.format.seq 2 PINT R hxepfQ
destination 10 FREE L UNV.PRINTER &(HX)HXE[hxe]F[gqb]L[ggn]PF[hxepfQ]|1
num.copies 2 PINT R &(HX)HXE[hxe]F[gqb]L[ggn]PF[hxepfQ]|2
prt.format 10 FREE L RXM.PFORMS &(HX)HXE[hxe]F[gqb]L[ggn]PF[hxepfQ]|0
Ì € i 2
rules
[mnemonic,facility,location, rule]
&(HX)HXE[hxe]F[gqb]L[ggn]R[hxr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rule 10 FREE L RXM.RULE hxr
Ì € i 2
sites
[mnemonic,facility,location, site.q]
&(HX)HXE[hxe]F[gqb]L[ggn]S[hxeSQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
site.q 3 PINT R hxeSQ
site 10 FREE L &(HX)HXE[hxe]F[gqb]L[ggn]S[hxeSQ]|0
site.billing.code 10 FREE L &(HX)HXE[hxe]F[gqb]L[ggn]S[hxeSQ]|1
site.is.default 1 YN L &(HX)HXE[hxe]F[gqb]L[ggn]S[hxeSQ]|2
Ì i 2
proc.update.diagnoses
[proc.diag.code]
/TPROCU["DX",gsk]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.diag.code 10 FREE L MIS.DIAG gsk
Ì i 2
proc.update.locations
[proc.location]
/TPROCU["L",ggn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.location 10 FREE L MIS.LOCN ggn
proc.checkout 1 CHOICE L /TPROCU["L",ggn]LC|8
proc.confidential 1 YN L /TPROCU["L",ggn]LC|3
proc.destination 10 FREE L UNV.PRINTER /TPROCU["L",ggn]LC|6
proc.dft.enforce.req 1 YN L /TPROCU["L",ggn]LC|11
proc.dft.order.period 10 FREE L RXM.ORD.PERIOD /TPROCU["L",ggn]LC|2
proc.dft.priority 1 CHOICE L /TPROCU["L",ggn]LC|14
proc.document.screen 15 FREE L MIS.SCREEN /TPROCU["L",ggn]LC|13
proc.modifier.screen 15 FREE L MIS.SCREEN /TPROCU["L",ggn]LC|1
proc.num.copies 2 PINT R /TPROCU["L",ggn]LC|7
proc.phy.enforce.req 1 YN L /TPROCU["L",ggn]LC|10
proc.phy.modifier.screen 15 FREE L MIS.SCREEN /TPROCU["L",ggn]LC|9
proc.prt.format 10 FREE L RXM.PFORMS /TPROCU["L",ggn]LC|5
proc.query.screen 15 FREE L MIS.SCREEN /TPROCU["L",ggn]LC|0
proc.rule 10 FREE L RXM.RULE /TPROCU["L",ggn]LC|4
proc.sch.office.appt.type 10 FREE L SCH.APPT.TYPE /TPROCU["L",ggn]LC|15
Ì € i 2
proc.update.op.age.groups
[proc.location, proc.op.from.age]
/TPROCU["L",ggn]OP[tpuOA]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.op.from.age 7 AGE.SORT L tpuOA
Ì € i 2
proc.update.op.diagnostic
[proc.location,proc.op.from.age, proc.op.proc.seq]
/TPROCU["L",ggn]OP[tpuOA]D[tpuOP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.op.proc.seq 3 PINT R tpuOP
proc.op.proc 10 FREE L RXM.PROC /TPROCU["L",ggn]OP[tpuOA]D[tpuOP]|0
proc.op.proc.ok 1 FREE L /TPROCU["L",ggn]OP[tpuOA]D[tpuOP]|1
proc.op.proc.ok.check 1 FREE L VAL=IF{@proc.op.proc.ok @Z.check.mark.data;""}
proc.op.proc.ok.yn 1 FREE L VAL=IF{@proc.op.proc.ok "Y";"N"}
Ì € i 2
proc.update.op.meds
[proc.location,proc.op.from.age, proc.op.med.q]
/TPROCU["L",ggn]OP[tpuOA]M[tpuOM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.op.med.q 3 PINT R tpuOM
proc.document.admin 1 YN L /TPROCU["L",ggn]OP[tpuOA]M[tpuOM]|3
proc.op.med 20 FREE L RXM.DRUG /TPROCU["L",ggn]OP[tpuOA]M[tpuOM]|0
proc.op.med.dosage 10 FREE L /TPROCU["L",ggn]OP[tpuOA]M[tpuOM]|1
proc.op.med.order.check 1 FREE L VAL=IF{@proc.op.med.order.ok @Z.check.mark.data;""}
proc.op.med.order.ok 1 FREE L /TPROCU["L",ggn]OP[tpuOA]M[tpuOM]|2
proc.op.med.order.ok.yn 1 YN L VAL=IF{@proc.op.med.order.ok "Y";"N"}
Ì € i 2
proc.update.sites
[proc.location, proc.site.q]
/TPROCU["L",ggn]S[tpuSQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.site.q 3 PINT R tpuSQ
proc.site 10 FREE L /TPROCU["L",ggn]S[tpuSQ]|0
proc.site.billing.code 10 FREE L /TPROCU["L",ggn]S[tpuSQ]|1
proc.site.is.default 1 YN L /TPROCU["L",ggn]S[tpuSQ]|2
Index Files Subscripts/Physical Base
dft.name.x [dft.display.name,mnemonic]
&(HX)HXEN[hxeN,hxe]
health.maint.x [health.maint.item,facility,mnemonic]
&(HX)HXEHM[hch,gqb,hxe]
keyword.x [keyword,mnemonic]
&(HX)HXEK[hxek,hxe]
location.x [location,mnemonic]
&(HX)HXEL[ggn,hxe]
oe.proc.x [oe.category,oe.procedure.mnemonic,facility,location,mnemonic] = oe.procedure
&(HX)HXEO[pc,ppM,gqb,ggn,hxe]
type.x [order.type,mnemonic]
&(HX)HXET[hxzt,hxe]
|
|
| | | | | | | | | | | | | | | | | | |