Ì i 2
sch.rsrc.grp (main)
[mnemonic]
&WRG[wrg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 10 FREE L wrg
active 1 YN L &WRG[wrg]|0
cd.screen 15 FREE L MIS.SCREEN &WRG[wrg]|2
department 10 FREE L MIS.LOCN.DICT &WRG[wrg]|3
department.name 30 FREE L VAL=@MIS.LOCN.DICT.name[@department]
dept.access.ok 1 YN L VAL=%SCH.ACCESS.check.M.dept(SCH.RSRC.GRP.department,@
VAL=.user)
description 30 FREE L &WRG[wrg]|1
facility 10 FREE L MIS.FACILITY VAL=+@MIS.LOCN.DICT.facilities[@department,""]
facility.name 30 FREE L VAL=@MIS.FACILITY.name[+@MIS.LOCN.DICT.facilities[@dep
VAL=artment,""]]
group.book.interval 2 CHOICE L &WRG[wrg]|9
last.update 10 PINT R &WRG[wrg]UPD
or.pha.site 10 FREE L PHA.SITE &WRG[wrg]OR|1
or.type 1 YN L &WRG[wrg]OR|0
phone 18 PHONE L &WRG[wrg]|4
phone.out 18 PHONE L VAL=IF{@phone;@MIS.LOCN.DICT.phone.number[@department]
VAL=}
phys.practice 10 FREE L MIS.DOC.GRP &WRG[wrg]|5
prac.access.ok 1 YN L VAL=%SCH.ACCESS.check.M.practice(SCH.RSRC.GRP.phys.pra
VAL=ctice,@.user)
prompt.adm.forms 1 YN L &WRG[wrg]|7
pt.appts.ok 1 YN L &WRG[wrg]|6
rsrc.grp.access.ok 1 YN L VAL=%SCH.ACCESS.check.M.rsrc.grp(SCH.RSRC.GRP.mnemonic
VAL=,@.user)
wl.process.cds 15 FREE L MIS.SCREEN &WRG[wrg]|8
Ì € i 2
sch.rsrc.grp.ee.priorities (ee.priorities)
[mnemonic, ee.priority.q]
&WRG[wrg]R[wrgR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ee.priority.q 4 FREE L wrgR
ee.priority 4 PINT R &WRG[wrg]R[wrgR]|1
ee.priority.rsrc 15 FREE L SCH.RESOURCE &WRG[wrg]R[wrgR]|0
Ì € i 2
sch.rsrc.grp.group.formats (group.formats)
[mnemonic, group.fmt.seq.no]
&WRG[wrg]G[wrgG]
Field Name Len Dat Typ J DPM Offset/Local/VAL
group.fmt.seq.no 2 PINT R wrgG
group.format 15 FREE L SCH.PROGRAM &WRG[wrg]G[wrgG]|0
group.format.desc 35 FREE L VAL=@SCH.PROGRAM.description[@group.format]
Ì € i 2
sch.rsrc.grp.sched.formats (schedule.formats)
[mnemonic, schedule.format.seq.no]
&WRG[wrg]S[wrgSI]
Field Name Len Dat Typ J DPM Offset/Local/VAL
schedule.format.seq.no 2 PINT R wrgSI
schedule.format 15 FREE L SCH.PROGRAM &WRG[wrg]S[wrgSI]|0
schedule.format.desc 35 FREE L VAL=@SCH.PROGRAM.description[@schedule.format]
Ì € i 2
sch.rsrc.grp.wl.queries (wl.process.cds.queries)
[mnemonic, wl.proc.cds.query]
&WRG[wrg]Q[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
wl.proc.cds.query 10 FREE L MIS.QUERY ggv
wl.proc.cds.query.func 10 FREE L SCH.AFUNC &WRG[wrg]Q[ggv]|0
wl.proc.cds.query.ret.act 11 CHOICE L &WRG[wrg]Q[ggv]|1
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
sch.resource.group.dept.x [department,mnemonic]
dept.x &WRGD[ggn,wrg]
Index [description,mnemonic]
id.x &WRGI[wrgD,wrg]
sch.rsrc.grp.practice.x [phys.practice,mnemonic]
practice.x &WRGP[ggh,wrg]
|
|
| | | |