Ì i 2
booked.pgms
[booked.pgm.urn]
*(W)WZBG[wzbg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
booked.pgm.urn 10 PINT R wzbg
booked.pgm 10 FREE L SCH.TRT.GRP *(W)WZBG[wzbg]|0
booked.pgm.adm.type 3 FREE L *(W)WZBG[wzbg]|3
booked.pgm.no.in.set 2 PINT R *(W)WZBG[wzbg]|1
booked.pgm.start.date 8 DATE L *(W)WZBG[wzbg]|2
Ì € i 2
bp.data
[booked.pgm.urn, bp.seq.no]
*(W)WZBG[wzbg]D[wzBSD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bp.seq.no 3 PINT R wzBSD
bp.date 8 DATE L *(W)WZBG[wzbg]D[wzBSD]|5
bp.early.start 4 FREE L *(W)WZBG[wzbg]D[wzBSD]|0
bp.late.start 4 FREE L *(W)WZBG[wzbg]D[wzBSD]|1
bp.time 5 HHMM5 L *(W)WZBG[wzbg]D[wzBSD]|6
bp.type 10 FREE L SCH.APPT.TYPE *(W)WZBG[wzbg]D[wzBSD]|2
bp.urn 10 FREE L SCH.APPT *(W)WZBG[wzbg]D[wzBSD]|3
Ì € i 2
bp.urns
[booked.pgm.urn, bp.appt]
*(W)WZBG[wzbg]U[wz]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bp.appt 10 FREE L SCH.APPT wz
Ì i 2
booked.sets
[booked.set.urn]
*(W)WZB[wzb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
booked.set.urn 10 PINT R wzb
booked.set.no.in.set 2 PINT R *(W)WZB[wzb]|2
booked.set.ord.phys 10 FREE L MIS.DOC *(W)WZB[wzb]|0
booked.set.series 1 YN L *(W)WZB[wzb]|3
booked.set.set 10 FREE L SCH.APPT.SET *(W)WZB[wzb]|1
booked.set.start.date 8 DATE L *(W)WZB[wzb]|4
Ì € i 2
bs.data
[booked.set.urn, bs.seq.no]
*(W)WZB[wzb]D[wzSD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bs.seq.no 3 PINT R wzSD
bs.date 8 DATE L *(W)WZB[wzb]D[wzSD]|5
bs.early.start 4 FREE L *(W)WZB[wzb]D[wzSD]|0
bs.late.start 4 FREE L *(W)WZB[wzb]D[wzSD]|1
bs.time 4 HHMM L *(W)WZB[wzb]D[wzSD]|6
bs.type 10 FREE L SCH.APPT.TYPE *(W)WZB[wzb]D[wzSD]|2
bs.urn 10 FREE L SCH.APPT *(W)WZB[wzb]D[wzSD]|3
Ì € i 2
bs.urns
[booked.set.urn, bs.appt]
*(W)WZB[wzb]U[wz]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bs.appt 10 FREE L SCH.APPT wz
Ì i 2
compliance
[comp.mri.urn,comp.date,comp.fac,comp.loc]
*(W)WZC[ea,wzCD,gqb,ggn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
comp.mri.urn 25 URN L MRI.PAT ea
comp.date 8 DATE L wzCD
comp.fac 10 FREE L MIS.FACILITY gqb
comp.loc 10 FREE L MIS.LOCN ggn
comp.attended 3 INT R *(W)WZC[ea,wzCD,gqb,ggn]|1
comp.booked 3 INT R *(W)WZC[ea,wzCD,gqb,ggn]|0
comp.cancelled 3 INT R *(W)WZC[ea,wzCD,gqb,ggn]|3
comp.edited 3 INT R *(W)WZC[ea,wzCD,gqb,ggn]|4
comp.no.show 3 INT R *(W)WZC[ea,wzCD,gqb,ggn]|2
Ì € i 2
compliance.reasons
[comp.mri.urn,comp.date,comp.fac,comp.loc, comp.rsn]
*(W)WZC[ea,wzCD,gqb,ggn]R[war]
Field Name Len Dat Typ J DPM Offset/Local/VAL
comp.rsn 10 FREE L SCH.CAN.RSN war
Ì i 2
group.appts
[group.appt.urn]
*(W)WZG[wzg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
group.appt.urn 10 PINT R wzg
ga.max 3 PINT R *(W)WZG[wzg]|10
ga.min 3 PINT R *(W)WZG[wzg]|9
ga.no.in.grp 3 PINT R *(W)WZG[wzg]|8
ga.ord.phys 10 FREE L MIS.DOC *(W)WZG[wzg]|7
group.appt.date 10 DATE L *(W)WZG[wzg]|1
group.appt.dur 3 FREE L *(W)WZG[wzg]|3
group.appt.fac 10 FREE L MIS.FACILITY *(W)WZG[wzg]|6
group.appt.loc 10 FREE L MIS.LOCN *(W)WZG[wzg]|5
group.appt.status 10 FREE L *(W)WZG[wzg]|4
group.appt.time 5 TIME L *(W)WZG[wzg]|2
group.appt.type 10 FREE L SCH.APPT.TYPE *(W)WZG[wzg]|0
Ì € i 2
ga.patients
[group.appt.urn, ee.ga.q]
*(W)WZG[wzg]A[wzgaQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ee.ga.q 3 PINT R wzgaQ
ee.ga.acct 12 FREE L *(W)WZG[wzg]A[wzgaQ]|1
ee.ga.mri.urn 25 URN L MRI.PAT *(W)WZG[wzg]A[wzgaQ]|6
ee.ga.pat 30 FREE L *(W)WZG[wzg]A[wzgaQ]|0
ee.ga.patient 30 URN L ADM.PAT *(W)WZG[wzg]A[wzgaQ]|7
ee.ga.pt.type 7 FREE L *(W)WZG[wzg]A[wzgaQ]|3
ee.ga.ref 1 YN L *(W)WZG[wzg]A[wzgaQ]|8
ee.ga.ref.ee 1 YN L
ee.ga.sxa 8 FREE L *(W)WZG[wzg]A[wzgaQ]|4
ee.ga.unit 10 URN L *(W)WZG[wzg]A[wzgaQ]|2
ee.ga.urn 10 FREE L SCH.APPT *(W)WZG[wzg]A[wzgaQ]|5
Ì € i 2
ga.urns
[group.appt.urn, ga.appt]
*(W)WZG[wzg]U[wz]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ga.appt 10 FREE L SCH.APPT wz
Ì i 2
main
[urn]
$(W1)WZ[wz]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 10 FREE L wz
aom.order.svc.date 8 DATE L $(W1)WZ[wz]RXM|1
appt.day.of.week 9 FREE L VAL=(%SCH.COMMON.day.of.week(IF{@t.SCH.APPT.date;@SCH.
VAL=APPT.date}))
appt.dt.time.out 24 FREE L VAL=(%Z.date.out(@SCH.APPT.date^XD)_" "_%Z.time.text(@
VAL=SCH.APPT.time^XT)_"-"_%Z.time.text(IF{XD %Z.time.a
VAL=dd(XD,XT,@SCH.APPT.duration)^XT,XT|1})'=" -")
appt.ed.reas 10 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AER"))
appt.ed.reas.nm 55 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AERN"))
appt.group.sk 10 FREE L SCH.APPT.GROUP
appt.made.by 34 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"MDBY"))
appt.made.dt 30 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"MDDT"))
appt.made.dtf 30 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"MDDF"))
appt.ok 1 YN L VAL=%SCH.APPT.check.user.appt.access(appt,@.user)
appt.old.date 8 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AOD"))
appt.old.date.fmt 20 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AODF"))
appt.old.time 4 HHMM5 L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AOT"))
appt.old.time.fmt 7 HHMM5 L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AOTF"))
appt.old.type 10 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AOTY"))
appt.old.type.desc 30 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AOTYD"))
appt.resc.cds.mne.dis.1 10 FREE L VAL=@SCH.APPT.ee.res.resrc[IF{urn;/urn},1]
appt.resc.cds.mne.dis.2 10 FREE L VAL=@SCH.APPT.ee.res.resrc[IF{urn;/urn},2]
appt.resc.cds.name.dis.1 30 FREE L VAL=@SCH.APPT.ee.res.resrc.name[@SCH.APPT.ee.res.resrc
VAL=[IF{urn;/urn},1]]
appt.resc.cds.name.dis.2 30 FREE L VAL=@SCH.APPT.ee.res.resrc.name[@SCH.APPT.ee.res.resrc
VAL=[IF{urn;/urn},2]]
appt.sk 50 FREE L
appt.type.name 30 FREE L VAL=(@SCH.APPT.TYPE.description[@SCH.APPT.type])
appt.type.sk 10 FREE L SCH.APPT.TYPE
appt.user.access 1 YN L VAL=%SCH.APPT.check.user.appt.access(urn,@.user)
auth.urn 10 URN L ARM.AUTH $(W1)WZ[wz]RM|0
auth2.urn 10 URN L ARM.AUTH $(W1)WZ[wz]RM|1
call.back.phone 18 PHONE L $(W1)WZ[wz]|23
cancel.reason 10 FREE L SCH.CAN.RSN $(W1)WZ[wz]|8
cleanup.time 3 PINT R $(W1)WZ[wz]OR|10
comments.rpt 0 FREE L VAL=IF{@patient^/comments.rpt,%Z.rw.fragment("SCH.APPT
VAL=.sch.comments.out.R"),""^/comments.rpt}
date 8 DATE L $(W1)WZ[wz]|2
date.sk 8 DATE L
description 50 FREE L VAL=@SCH.APPT.pt.name.desc:25T_" "_%Z.date.out(@SCH.AP
VAL=PT.date)_" "_@SCH.APPT.time_" "_@SCH.APPT.type
doctor 10 FREE L MIS.DOC $(W1)WZ[wz]|7
doctor.name 30 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"ODNM"))
dummy 10 CHOICE L
dup.copy 10 FREE L SCH.APPT $(W1)WZ[wz]|22
duration 4 PINT R $(W1)WZ[wz]|9
ear.encounter.number 12 FREE L $(W1)WZ[wz]EAR|1
ear.encounter.urn 12 PINT R $(W1)WZ[wz]EAR|0
ee.res.duration.or 4 PINT R $(W1)WZ[wz]OR["E"]|3
ee.res.inc.exc.res.or 7 CHOICE L $(W1)WZ[wz]OR["E"]|4
ee.res.resrc.name.or 29 FREE L VAL=@SCH.RESOURCE.name[@ee.res.resrc]:29T
ee.res.resrc.or 15 FREE L SCH.RESOURCE $(W1)WZ[wz]OR["E"]|1
ee.res.rsrc.grp.name.or 30 FREE L VAL=@SCH.RSRC.GRP.description[@ee.res.rsrc.grp.or]
ee.res.rsrc.grp.or 10 FREE L SCH.RSRC.GRP $(W1)WZ[wz]OR["E"]|0
ee.res.start.dat.or 8 DATE L $(W1)WZ[wz]OR["E"]|5
ee.res.start.or 4 INT R $(W1)WZ[wz]OR["E"]|2
ee.res.start.tim.or 4 HHMM L $(W1)WZ[wz]OR["E"]|6
facility 10 FREE L MIS.FACILITY $(W1)WZ[wz]|4
free.txt.sk 10 FREE L
from.aom 1 YN L $(W1)WZ[wz]RXM|0
ga.urn 10 FREE L $(W1)WZ[wz]|27
last.possible.date 8 DATE L $(W1)WZ[wz]|19
letter 10 FREE L SCH.LETTER.TEXTVAL=SCH.LETTER.TEXT.mnemonic
letter.text 0 FREE L VAL=%SCH.APPT.print.ltr(SCH.PROGRAM.c.letter.text)
letter.text.dummy 0 FREE L VAL=%SCH.APPT.print.ltr.dummy(SCH.PROGRAM.c.letter.tex
VAL=t)
loc.res.grp 10 FREE L SCH.RSRC.GRP $(W1)WZ[wz]|13
location 10 FREE L MIS.LOCN $(W1)WZ[wz]|12
message.q.sk 2 PINT R
mri.urn 25 URN L MRI.PAT $(W1)WZ[wz]|1
oe.ord.urn 10 URN L OE.ORD $(W1)WZ[wz]|26
or.anes.type 10 FREE L SCH.ANES.TYPE $(W1)WZ[wz]OR|4
or.anesthetist 10 FREE L MIS.DOC $(W1)WZ[wz]OR|7
or.cancel.text 30 FREE L $(W1)WZ[wz]OR|0
or.move.case 4 FREE L $(W1)WZ[wz]OR|1
or.patient.service 10 FREE L MIS.ABS.SVC $(W1)WZ[wz]OR|8
or.primary.op.urn 2 INT R $(W1)WZ[wz]OR|2
or.profile.room 15 FREE L SCH.RESOURCE $(W1)WZ[wz]OR|11
or.surgeon 10 FREE L MIS.DOC $(W1)WZ[wz]OR|5
or.type 1 FREE L $(W1)WZ[wz]OR|3
or.urn 10 URN L SCH.PAT $(W1)WZ[wz]OR|6
patient 30 URN L ADM.PAT $(W1)WZ[wz]|6
pbr.act.urn 44 FREE L $(W1)WZ[wz]PPR|1
pbr.age.0 8 SMONEY R VAL=%SCH.APPT.pt.fields.pbr(urn,"PBR.AG0")
pbr.age.120 9 SMONEY R VAL=%SCH.APPT.pt.fields.pbr(urn,"PBR.AG120")
pbr.age.150 9 SMONEY R VAL=%SCH.APPT.pt.fields.pbr(urn,"PBR.AG150")
pbr.age.180 9 SMONEY R VAL=%SCH.APPT.pt.fields.pbr(urn,"PBR.AG180")
pbr.age.30 9 SMONEY R VAL=%SCH.APPT.pt.fields.pbr(urn,"PBR.AG30")
pbr.age.60 9 SMONEY R VAL=%SCH.APPT.pt.fields.pbr(urn,"PBR.AG60")
pbr.age.90 9 SMONEY R VAL=%SCH.APPT.pt.fields.pbr(urn,"PBR.AG90")
pbr.bad.debt.balance 9 SMONEY R VAL=%SCH.APPT.pt.fields.pbr(urn,"PBR.BDBAL")
pbr.bd.flag 1 YN L VAL=%SCH.APPT.pt.fields.pbr(urn,"PBR.BD")
pbr.epi.seq 5 PINT R $(W1)WZ[wz]PPR|2
pbr.total 8 SMONEY R VAL=%SCH.APPT.pt.fields.pbr(urn,"PBR.TOT")
pend.priority 1 PINT R $(W1)WZ[wz]|17
ppr.enc.rfv 50 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"ENCRFV"))
ppr.enc.seq 4 INT R $(W1)WZ[wz]PPR|0
ppr.ins.episode 18 FREE L VAL=(%SCH.APPT.view.M.disp.epi.info(SCH.APPT.urn))
ppr.practice 10 FREE L SCH.PRACTICE $(W1)WZ[wz]PPR|3
print.cd.screen 0 FREE L VAL=IF{urn^/urn,@SCH.APPT.TYPE.sched.cd.screen[@type]^
VAL=CD %MIS.SCREEN.print(CD,^@customer.defined.fields,
VAL="",0)}
print.cd.screen.verbatim 0 FREE L VAL=IF{urn^/urn,@SCH.APPT.TYPE.sched.cd.screen[@type]^
VAL=CD %MIS.SCREEN.print(CD,^@customer.defined.fields,
VAL=1,0)}
print.pt.cds 0 FREE L VAL=IF{IF{/MINIPT IF{@SCH.PARAM.pt.dept.cds[c.dept];@S
VAL=CH.PARAM.dft.dept.appt.cds};@SCH.PARAM.patient.cds
VAL=}^CD %MIS.SCREEN.print(CD,^@ADM.PAT.customer.defin
VAL=ed.fields[@patient],"",0)}
print.pt.cds.verbatim 0 FREE L VAL=IF{IF{/MINIPT IF{@SCH.PARAM.pt.dept.cds[c.dept];@S
VAL=CH.PARAM.dft.dept.appt.cds};@SCH.PARAM.patient.cds
VAL=}^CD %MIS.SCREEN.print(CD,^@ADM.PAT.customer.defin
VAL=ed.fields[@patient],1,0)}
printer.sk 10 FREE L UNV.PRINTER
prog.cap 2 PINT R
program 15 FREE L SCH.PROGRAM
pt.acct.no 12 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AN"))
pt.addr1 30 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AD1"))
pt.addr2 30 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AD2"))
pt.age 7 AGE R VAL=(%Z.age(%SCH.APPT.pt.fields(SCH.APPT.urn,"CBD"),IF
VAL={SCH.APPT.date;@SCH.APPT.date}))
pt.auth.num1 18 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AUT1"))
pt.auth.num2 18 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"AUT2"))
pt.bad.debt 1 YN L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"BDBT","",mri.ur
VAL=n))
pt.bdate 10 BDATE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"BD"))
pt.city.st.zip 34 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"CI")_", "_%SCH.
VAL=APPT.pt.fields(SCH.APPT.urn,"ST")_" "_%SCH.APPT.pt
VAL=.fields(SCH.APPT.urn,"ZIP")'=", ")
pt.home.phone 18 PHONE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"HP"))
pt.id.name 48 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"IDNM"))
pt.id.no 15 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"ID"))
pt.ins.name1 30 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"INSN1"))
pt.ins.name2 30 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"INSN2"))
pt.ins1 10 FREE L MIS.INS VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"INS1"))
pt.ins2 10 FREE L MIS.INS VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"INS2"))
pt.name.age.sex 39 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"NM")_" "_%SCH.A
VAL=PPT.pt.fields(SCH.APPT.urn,"SX")_"/"_%SCH.APPT.pt.
VAL=fields(SCH.APPT.urn,"AG")'=" /")
pt.name.desc 30 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"NM"))
pt.name.first 15 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"NMFI"))
pt.name.fl 35 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"NMFL"))
pt.name.last 20 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"NMLA"))
pt.name.plus 25 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"NMPL"))
pt.ov.bal.w.bd.flag 12 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"OVBALBD"))
pt.pol.num1 30 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"POL1"))
pt.pol.num2 30 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"POL2"))
pt.sex 1 CHOICE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"SX"))
pt.sort.sk 30 PINT R
pt.sort.urn 30 PINT R VAL=IF{@t.ADM.PAT.urn;D(1)_@t.MRI.PAT.urn}
pt.title 4 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"TL"))
pt.unit.no 10 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"UN"))
pt.unit.no.tdo 10 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"TDO"))
pt.work.phone 18 PHONE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"WP"))
reas.visit 50 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"REVI"))
res.comment 40 FREE L $(W1)WZ[wz]OR["RV"]|0
reservation 10 FREE L SCH.RESERVE $(W1)WZ[wz]|11
reservation.type CHOICE L $(W1)WZ[wz]|30
sch.cd.screen 15 FREE L MIS.SCREEN VAL=IF{@SCH.APPT.TYPE.sched.cd.screen[@type];@SCH.APPT
VAL=.GROUP.sched.cd.screen[@SCH.APPT.TYPE.group[@type]
VAL=]}
sch.cds.print 0 FREE L VAL=%MIS.SCREEN.print(IF{@SCH.APPT.TYPE.sched.cd.scree
VAL=n[@type];@SCH.APPT.GROUP.sched.cd.screen[@SCH.APPT
VAL=.TYPE.group[@type]]},^@Root(@customer.defined.quer
VAL=ies)[@type],1)
set.urn 10 PINT R $(W1)WZ[wz]|10
setup.time 3 PINT R $(W1)WZ[wz]OR|9
short.notice 1 YN L $(W1)WZ[wz]|21
sp.bdate 8 DATE L $(W1)WZ[wz]SP|0
sp.btime 4 HHMM L $(W1)WZ[wz]SP|2
sp.edate 8 DATE L $(W1)WZ[wz]SP|1
sp.etime 4 HHMM L $(W1)WZ[wz]SP|3
sp.not.fri 1 CHOICE L $(W1)WZ[wz]SP[6]
sp.not.mon 1 CHOICE L $(W1)WZ[wz]SP[2]
sp.not.sat 1 CHOICE L $(W1)WZ[wz]SP[7]
sp.not.sun 1 CHOICE L $(W1)WZ[wz]SP[1]
sp.not.thu 1 CHOICE L $(W1)WZ[wz]SP[5]
sp.not.tue 1 CHOICE L $(W1)WZ[wz]SP[3]
sp.not.wed 1 CHOICE L $(W1)WZ[wz]SP[4]
sp.ns.warn.ok 1 YN L $(W1)WZ[wz]SP|6
sp.sched.warn.ok 1 YN L $(W1)WZ[wz]SP|5
sp.use.pcp 1 CHOICE L $(W1)WZ[wz]SP|4
sp.warn.ok.user 10 FREE L MIS.USER $(W1)WZ[wz]SP|7
status 9 CHOICE L $(W1)WZ[wz]|5
sys.time 10 PINT R
thru.time 5 FREE L VAL=(%SCH.APPT.pt.fields(SCH.APPT.urn,"THRU"))
thru.time.hhmm 4 HHMM5 L VAL=(%Z.time.add("",@SCH.APPT.time,@SCH.APPT.duration)
VAL=#1P)
time 4 HHMM5 L $(W1)WZ[wz]|3
time.in 4 HHMM L $(W1)WZ[wz]|14
time.in.rpt 4 HHMM L VAL=IF{@time.in;@time}
time.out 4 HHMM L $(W1)WZ[wz]|16
time.out.rpt 4 HHMM L VAL=IF{@time.out;@time.seen.rpt^t$2*60+(t%1)+@duration
VAL=^t/60*100+(t\60)}
time.seen 4 HHMM L $(W1)WZ[wz]|15
time.seen.comment 9 FREE L $(W1)WZ[wz]TR|0
time.seen.rpt 4 HHMM L VAL=IF{@time.seen;@time}
time.sk 9 TIME L
type 10 FREE L SCH.APPT.TYPE $(W1)WZ[wz]|0
type.description 30 FREE L VAL=(@SCH.APPT.TYPE.description[@SCH.APPT.type])
type.event.sk 11 FREE L
type.status.sk 1 FREE L
use.inp.loc 1 YN L $(W1)WZ[wz]|25
user.sk 10 FREE L MIS.USER VAL=@MIS.USER.mnemonic
waitlist.cat 10 FREE L SCH.WAITL.CAT $(W1)WZ[wz]|20
waitlist.date 8 DATE L $(W1)WZ[wz]|18
waitlist.time 4 HHMM L $(W1)WZ[wz]|24
Ì € i 2
assoc.ords
[urn, order.seq]
$(W1)WZ[wz]AO[ao]
Field Name Len Dat Typ J DPM Offset/Local/VAL
order.seq 2 PINT R ao
order.urn 10 URN L OE.ORD $(W1)WZ[wz]AO[ao]|0
Ì € i 2
can.reasons
[urn, cr.seq]
$(W1)WZ[wz]CR[wzCAN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cr.seq 2 PINT R wzCAN
cr.date 8 DATE L $(W1)WZ[wz]CR[wzCAN]|1
cr.reason 10 FREE L SCH.CAN.RSN $(W1)WZ[wz]CR[wzCAN]|0
Ì € i 2
customer.defined.queries
[urn, cd.appt.type,cd.query]
$(W1)WZ[wz]CD[wat,ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.appt.type 10 FREE L SCH.APPT.TYPE wat
cd.query 10 FREE L MIS.QUERY ggv
cd.response 75 QRY.RESP L $(W1)WZ[wz]CD[wat,ggv]|0
cd.yn.comment 75 FREE L $(W1)WZ[wz]CD[wat,ggv]|5
Ì € i 2
cust.def.query.mult
[urn,cd.appt.type,cd.query, cd.query.mult.q]
$(W1)WZ[wz]CD[wat,ggv]M[ggvMQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.query.mult.q 2 PINT R ggvMQ
cd.query.mult.response 30 QRY.RESP L $(W1)WZ[wz]CD[wat,ggv]M[ggvMQ]|0
Ì € i 2
ear.encounter.contents
[urn, ear.enc.content]
$(W1)WZ[wz]EARC[rcc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ear.enc.content 10 FREE L rcc
Ì € i 2
ee.resources
[urn, ee.res.q]
$(W1)WZ[wz]E[wzQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ee.res.q 3 PINT R wzQ
ee.res.dur.end 4 PINT R VAL=(@ee.res.start+@ee.res.duration)
ee.res.duration 4 PINT R $(W1)WZ[wz]E[wzQ]|3
ee.res.inc.exc.res 7 CHOICE L $(W1)WZ[wz]E[wzQ]|4
ee.res.location 10 FREE L MIS.LOCN VAL=IF{@SCH.RESOURCE.group.locn[resource,@ee.res.rsrc.
VAL=grp];@SCH.RSRC.GRP.department[@ee.res.rsrc.grp]}
ee.res.obk 1 YN L VAL=IF{@SCH.CAL.appointments[@ee.res.resrc,@ee.res.sta
VAL=rt.dat,@ee.res.start.tim]-@SCH.CAL.capacity[@ee.re
VAL=s.resrc,@ee.res.start.dat,@ee.res.start.tim]>0
VAL="Y"}
ee.res.phone 18 PHONE L VAL=IF{@SCH.RESOURCE.group.phone[@ee.res.resrc,@ee.res
VAL=.rsrc.grp];@SCH.RSRC.GRP.phone[@ee.res.rsrc.grp]}
ee.res.phys.practice 10 FREE L MIS.DOC.GRP VAL=@SCH.RSRC.GRP.phys.practice[@ee.res.rsrc.grp]
ee.res.resrc 15 FREE L SCH.RESOURCE $(W1)WZ[wz]E[wzQ]|1
ee.res.resrc.name 29 FREE L VAL=@SCH.RESOURCE.name[@ee.res.resrc]:29T
ee.res.rsrc.grp 10 FREE L SCH.RSRC.GRP $(W1)WZ[wz]E[wzQ]|0
ee.res.rsrc.grp.name 30 FREE L VAL=@SCH.RSRC.GRP.description[@ee.res.rsrc.grp]
ee.res.start 4 INT R $(W1)WZ[wz]E[wzQ]|2
ee.res.start.dat 8 DATE L $(W1)WZ[wz]E[wzQ]|5
ee.res.start.tim 4 HHMM L $(W1)WZ[wz]E[wzQ]|6
Ì € i 2
ee.res.ie.resrcs
[urn,ee.res.q, ie.resource]
$(W1)WZ[wz]E[wzQ]R[wre]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ie.resource 15 FREE L SCH.RESOURCE wre
ie.res.name 30 FREE L VAL=@SCH.RESOURCE.name[ie.resource]
Ì € i 2
events
[urn, event.date,event.seq.no]
$(W1)WZ[wz]EV[wzed,wzen]
Field Name Len Dat Typ J DPM Offset/Local/VAL
event.date 8 DATE L wzed
event.seq.no 2 PINT R wzen
event.can.rsn.edit 1 YN L $(W1)WZ[wz]EV[wzed,wzen]|18
event.desc 55 FREE L VAL=%SCH.APPT.event.desc(urn,event.date,event.seq.no)
event.ear.enc.number 12 FREE L $(W1)WZ[wz]EV[wzed,wzen]|24
event.epi.edit 1 YN L $(W1)WZ[wz]EV[wzed,wzen]|21
event.letter 10 FREE L SCH.LETTER.TEXT$(W1)WZ[wz]EV[wzed,wzen]|13
event.new.doctor 10 FREE L MIS.DOC $(W1)WZ[wz]EV[wzed,wzen]M|1
event.new.loc 10 FREE L MIS.LOCN $(W1)WZ[wz]EV[wzed,wzen]M|3
event.new.mri 25 URN L MRI.PAT $(W1)WZ[wz]EV[wzed,wzen]|4
event.new.pat 30 URN L ADM.PAT $(W1)WZ[wz]EV[wzed,wzen]|6
event.new.ref 10 FREE L $(W1)WZ[wz]EV[wzed,wzen]M|5
event.new.ref.desc 30 FREE L $(W1)WZ[wz]EV[wzed,wzen]M|7
event.new.ref2 10 FREE L $(W1)WZ[wz]EV[wzed,wzen]M|9
event.new.ref2.desc 30 FREE L $(W1)WZ[wz]EV[wzed,wzen]M|11
event.new.rfv 25 FREE L $(W1)WZ[wz]EV[wzed,wzen]|23
event.new.typ 10 FREE L SCH.APPT.TYPE $(W1)WZ[wz]EV[wzed,wzen]|8
event.new.waitlist 10 FREE L $(W1)WZ[wz]EV[wzed,wzen]M|15
event.old.date 8 DATE L $(W1)WZ[wz]EV[wzed,wzen]|10
event.old.doctor 10 FREE L MIS.DOC $(W1)WZ[wz]EV[wzed,wzen]M|0
event.old.loc 10 FREE L MIS.LOCN $(W1)WZ[wz]EV[wzed,wzen]M|2
event.old.mri 25 URN L MRI.PAT $(W1)WZ[wz]EV[wzed,wzen]|3
event.old.pat 30 URN L ADM.PAT $(W1)WZ[wz]EV[wzed,wzen]|5
event.old.ref 10 FREE L $(W1)WZ[wz]EV[wzed,wzen]M|4
event.old.ref.desc 30 FREE L $(W1)WZ[wz]EV[wzed,wzen]M|6
event.old.ref2 10 FREE L $(W1)WZ[wz]EV[wzed,wzen]M|8
event.old.ref2.desc 30 FREE L $(W1)WZ[wz]EV[wzed,wzen]M|10
event.old.rfv 25 FREE L $(W1)WZ[wz]EV[wzed,wzen]|22
event.old.time 4 HHMM L $(W1)WZ[wz]EV[wzed,wzen]|11
event.old.typ 10 FREE L SCH.APPT.TYPE $(W1)WZ[wz]EV[wzed,wzen]|7
event.old.waitlist 10 FREE L $(W1)WZ[wz]EV[wzed,wzen]M|14
event.or.op.edit 1 YN L $(W1)WZ[wz]EV[wzed,wzen]|17
event.pat.edit 1 YN L $(W1)WZ[wz]EV[wzed,wzen]|9
event.printed 5 CHOICE L $(W1)WZ[wz]EV[wzed,wzen]|14
event.printed.date 8 DATE L $(W1)WZ[wz]EV[wzed,wzen]|16
event.query.edit 1 YN L $(W1)WZ[wz]EV[wzed,wzen]M|12
event.ref.edit 1 YN L $(W1)WZ[wz]EV[wzed,wzen]|20
event.res.edit 1 YN L $(W1)WZ[wz]EV[wzed,wzen]|12
event.resched.reason 10 FREE L SCH.CAN.RSN $(W1)WZ[wz]EV[wzed,wzen]|15
event.sch.notes.edit 1 YN L $(W1)WZ[wz]EV[wzed,wzen]M|13
event.text 30 FREE L $(W1)WZ[wz]EV[wzed,wzen]|19
event.time 4 HHMM L $(W1)WZ[wz]EV[wzed,wzen]|1
event.type 8 CHOICE L $(W1)WZ[wz]EV[wzed,wzen]|0
event.user 10 FREE L MIS.USER $(W1)WZ[wz]EV[wzed,wzen]|2
Ì € i 2
event.old.ops
[urn,event.date,event.seq.no, event.op.urn]
$(W1)WZ[wz]EV[wzed,wzen]O[hshO2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
event.op.urn 2 PINT R hshO2
event.op 10 FREE L SCH.APPT.TYPE $(W1)WZ[wz]EV[wzed,wzen]O[hshO2]|0
event.op.desc 40 FREE L $(W1)WZ[wz]EV[wzed,wzen]O[hshO2]|5
event.op.duration 3 INT R $(W1)WZ[wz]EV[wzed,wzen]O[hshO2]|4
event.op.ps 1 FREE L $(W1)WZ[wz]EV[wzed,wzen]O[hshO2]|3
event.op.rt.lft 1 FREE L $(W1)WZ[wz]EV[wzed,wzen]O[hshO2]|2
event.op.severity 10 FREE L SCH.OP.SEVER $(W1)WZ[wz]EV[wzed,wzen]O[hshO2]|1
event.op.surgeon 10 FREE L MIS.DOC $(W1)WZ[wz]EV[wzed,wzen]O[hshO2]|8
event.op.surgeon.asst 10 FREE L MIS.DOC $(W1)WZ[wz]EV[wzed,wzen]O[hshO2]|11
Ì € i 2
events.old.rsrcs
[urn,event.date,event.seq.no, event.res.q]
$(W1)WZ[wz]EV[wzed,wzen]R[wzQO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
event.res.q 3 PINT R wzQO
event.res.duration 4 PINT R $(W1)WZ[wz]EV[wzed,wzen]R[wzQO]|3
event.res.inc.exc.res 7 CHOICE L $(W1)WZ[wz]EV[wzed,wzen]R[wzQO]|4
event.res.resrc 15 FREE L SCH.RESOURCE $(W1)WZ[wz]EV[wzed,wzen]R[wzQO]|1
event.res.rsrc.grp 10 FREE L SCH.RSRC.GRP $(W1)WZ[wz]EV[wzed,wzen]R[wzQO]|0
event.res.start 4 INT R $(W1)WZ[wz]EV[wzed,wzen]R[wzQO]|2
event.res.start.dat 8 DATE L $(W1)WZ[wz]EV[wzed,wzen]R[wzQO]|5
event.res.start.tim 4 HHMM L $(W1)WZ[wz]EV[wzed,wzen]R[wzQO]|6
Ì € i 2
or.comments
[urn, or.comment.line]
$(W1)WZ[wz]OR["CX",hshCl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
or.comment.line 3 URN L hshCl
or.comment 79 TEXT L $(W1)WZ[wz]OR["CX",hshCl]
Ì € i 2
or.ee.rooms.ie.room
[urn, ie.resource.or]
$(W1)WZ[wz]OR["E"]R[wre]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ie.resource.or 15 FREE L SCH.RESOURCE wre
ie.res.name.or 30 FREE L VAL=@SCH.RESOURCE.name[ie.resource.or]
Ì € i 2
or.ee.surgeons
[urn, or.ee.surg.q]
$(W1)WZ[wz]OR["ES",wzQS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
or.ee.surg.q 3 PINT R wzQS
or.ee.surg.duration 4 PINT R $(W1)WZ[wz]OR["ES",wzQS]|3
or.ee.surg.inc.exc.res 7 CHOICE L $(W1)WZ[wz]OR["ES",wzQS]|4
or.ee.surg.resrc 15 FREE L SCH.RESOURCE $(W1)WZ[wz]OR["ES",wzQS]|1
or.ee.surg.resrc.name 29 FREE L VAL=@SCH.RESOURCE.name[@or.ee.surg.resrc]
or.ee.surg.rsrc.grp 10 FREE L SCH.RSRC.GRP $(W1)WZ[wz]OR["ES",wzQS]|0
or.ee.surg.rsrc.grp.name 30 FREE L VAL=@SCH.RSRC.GRP.description[@or.ee.surg.rsrc.grp]
or.ee.surg.start 4 INT R $(W1)WZ[wz]OR["ES",wzQS]|2
or.ee.surg.start.dat 8 DATE L $(W1)WZ[wz]OR["ES",wzQS]|5
or.ee.surg.start.tim 4 HHMM L $(W1)WZ[wz]OR["ES",wzQS]|6
Ì € i 2
or.ops
[urn, or.op.urn]
$(W1)WZ[wz]OR["OP2",hsho2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
or.op.urn 2 URN L hsho2
or.op 10 FREE L SCH.APPT.TYPE $(W1)WZ[wz]OR["OP2",hsho2]|0
or.op.1 10 FREE L SCH.APPT.TYPE VAL=@or.op[1]
or.op.1.abbrev 30 FREE L VAL=IF{@or.op.desc[1]:30T;@SCH.APPT.TYPE.description[@
VAL=or.op[1]];@or.op[1]:30T}
or.op.1.duration 3 INT R VAL=@or.op.1.duration[1]
or.op.1.name 40 FREE L VAL=IF{@or.op.desc[1];@SCH.APPT.TYPE.or.name[@or.op[1]
VAL=];@or.op[1]}
or.op.1.ps 1 FREE L VAL=or.op.1.ps[1]
or.op.1.rt.lft 1 FREE L VAL=@or.op.rt.lft[1]
or.op.1.severity 10 FREE L SCH.OP.SEVER VAL=@or.op.severity[1]
or.op.1.surgeon 10 FREE L MIS.DOC VAL=@or.op.surgeon[1]
or.op.abbrev 30 FREE L VAL=IF{@or.op.desc:30T;@SCH.APPT.TYPE.description[@or.
VAL=op];@or.op:30T}
or.op.desc 40 FREE L $(W1)WZ[wz]OR["OP2",hsho2]|5
or.op.duration 3 INT R $(W1)WZ[wz]OR["OP2",hsho2]|4
or.op.name 40 FREE L VAL=IF{@or.op.desc^OD IF{@or.ops.desc[,,2] OD$38_"..";
VAL=OD}:0XS;@SCH.APPT.TYPE.or.name[@or.op];@or.op}
or.op.ps 1 FREE L $(W1)WZ[wz]OR["OP2",hsho2]|3
or.op.rt.lft 1 FREE L $(W1)WZ[wz]OR["OP2",hsho2]|2
or.op.rt.lft.out 5 FREE L VAL=IF{@or.op.rt.lft "RIGHT,LEFT,BILAT"#(L("RLB",@or.o
VAL=p.rt.lft)_",")}
or.op.severity 10 FREE L SCH.OP.SEVER $(W1)WZ[wz]OR["OP2",hsho2]|1
or.op.surgeon 10 FREE L MIS.DOC $(W1)WZ[wz]OR["OP2",hsho2]|8
or.op.surgeon.asst 10 FREE L MIS.DOC $(W1)WZ[wz]OR["OP2",hsho2]|11
Ì € i 2
or.ops.desc
[urn,or.op.urn, or.op.desc.q]
$(W1)WZ[wz]OR["OP2",hsho2]D[hsO2D]
Field Name Len Dat Typ J DPM Offset/Local/VAL
or.op.desc.q 2 INT R hsO2D
or.op.description 70 TEXT L $(W1)WZ[wz]OR["OP2",hsho2]D[hsO2D]
Ì € i 2
resources
[urn, resource,res.start.date,res.start.time]
$(W1)WZ[wz]R[wre,wzRD,wzRT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
resource 15 FREE L SCH.RESOURCE wre
res.start.date 8 DATE L wzRD
res.start.time 4 HHMM L wzRT
res.access.ok 1 YN L VAL=%SCH.ACCESS.check.M.resource(resource,@.user)
res.date.time 15 FREE L VAL=@res.start.date_._@res.start.time
res.duration 4 PINT R $(W1)WZ[wz]R[wre,wzRD,wzRT]|0
res.ee.q 3 PINT R $(W1)WZ[wz]R[wre,wzRD,wzRT]|3
res.location 10 FREE L MIS.LOCN VAL=IF{@SCH.RESOURCE.group.locn[resource,@res.rsrc.grp
VAL=];@SCH.RSRC.GRP.department[@res.rsrc.grp]}
res.phone 18 PHONE L VAL=IF{@SCH.RESOURCE.group.phone[resource,@res.rsrc.gr
VAL=p];@SCH.RSRC.GRP.phone[@res.rsrc.grp]}
res.phys.practice 10 FREE L MIS.DOC.GRP VAL=@SCH.RSRC.GRP.phys.practice[@res.rsrc.grp]
res.rsrc.grp 10 FREE L SCH.RSRC.GRP $(W1)WZ[wz]R[wre,wzRD,wzRT]|1
res.rsrc.grp.dept 10 FREE L MIS.LOCN VAL=@SCH.RSRC.GRP.department[@res.rsrc.grp]
res.start 4 INT R $(W1)WZ[wz]R[wre,wzRD,wzRT]|2
Ì i 2
oe.interface.queue
[oe.fac,oe.seconds,oe.urn,oe.appt.urn.q,oe.seq.no.q]
*(W1)WZOE[gqb,wzs,po,wz,oeq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
oe.fac 10 FREE L MIS.FACILITY gqb
oe.seconds 14 FREE L wzs
oe.urn 10 URN L OE.ORD po
oe.appt.urn.q 10 FREE L SCH.APPT wz
oe.seq.no.q 4 FREE L oeq
appt.date.q 8 DATE L *(W1)WZOE[gqb,wzs,po,wz,oeq]|1
appt.time.q 4 TIME L *(W1)WZOE[gqb,wzs,po,wz,oeq]|2
device 15 FREE L *(W1)WZOE[gqb,wzs,po,wz,oeq]|4
oe.q.status 6 FREE L *(W1)WZOE[gqb,wzs,po,wz,oeq]|0
sch.user 10 FREE L MIS.USER *(W1)WZOE[gqb,wzs,po,wz,oeq]|3
Ì i 2
or.reorder.list
[or.reorder.seq.no]
/WZORRL[wzorR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
or.reorder.seq.no 3 PINT R wzorR
or.reorder.acct 30 URN L ADM.PAT /WZORRL[wzorR]|7
or.reorder.acct.name 30 FREE L /WZORRL[wzorR]|9
or.reorder.acct.name13 13 FREE L VAL=@or.reorder.acct.name$13
or.reorder.age 7 AGE R /WZORRL[wzorR]|10
or.reorder.cleanup.time 3 PINT R /WZORRL[wzorR]|17
or.reorder.date 8 DATE L /WZORRL[wzorR]|1
or.reorder.duration 4 PINT R /WZORRL[wzorR]|3
or.reorder.from.room 15 FREE L SCH.RESOURCE /WZORRL[wzorR]|11
or.reorder.move 4 FREE L /WZORRL[wzorR]|5
or.reorder.no.change 1 FREE L /WZORRL[wzorR]|15
or.reorder.rlb 1 FREE L /WZORRL[wzorR]|13
or.reorder.rlb2 1 FREE L /WZORRL[wzorR]|14
or.reorder.sec.proc 40 FREE L /WZORRL[wzorR]|12
or.reorder.setup.time 3 PINT R /WZORRL[wzorR]|16
or.reorder.start.interval 4 INT R /WZORRL[wzorR]|4
or.reorder.start.time 4 HHMM L /WZORRL[wzorR]|2
or.reorder.stop.time 4 FREE L VAL=%Z.time.add(f.date,@or.reorder.start.time,@or.reor
VAL=der.duration)#1P
or.reorder.surgeon 10 FREE L MIS.DOC /WZORRL[wzorR]|8
or.reorder.type 40 FREE L /WZORRL[wzorR]|6
or.reorder.type21 21 FREE L VAL=@or.reorder.type$21
or.reorder.urn 10 FREE L SCH.APPT /WZORRL[wzorR]|0
Ì i 2
provider.appts
[pa.provider,pa.date,pa.urn]
*(W)WZDR[ggg,wzdrD,wz]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pa.provider 10 FREE L MIS.DOC ggg
pa.date 8 DATE L wzdrD
pa.urn 10 FREE L SCH.APPT wz
pa.adm.status 3 CHOICE L *(W)WZDR[ggg,wzdrD,wz]|16
pa.adm.type 3 FREE L *(W)WZDR[ggg,wzdrD,wz]|1
pa.bed 3 FREE L *(W)WZDR[ggg,wzdrD,wz]|14
pa.duration 4 PINT R *(W)WZDR[ggg,wzdrD,wz]|4
pa.ear.enc.number 12 FREE L *(W)WZDR[ggg,wzdrD,wz]|10
pa.facility 10 FREE L MIS.FACILITY *(W)WZDR[ggg,wzdrD,wz]|12
pa.location 10 FREE L MIS.LOCN *(W)WZDR[ggg,wzdrD,wz]|6
pa.mri.urn 25 URN L MRI.PAT *(W)WZDR[ggg,wzdrD,wz]|0
pa.name 30 FREE L *(W)WZDR[ggg,wzdrD,wz]|11
pa.obs 1 YN L *(W)WZDR[ggg,wzdrD,wz]|9
pa.or.urn 10 URN L SCH.PAT *(W)WZDR[ggg,wzdrD,wz]|8
pa.patient 30 URN L ADM.PAT *(W)WZDR[ggg,wzdrD,wz]|15
pa.ppr.practice 10 FREE L SCH.PRACTICE *(W)WZDR[ggg,wzdrD,wz]|17
pa.reservation 10 FREE L SCH.RESERVE *(W)WZDR[ggg,wzdrD,wz]|7
pa.rfv 50 FREE L *(W)WZDR[ggg,wzdrD,wz]|5
pa.room 10 FREE L MIS.ROOM *(W)WZDR[ggg,wzdrD,wz]|13
pa.seconds 10 PINT R
pa.status 9 CHOICE L *(W)WZDR[ggg,wzdrD,wz]|2
pa.time 4 HHMM5 L *(W)WZDR[ggg,wzdrD,wz]|3
Ì i 2
pt.appt.by.dept.log
[pt.appt.dept.file.time,pt.appt.dept.pt,pt.appt.dept.urn]
*(W)WZDP[wzDP,ea,wz]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pt.appt.dept.file.time 10 PINT R wzDP
pt.appt.dept.pt 25 URN L MRI.PAT ea
pt.appt.dept.urn 10 FREE L SCH.APPT wz
pt.appt.dept.appt.type 10 FREE L SCH.APPT.TYPE *(W)WZDP[wzDP,ea,wz]|3
pt.appt.dept.date 8 DATE L *(W)WZDP[wzDP,ea,wz]|0
pt.appt.dept.status 10 CHOICE L *(W)WZDP[wzDP,ea,wz]|2
pt.appt.dept.time 4 HHMM L *(W)WZDP[wzDP,ea,wz]|1
Ì € i 2
pt.appt.by.dept.depts
[pt.appt.dept.file.time,pt.appt.dept.pt,pt.appt.dept.urn, pt.appt.dept]
*(W)WZDP[wzDP,ea,wz]D[ggn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pt.appt.dept 10 FREE L MIS.LOCN ggn
Ì i 2
resource.time.slots
[ts.appt,ts.resource,ts.date,ts.time]
*(W)WZZ[wz,wre,wzD,wzT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ts.appt 10 FREE L SCH.APPT wz
ts.resource 15 FREE L SCH.RESOURCE wre
ts.date 8 DATE L wzD
ts.time 4 HHMM5 L wzT
ts.device 10 FREE L UNV.DEVICE *(W)WZZ[wz,wre,wzD,wzT]|3
ts.duration 4 PINT R *(W)WZZ[wz,wre,wzD,wzT]|0
ts.dx.address 40 FREE L *(W)WZZ[wz,wre,wzD,wzT]|6
ts.job 30 FREE L *(W)WZZ[wz,wre,wzD,wzT]|4
ts.job.urn 30 FREE L *(W)WZZ[wz,wre,wzD,wzT]|5
ts.resource.group 10 FREE L SCH.RSRC.GRP *(W)WZZ[wz,wre,wzD,wzT]|1
ts.set.date 8 DATE L *(W)WZZ[wz,wre,wzD,wzT]|7
ts.set.time 20 STIME L *(W)WZZ[wz,wre,wzD,wzT]|8
ts.user 10 FREE L MIS.USER *(W)WZZ[wz,wre,wzD,wzT]|2
Ì i 2
schedule.alerts.top
[alert.mri.urn]
*(W)WZAL[ea]
Field Name Len Dat Typ J DPM Offset/Local/VAL
alert.mri.urn 25 URN L MRI.PAT ea
Ì € i 2
schedule.alerts
[alert.mri.urn, sched.alert.line]
*(W)WZAL[ea]SA[wzsaL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
sched.alert.line 3 PINT R wzsaL
sched.alert.text 79 TEXT L *(W)WZAL[ea]SA[wzsaL]
Ì i 2
set.pt.instructions
[spi.q]
/WZSP[wzsp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
spi.q 3 PINT R wzsp
spi.text 79 TEXT L /WZSP[wzsp]
Ì i 2
temp.lnk
[temp.lnk.q]
/WZLNK[wzLNK]
Field Name Len Dat Typ J DPM Offset/Local/VAL
temp.lnk.q 3 PINT R wzLNK
temp.lnk.appt 10 FREE L SCH.APPT /WZLNK[wzLNK]|2
temp.lnk.patient 30 FREE L /WZLNK[wzLNK]|1
temp.lnk.type 10 FREE L SCH.APPT.TYPE /WZLNK[wzLNK]|0
temp.lnk.type.name 30 FREE L VAL=@SCH.APPT.TYPE.description[@temp.lnk.type]
Ì i 2
temp.pt.appts.view
[temp.pt.appt.seq]
/WZTT["PT",wzttP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
temp.pt.appt.seq 3 PINT R wzttP
temp.pt.appt.account 10 FREE L /WZTT["PT",wzttP]|9
temp.pt.appt.date 8 DATE L /WZTT["PT",wzttP]|0
temp.pt.appt.desc 30 FREE L /WZTT["PT",wzttP]|7
temp.pt.appt.description 30 FREE L VAL=IF{@SCH.APPT.temp.pt.appt.desc;@SCH.APPT.TYPE.or.n
VAL=ame[@SCH.APPT.temp.pt.appt.type^t];@SCH.APPT.TYPE.
VAL=description[t];t}
temp.pt.appt.dur 4 PINT R /WZTT["PT",wzttP]|5
temp.pt.appt.fac 10 FREE L MIS.FACILITY /WZTT["PT",wzttP]|4
temp.pt.appt.location 10 FREE L MIS.LOCN /WZTT["PT",wzttP]|8
temp.pt.appt.locn.name 30 FREE L VAL=@MIS.LOCN.name[@SCH.APPT.temp.pt.appt.location]
temp.pt.appt.status 1 FREE L /WZTT["PT",wzttP]|6
temp.pt.appt.status.print 9 FREE L VAL=IF{L("ABCNP",@SCH.APPT.temp.pt.appt.status)^l'=5 "
VAL=ATTENDED,BOOKED,CANCELLED,NO SHOW,PENDING"#(l_",")
VAL=;@SCH.APPT.temp.pt.appt.status}
temp.pt.appt.time 4 HHMM5 L /WZTT["PT",wzttP]|1
temp.pt.appt.type 10 FREE L SCH.APPT.TYPE /WZTT["PT",wzttP]|3
temp.pt.appt.urn 10 FREE L SCH.APPT /WZTT["PT",wzttP]|2
Ì i 2
xfer.repeat
[xfer.rep.seq.no,xfer.rep.type,xfer.rep.patient]
*(W)WZXQR[wzxs,wzxch,aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
xfer.rep.seq.no 10 PINT R wzxs
xfer.rep.type 10 CHOICE L wzxch
xfer.rep.patient 30 URN L ADM.PAT aa
xfer.rep.subs 30 FREE L *(W)WZXQR[wzxs,wzxch,aa]
Index Files Subscripts/Physical Base
activity.x [event.date,urn]
?(W)WZA[wzed,wz]
appt.lett.x [appt.sk,program,date.sk,pt.sort.sk]
?(W)WZLX[wz,wp,wzDsk,ptsk]
appt.mess.x [appt.sk,date.sk,appt.group.sk,appt.type.sk,type.event.sk,type.status.sk,message
?(W)WZMX[wz,wzDsk,wac,wat,wacTE,wacTS,wclM]
auto.attend.failed.x [date,urn]
?(W)WZAF[wzD,wz]
booked.pgm.x [booked.pgm,bp.date,bp.time,bp.urn] = booked.pgm.urn
?(W)WZPX[wtg,wzPD,wzPT,wz]
booked.set.x [mri.urn,bs.date,bs.time,bs.urn] = booked.set.urn
?(W)WZBX[ea,wzbD,wzbT,wz]
date.time.x [date,time,facility,urn]
?(W)WZD[wzD,wzT,gqb,wz]
last.booked [rsrc.grp] = resource
?(W)WZLB[wrg]
letter.x [program,date.sk,pt.sort.sk,appt.sk]
?(W)WZLT[wp,wzDsk,ptsk,wz]
message.x [date.sk,appt.group.sk,appt.type.sk,type.event.sk,type.status.sk,message.q.sk,ap
?(W)WZMS[wzDsk,wac,wat,wacTE,wacTS,wclM,wz]
mri.type.x [mri.urn,type,date,time,facility,urn]
?(W)WZTU[ea,wat,wzD,wzT,gqb,wz]
mri.x [mri.urn,date,time,facility,urn]
?(W)WZM[ea,wzD,wzT,gqb,wz]
oe.fail [date.sk,free.txt.sk,sys.time,urn] = @.user
*(W1)WZOF[wzDsk,tXTsk,wzTsk,wz]
patient.x [patient,date,time,facility,urn]
?(W)WZP[aa,wzD,wzT,gqb,wz]
pend.dep.x [location,pend.priority,urn]
?(W)WZPD[ggn,wzPP,wz]
pend.group.x [rsrc.grp,pend.priority,urn]
?(W)WZPG[wrg,wzPP,wz]
pend.pat.x [patient,pend.priority,urn]
?(W)WZPF[aa,wzPP,wz]
pending.x [mri.urn,pend.priority,urn]
?(W)WZPE[ea,wzPP,wz]
print.msg.x [sys.time,appt.sk,letter,printer.sk]
?(W)WZPM[wzTsk,wz,wcl,hup]
program.x [bp.urn]
?(W)WZBP[wz]
provider.appts.updated [pa.provider,pa.date] = pa.seconds
?(W)WZDRX[ggg,wzdrD]
pt.type.x [patient,type,date,time,facility,urn]
?(W)WZTP[aa,wat,wzD,wzT,gqb,wz]
res.type.x [type,date,time,facility,urn]
?(W)WZTR[wat,wzD,wzT,gqb,wz]
reservation.x [reservation,date,time,facility,urn]
?(W)WZV[wrv,wzD,wzT,gqb,wz]
resource.x [resource,type,res.start.date,res.start.time,facility,urn] = res.duration
?(W)WZR[wre,wat,wzRD,wzRT,gqb,wz]
rsrc.grp.x [res.rsrc.grp,resource,res.start.date,urn]
?(W)WZRG[wrg,wre,wzRD,wz]
status.x [status,urn]
?(W)WZS[wzS,wz]
type.x [type,date,time,facility,urn]
?(W)WZT[wat,wzD,wzT,gqb,wz]
urn.x [urn]
?(W)WURNX[wz]
|
|
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | |