sHelp
                                     ADM.STATS
     i   2
   adm.stats.accommodation
     adm.stats.outpt.accommodation
   adm.stats.admit.doctor
   adm.stats.attend.doctor
   adm.stats.financial.class
   adm.stats.hospital
   adm.stats.in.location
     adm.stats.in.location.outpts
   adm.stats.observ.patients
   adm.stats.out.location
   adm.stats.out.registrations
   adm.stats.patient.origin
   adm.stats.prim.care.doctor
   adm.stats.rm.rate.accom
     adm.stats.outpt.rm.rate.accom
   adm.stats.service
     adm.stats.outpt.service
   zcus.closed.beds
   zcus.service
   zcus.service.admit.source
   zcus.svc.discharge.disposition
   zcus.ward.activity.by.svc.con

 Ì     i   2
adm.stats.accommodation    (accommodation) 
[ac.facility,accom,ac.date]
:ASA[gqb,ggb,adt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ac.facility                 10 FREE     L  MIS.FACILITY   gqb                                                     
 accom                       10 FREE     L  MIS.ACCOM.DICT ggb                                                     
 ac.date                      8 DATE     L                 adt                                                         
 ac.admissions                4 INT      R                 :ASA[gqb,ggb,adt]|0                                         
 ac.admissions.fix            4 INT      R                 :ASA[gqb,ggb,adt]|4                                         
 ac.discharges                4 INT      R                 :ASA[gqb,ggb,adt]|1                                         
 ac.discharges.fix            4 INT      R                 :ASA[gqb,ggb,adt]|5                                         
 ac.expirations               4 INT      R                 :ASA[gqb,ggb,adt]|2                                         
 ac.expirations.fix           4 INT      R                 :ASA[gqb,ggb,adt]|6                                         
 ac.obsv.admissions           4 INT      R                 :ASA[gqb,ggb,adt]|8                                         
 ac.obsv.admissions.fix       4 INT      R                 :ASA[gqb,ggb,adt]|12                                        
 ac.obsv.discharges           4 INT      R                 :ASA[gqb,ggb,adt]|9                                         
 ac.obsv.discharges.fix       4 INT      R                 :ASA[gqb,ggb,adt]|13                                        
 ac.obsv.expirations          4 INT      R                 :ASA[gqb,ggb,adt]|10                                        
 ac.obsv.expirations.fix      4 INT      R                 :ASA[gqb,ggb,adt]|14                                        
 ac.obsv.patient.days         4 INT      R                 :ASA[gqb,ggb,adt]|11                                        
 ac.obsv.patient.days.fix     4 INT      R                 :ASA[gqb,ggb,adt]|15                                        
 ac.patient.days              4 INT      R                 :ASA[gqb,ggb,adt]|3                                         
 ac.patient.days.fix          4 INT      R                 :ASA[gqb,ggb,adt]|7                                         
 Ì      i   2
adm.stats.outpt.accommodation    (accommodation.out) 
[ac.facility,accom,ac.date, ac.outpt.status]
:ASA[gqb,ggb,adt]O[ast]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ac.outpt.status              3 CHOICE   L                 ast                                                         
 ac.outpt.bed.days            4 INT      R                 :ASA[gqb,ggb,adt]O[ast]|0                                   
 ac.outpt.bed.days.fix        4 INT      R                 :ASA[gqb,ggb,adt]O[ast]|1                                   
 Ì     i   2
adm.stats.admit.doctor    (admit.doctor) 
[adm.doc.facility,adm.doctor,adm.doc.date]
:ASD[gqb,ggg,adt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 adm.doc.facility            10 FREE     L  MIS.FACILITY   gqb                                                     
 adm.doctor                  10 FREE     L  MIS.DOC.DICT   ggg                                                     
 adm.doc.date                 8 DATE     L                 adt                                                         
 adm.doc.admissions           4 INT      R                 :ASD[gqb,ggg,adt]|0                                         
 adm.doc.admissions.fix       4 INT      R                 :ASD[gqb,ggg,adt]|4                                         
 adm.doc.discharges           4 INT      R                 :ASD[gqb,ggg,adt]|1                                         
 adm.doc.discharges.fix       4 INT      R                 :ASD[gqb,ggg,adt]|5                                         
 adm.doc.expirations          4 INT      R                 :ASD[gqb,ggg,adt]|2                                         
 adm.doc.expirations.fix      4 INT      R                 :ASD[gqb,ggg,adt]|6                                         
 adm.doc.obsv.admissions      4 INT      R                 :ASD[gqb,ggg,adt]|8                                         
 adm.doc.obsv.admits.fix      4 INT      R                 :ASD[gqb,ggg,adt]|12                                        
 adm.doc.obsv.discharges      4 INT      R                 :ASD[gqb,ggg,adt]|9                                         
 adm.doc.obsv.dischgs.fix     4 INT      R                 :ASD[gqb,ggg,adt]|13                                        
 adm.doc.obsv.expirations     4 INT      R                 :ASD[gqb,ggg,adt]|10                                        
 adm.doc.obsv.expires.fix     4 INT      R                 :ASD[gqb,ggg,adt]|14                                        
 adm.doc.obsv.pat.days.fix    4 INT      R                 :ASD[gqb,ggg,adt]|15                                        
 adm.doc.obsv.patient.days    4 INT      R                 :ASD[gqb,ggg,adt]|11                                        
 adm.doc.patient.days         4 INT      R                 :ASD[gqb,ggg,adt]|3                                         
 adm.doc.patient.days.fix     4 INT      R                 :ASD[gqb,ggg,adt]|7                                         
 Ì     i   2
adm.stats.attend.doctor    (attend.doctor) 
[att.doc.facility,att.doc,att.doc.date]
:AST[gqb,ggg,adt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 att.doc.facility            10 FREE     L  MIS.FACILITY   gqb                                                     
 att.doc                     10 FREE     L  MIS.DOC.DICT   ggg                                                     
 att.doc.date                 8 DATE     L                 adt                                                         
 att.doc.admissions           4 INT      R                 :AST[gqb,ggg,adt]|0                                         
 att.doc.admissions.fix       4 INT      R                 :AST[gqb,ggg,adt]|4                                         
 att.doc.discharges           4 INT      R                 :AST[gqb,ggg,adt]|1                                         
 att.doc.discharges.fix       4 INT      R                 :AST[gqb,ggg,adt]|5                                         
 att.doc.expirations          4 INT      R                 :AST[gqb,ggg,adt]|2                                         
 att.doc.expirations.fix      4 INT      R                 :AST[gqb,ggg,adt]|6                                         
 att.doc.obsv.admissions      4 INT      R                 :AST[gqb,ggg,adt]|8                                         
 att.doc.obsv.admits.fix      4 INT      R                 :AST[gqb,ggg,adt]|12                                        
 att.doc.obsv.discharges      4 INT      R                 :AST[gqb,ggg,adt]|9                                         
 att.doc.obsv.dischgs.fix     4 INT      R                 :AST[gqb,ggg,adt]|13                                        
 att.doc.obsv.expirations     4 INT      R                 :AST[gqb,ggg,adt]|10                                        
 att.doc.obsv.expires.fix     4 INT      R                 :AST[gqb,ggg,adt]|14                                        
 att.doc.obsv.pat.days.fix    4 INT      R                 :AST[gqb,ggg,adt]|15                                        
 att.doc.obsv.patient.days    4 INT      R                 :AST[gqb,ggg,adt]|11                                        
 att.doc.patient.days         4 INT      R                 :AST[gqb,ggg,adt]|3                                         
 att.doc.patient.days.fix     4 INT      R                 :AST[gqb,ggg,adt]|7                                         
 Ì     i   2
adm.stats.financial.class    (financial.class) 
[fc.facility,fin.class,fc.date]
:ASF[gqb,ggk,adt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 fc.facility                 10 FREE     L  MIS.FACILITY   gqb                                                     
 fin.class                   10 FREE     L  MIS.FIN.CLASS  ggk                                                     
 fc.date                      8 DATE     L                 adt                                                         
 fc.admissions                4 INT      R                 :ASF[gqb,ggk,adt]|0                                         
 fc.admissions.fix            4 INT      R                 :ASF[gqb,ggk,adt]|4                                         
 fc.discharges                4 INT      R                 :ASF[gqb,ggk,adt]|1                                         
 fc.discharges.fix            4 INT      R                 :ASF[gqb,ggk,adt]|5                                         
 fc.expirations               4 INT      R                 :ASF[gqb,ggk,adt]|2                                         
 fc.expirations.fix           4 INT      R                 :ASF[gqb,ggk,adt]|6                                         
 fc.obsv.admissions           4 INT      R                 :ASF[gqb,ggk,adt]|8                                         
 fc.obsv.admissions.fix       4 INT      R                 :ASF[gqb,ggk,adt]|12                                        
 fc.obsv.discharges           4 INT      R                 :ASF[gqb,ggk,adt]|9                                         
 fc.obsv.discharges.fix       4 INT      R                 :ASF[gqb,ggk,adt]|13                                        
 fc.obsv.expirations          4 INT      R                 :ASF[gqb,ggk,adt]|10                                        
 fc.obsv.expirations.fix      4 INT      R                 :ASF[gqb,ggk,adt]|14                                        
 fc.obsv.patient.days         4 INT      R                 :ASF[gqb,ggk,adt]|11                                        
 fc.obsv.patient.days.fix     4 INT      R                 :ASF[gqb,ggk,adt]|15                                        
 fc.patient.days              4 INT      R                 :ASF[gqb,ggk,adt]|3                                         
 fc.patient.days.fix          4 INT      R                 :ASF[gqb,ggk,adt]|7                                         
 Ì     i   2
adm.stats.hospital    (hospital) 
[hosp.facility,hosp.date]
:ASH[gqb,adt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 hosp.facility               10 FREE     L  MIS.FACILITY   gqb                                                     
 hosp.date                    8 DATE     L                 adt                                                         
 hosp.length.of.stay          5 INT      R                 :ASH[gqb,adt]|0                                             
 hosp.length.of.stay.fix      5 INT      R                 :ASH[gqb,adt]|2                                             
 hosp.los.count               5 INT      R                 :ASH[gqb,adt]|1                                             
 hosp.los.count.fix           5 INT      R                 :ASH[gqb,adt]|3                                             
 Ì     i   2
adm.stats.in.location    (loc) 
[loc.facility,location,loc.date]
:ASL[gqb,ggn,adt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 loc.facility                10 FREE     L  MIS.FACILITY   gqb                                                     
 location                    10 FREE     L  MIS.LOCN.DICT  ggn                                                     
 loc.date                     8 DATE     L                 adt                                                         
 loc.admissions               4 INT      R                 :ASL[gqb,ggn,adt]|0                                         
 loc.admissions.fix           4 INT      R                 :ASL[gqb,ggn,adt]|11                                        
 loc.beds                     4 INT      R                 :ASL[gqb,ggn,adt]|7                                         
 loc.beds.fix                 4 INT      R                 :ASL[gqb,ggn,adt]|18                                        
 loc.discharges               4 INT      R                 :ASL[gqb,ggn,adt]|3                                         
 loc.discharges.fix           4 INT      R                 :ASL[gqb,ggn,adt]|14                                        
 loc.expirations              4 INT      R                 :ASL[gqb,ggn,adt]|5                                         
 loc.expirations.fix          4 INT      R                 :ASL[gqb,ggn,adt]|16                                        
 loc.length.of.stay           4 INT      R                 :ASL[gqb,ggn,adt]|9                                         
 loc.length.of.stay.fix       4 INT      R                 :ASL[gqb,ggn,adt]|20                                        
 loc.los.count                4 INT      R                 :ASL[gqb,ggn,adt]|10                                        
 loc.los.count.fix            4 INT      R                 :ASL[gqb,ggn,adt]|21                                        
 loc.obsv.admissions          4 INT      R                 :ASL[gqb,ggn,adt]|22                                        
 loc.obsv.admissions.fix      4 INT      R                 :ASL[gqb,ggn,adt]|31                                        
 loc.obsv.discharges          4 INT      R                 :ASL[gqb,ggn,adt]|25                                        
 loc.obsv.discharges.fix      4 INT      R                 :ASL[gqb,ggn,adt]|34                                        
 loc.obsv.expirations         4 INT      R                 :ASL[gqb,ggn,adt]|27                                        
 loc.obsv.expirations.fix     4 INT      R                 :ASL[gqb,ggn,adt]|36                                        
 loc.obsv.len.of.stay.fix     4 INT      R                 :ASL[gqb,ggn,adt]|38                                        
 loc.obsv.length.of.stay      4 INT      R                 :ASL[gqb,ggn,adt]|29                                        
 loc.obsv.los.count           4 INT      R                 :ASL[gqb,ggn,adt]|30                                        
 loc.obsv.los.count.fix       4 INT      R                 :ASL[gqb,ggn,adt]|39                                        
 loc.obsv.one.day.stays       4 INT      R                 :ASL[gqb,ggn,adt]|26                                        
 loc.obsv.oneday.stays.fix    4 INT      R                 :ASL[gqb,ggn,adt]|35                                        
 loc.obsv.patient.days        4 INT      R                 :ASL[gqb,ggn,adt]|28                                        
 loc.obsv.patient.days.fix    4 INT      R                 :ASL[gqb,ggn,adt]|37                                        
 loc.obsv.transfer.ins        4 INT      R                 :ASL[gqb,ggn,adt]|23                                        
 loc.obsv.transfer.outs       4 INT      R                 :ASL[gqb,ggn,adt]|24                                        
 loc.obsv.xfer.ins.fix        4 INT      R                 :ASL[gqb,ggn,adt]|32                                        
 loc.obsv.xfer.outs.fix       4 INT      R                 :ASL[gqb,ggn,adt]|33                                        
 loc.one.day.stays            4 INT      R                 :ASL[gqb,ggn,adt]|4                                         
 loc.one.day.stays.fix        4 INT      R                 :ASL[gqb,ggn,adt]|15                                        
 loc.overflow.beds            4 INT      R                 :ASL[gqb,ggn,adt]|8                                         
 loc.overflow.beds.fix        4 INT      R                 :ASL[gqb,ggn,adt]|19                                        
 loc.patient.days             4 INT      R                 :ASL[gqb,ggn,adt]|6                                         
 loc.patient.days.fix         4 INT      R                 :ASL[gqb,ggn,adt]|17                                        
 loc.transfer.ins             4 INT      R                 :ASL[gqb,ggn,adt]|1                                         
 loc.transfer.ins.fix         4 INT      R                 :ASL[gqb,ggn,adt]|12                                        
 loc.transfer.outs            4 INT      R                 :ASL[gqb,ggn,adt]|2                                         
 loc.transfer.outs.fix        4 INT      R                 :ASL[gqb,ggn,adt]|13                                        
 location.stats.section       1 CHOICE   L                 VAL=IF{@MIS.LOCN.DICT.stats.section;10}                     
 location.type                1 CHOICE   L                 VAL=@MIS.LOCN.DICT.type                                     
 zcus.loc.closed              4 INT      R                 :ASL[gqb,ggn,adt]ZCUS|1                                     
 zcus.loc.closed.overflow     4 INT      R                 :ASL[gqb,ggn,adt]ZCUS|2                                     
 zcus.loc.dc                  4 FREE     L                 :ASL[gqb,ggn,adt]ZCUS|0                                     
 Ì      i   2
adm.stats.in.location.outpts    (loc.out) 
[loc.facility,location,loc.date, loc.outpt.status]
:ASL[gqb,ggn,adt]O[ast]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 loc.outpt.status             4 CHOICE   L                 ast                                                         
 loc.outpt.bed.days           4 INT      R                 :ASL[gqb,ggn,adt]O[ast]|0                                   
 loc.outpt.bed.days.fix       4 INT      R                 :ASL[gqb,ggn,adt]O[ast]|1                                   
 Ì     i   2
adm.stats.observ.patients    (observation.patient) 
[obsv.facility,obsv.date]
:ASOB[gqb,adt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 obsv.facility               10 FREE     L  MIS.FACILITY   gqb                                                     
 obsv.date                    8 DATE     L                 adt                                                         
 obsv.count                   4 INT      R                 :ASOB[gqb,adt]|0                                            
 obsv.count.fix               4 INT      R                 :ASOB[gqb,adt]|1                                            
 Ì     i   2
adm.stats.out.location    (out.loc) 
[out.loc.facility,out.loc.loc,out.loc.date,out.loc.status]
:ASO[gqb,ggn,adt,ast]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 out.loc.facility            10 FREE     L  MIS.FACILITY   gqb                                                     
 out.loc.loc                 10 FREE     L  MIS.LOCN.DICT  ggn                                                     
 out.loc.date                 8 DATE     L                 adt                                                         
 out.loc.status               3 CHOICE   L                 ast                                                         
 out.loc.bed.days             5 INT      R                 :ASO[gqb,ggn,adt,ast]|2                                     
 out.loc.bed.days.fix         5 INT      R                 :ASO[gqb,ggn,adt,ast]|3                                     
 out.loc.beds                 5 INT      R                 :ASO[gqb,ggn,adt,ast]|4                                     
 out.loc.beds.fix             5 INT      R                 :ASO[gqb,ggn,adt,ast]|5                                     
 out.loc.count                5 INT      R                 :ASO[gqb,ggn,adt,ast]|0                                     
 out.loc.count.fix            5 INT      R                 :ASO[gqb,ggn,adt,ast]|1                                     
 out.loc.overflow.beds        5 INT      R                 :ASO[gqb,ggn,adt,ast]|6                                     
 out.loc.overflow.beds.fix    5 INT      R                 :ASO[gqb,ggn,adt,ast]|7                                     
 Ì     i   2
adm.stats.out.registrations    (out.registrations) 
[out.loc.rfacility,out.loc.rdate,out.loc.rstatus]
:ASR[gqb,adt,ast]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 out.loc.rfacility           10 FREE     L  MIS.FACILITY   gqb                                                     
 out.loc.rdate                8 DATE     L                 adt                                                         
 out.loc.rstatus              3 CHOICE   L                 ast                                                         
 out.loc.rcount               5 INT      R                 :ASR[gqb,adt,ast]|0                                         
 out.loc.rcount.fix           5 INT      R                 :ASR[gqb,adt,ast]|1                                         
 Ì     i   2
adm.stats.patient.origin    (pat.origin) 
[po.facility,po.zip,po.date,po.status]
:ASZ[gqb,ggt,adt,ast]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 po.facility                 10 FREE     L  MIS.FACILITY   gqb                                                     
 po.zip                      10 ZIP.POST L  MIS.ZIP        ggt                                                     
 po.date                      8 DATE     L                 adt                                                         
 po.status                    3 CHOICE   L                 ast                                                         
 po.count                     5 INT      R                 :ASZ[gqb,ggt,adt,ast]|0                                     
 po.count.fix                 5 INT      R                 :ASZ[gqb,ggt,adt,ast]|1                                     
 po.county                   10 FREE     L  MIS.CNTY.DICT                                                          
 Ì     i   2
adm.stats.prim.care.doctor    (prim.care.doctor) 
[prim.care.doc.facility,prim.care.doc,prim.care.doc.date]
:ASP[gqb,ggg,adt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 prim.care.doc.facility      10 FREE     L  MIS.FACILITY   gqb                                                     
 prim.care.doc               10 FREE     L  MIS.DOC.DICT   ggg                                                     
 prim.care.doc.date           8 DATE     L                 adt                                                         
 pcd.obsv.admissions          4 INT      R                 :ASP[gqb,ggg,adt]|8                                         
 pcd.obsv.admissions.fix      4 INT      R                 :ASP[gqb,ggg,adt]|12                                        
 pcd.obsv.discharges          4 INT      R                 :ASP[gqb,ggg,adt]|9                                         
 pcd.obsv.discharges.fix      4 INT      R                 :ASP[gqb,ggg,adt]|13                                        
 pcd.obsv.expirations         4 INT      R                 :ASP[gqb,ggg,adt]|10                                        
 pcd.obsv.expirations.fix     4 INT      R                 :ASP[gqb,ggg,adt]|14                                        
 pcd.obsv.patient.days        4 INT      R                 :ASP[gqb,ggg,adt]|11                                        
 pcd.obsv.patient.days.fix    4 INT      R                 :ASP[gqb,ggg,adt]|15                                        
 prim.care.doc.adm.fix        4 INT      R                 :ASP[gqb,ggg,adt]|4                                         
 prim.care.doc.admissions     4 INT      R                 :ASP[gqb,ggg,adt]|0                                         
 prim.care.doc.disch.fix      4 INT      R                 :ASP[gqb,ggg,adt]|5                                         
 prim.care.doc.discharges     4 INT      R                 :ASP[gqb,ggg,adt]|1                                         
 prim.care.doc.exp.fix        4 INT      R                 :ASP[gqb,ggg,adt]|6                                         
 prim.care.doc.expirations    4 INT      R                 :ASP[gqb,ggg,adt]|2                                         
 prim.care.doc.pat.day.fix    4 INT      R                 :ASP[gqb,ggg,adt]|7                                         
 prim.care.doc.patient.day    4 INT      R                 :ASP[gqb,ggg,adt]|3                                         
 Ì     i   2
adm.stats.rm.rate.accom    (rm.rate.accom) 
[rac.facility,raccom,rac.date]
:ASRA[gqb,ggb,adt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 rac.facility                10 FREE     L  MIS.FACILITY   gqb                                                     
 raccom                      10 FREE     L  MIS.ACCOM.DICT ggb                                                     
 rac.date                     8 DATE     L                 adt                                                         
 rac.admissions               4 INT      R                 :ASRA[gqb,ggb,adt]|0                                        
 rac.admissions.fix           4 INT      R                 :ASRA[gqb,ggb,adt]|4                                        
 rac.discharges               4 INT      R                 :ASRA[gqb,ggb,adt]|1                                        
 rac.discharges.fix           4 INT      R                 :ASRA[gqb,ggb,adt]|5                                        
 rac.expirations              4 INT      R                 :ASRA[gqb,ggb,adt]|2                                        
 rac.expirations.fix          4 INT      R                 :ASRA[gqb,ggb,adt]|6                                        
 rac.obsv.admissions          4 INT      R                 :ASRA[gqb,ggb,adt]|8                                        
 rac.obsv.admissions.fix      4 INT      R                 :ASRA[gqb,ggb,adt]|12                                       
 rac.obsv.discharges          4 INT      R                 :ASRA[gqb,ggb,adt]|9                                        
 rac.obsv.discharges.fix      4 INT      R                 :ASRA[gqb,ggb,adt]|13                                       
 rac.obsv.expirations         4 INT      R                 :ASRA[gqb,ggb,adt]|10                                       
 rac.obsv.expirations.fix     4 INT      R                 :ASRA[gqb,ggb,adt]|14                                       
 rac.obsv.patient.days        4 INT      R                 :ASRA[gqb,ggb,adt]|11                                       
 rac.obsv.patient.days.fix    4 INT      R                 :ASRA[gqb,ggb,adt]|15                                       
 rac.patient.days             4 INT      R                 :ASRA[gqb,ggb,adt]|3                                        
 rac.patient.days.fix         4 INT      R                 :ASRA[gqb,ggb,adt]|7                                        
 Ì      i   2
adm.stats.outpt.rm.rate.accom    (rm.rate.accom.out) 
[rac.facility,raccom,rac.date, rac.outpt.status]
:ASRA[gqb,ggb,adt]O[ast]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 rac.outpt.status             4 CHOICE   L                 ast                                                         
 rac.outpt.bed.days           4 INT      R                 :ASRA[gqb,ggb,adt]O[ast]|0                                  
 rac.outpt.bed.days.fix       4 INT      R                 :ASRA[gqb,ggb,adt]O[ast]|1                                  
 Ì     i   2
adm.stats.service    (service) 
[sv.facility,serv,sv.date]
:ASS[gqb,ggs,adt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 sv.facility                 10 FREE     L  MIS.FACILITY   gqb                                                     
 serv                        10 FREE     L  MIS.SVC.DICT   ggs                                                     
 sv.date                      8 DATE     L                 adt                                                         
 sv.admissions                4 INT      R                 :ASS[gqb,ggs,adt]|0                                         
 sv.admissions.fix            4 INT      R                 :ASS[gqb,ggs,adt]|4                                         
 sv.discharges                4 INT      R                 :ASS[gqb,ggs,adt]|1                                         
 sv.discharges.fix            4 INT      R                 :ASS[gqb,ggs,adt]|5                                         
 sv.expirations               4 INT      R                 :ASS[gqb,ggs,adt]|2                                         
 sv.expirations.fix           4 INT      R                 :ASS[gqb,ggs,adt]|6                                         
 sv.obsv.admissions           4 INT      R                 :ASS[gqb,ggs,adt]|8                                         
 sv.obsv.admissions.fix       4 INT      R                 :ASS[gqb,ggs,adt]|12                                        
 sv.obsv.discharges           4 INT      R                 :ASS[gqb,ggs,adt]|9                                         
 sv.obsv.discharges.fix       4 INT      R                 :ASS[gqb,ggs,adt]|13                                        
 sv.obsv.expirations          4 INT      R                 :ASS[gqb,ggs,adt]|10                                        
 sv.obsv.expirations.fix      4 INT      R                 :ASS[gqb,ggs,adt]|14                                        
 sv.obsv.patient.days         4 INT      R                 :ASS[gqb,ggs,adt]|11                                        
 sv.obsv.patient.days.fix     4 INT      R                 :ASS[gqb,ggs,adt]|15                                        
 sv.patient.days              4 INT      R                 :ASS[gqb,ggs,adt]|3                                         
 sv.patient.days.fix          4 INT      R                 :ASS[gqb,ggs,adt]|7                                         
 Ì      i   2
adm.stats.outpt.service    (service.out) 
[sv.facility,serv,sv.date, sv.outpt.status]
:ASS[gqb,ggs,adt]O[ast]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 sv.outpt.status              4 CHOICE   L                 ast                                                         
 sv.outpt.bed.days            4 INT      R                 :ASS[gqb,ggs,adt]O[ast]|0                                   
 sv.outpt.bed.days.fix        4 INT      R                 :ASS[gqb,ggs,adt]O[ast]|1                                   
 Ì     i   2
zcus.closed.beds    (zcus.closed.beds) 
[zcus.cl.facility,zcus.cl.service,zcus.cl.yr.month]
:ASZCUSCL[gqb,ggs,asm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 zcus.cl.facility            10 FREE     L  MIS.FACILITY   gqb                                                     
 zcus.cl.service             10 FREE     L  MIS.SVC.DICT   ggs                                                     
 zcus.cl.yr.month             6 FREE     L                 asm                                                         
 zcus.cl.closed.beds          6 PINT     R                 :ASZCUSCL[gqb,ggs,asm]|0                                    
 Ì     i   2
zcus.service    (zcus.service) 
[zcus.sv.facility,zcus.sv.consultant,zcus.sv.service,zcus.sv.yr.month]
:ASZCUSSV[gqb,ggg,ggs,asm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 zcus.sv.facility            10 FREE     L  MIS.FACILITY   gqb                                                     
 zcus.sv.consultant          10 FREE     L  MIS.DOC.DICT   ggg                                                     
 zcus.sv.service             10 FREE     L  MIS.SVC.DICT   ggs                                                     
 zcus.sv.yr.month             6 FREE     L                 asm                                                         
 zcus.fce.day.case.episode    4 FREE     L                 :ASZCUSSV[gqb,ggg,ggs,asm]|9                                
 zcus.fce.episode             4 FREE     L                 :ASZCUSSV[gqb,ggg,ggs,asm]|8                                
 zcus.fce.episode.days        4 FREE     L                 :ASZCUSSV[gqb,ggg,ggs,asm]|10                               
 zcus.los.days                4 FREE     L                 :ASZCUSSV[gqb,ggg,ggs,asm]|5                                
 zcus.not.used.anymore        2 FREE     L                 :ASZCUSSV[gqb,ggg,ggs,asm]|0                                
 zcus.not.used.anymore2       5 FREE     L                 :ASZCUSSV[gqb,ggg,ggs,asm]|1                                
 zcus.priv.pay.bed.days       4 FREE     L                 :ASZCUSSV[gqb,ggg,ggs,asm]|6                                
 zcus.priv.pay.dis.deaths     4 FREE     L                 :ASZCUSSV[gqb,ggg,ggs,asm]|7                                
 zcus.sv.bed.days             5 FREE     L                 :ASZCUSSV[gqb,ggg,ggs,asm]|2                                
 zcus.sv.dis.day.case         4 FREE     L                 :ASZCUSSV[gqb,ggg,ggs,asm]|4                                
 zcus.sv.dis.deaths           4 FREE     L                 :ASZCUSSV[gqb,ggg,ggs,asm]|3                                
 Ì     i   2
zcus.service.admit.source    (zcus.svc.adm.source) 
[zcus.as.facility,zcus.as.consultant,zcus.as.service,zcus.as.admit.source,zcus.as.yr.month]
:ASZCUSAS[gqb,ggg,ggs,gka,asm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 zcus.as.facility            10 FREE     L  MIS.FACILITY   gqb                                                     
 zcus.as.consultant          10 FREE     L  MIS.DOC.DICT   ggg                                                     
 zcus.as.service             10 FREE     L  MIS.SVC.DICT   ggs                                                     
 zcus.as.admit.source        10 FREE     L  MIS.ADM.SOURCE gka                                                     
 zcus.as.yr.month             6 FREE     L                 asm                                                         
 zcus.as.admits               5 FREE     L                 :ASZCUSAS[gqb,ggg,ggs,gka,asm]|0                            
 zcus.as.day.case             5 FREE     L                 :ASZCUSAS[gqb,ggg,ggs,gka,asm]|1                            
 Ì     i   2
zcus.svc.discharge.disposition    (zcus.svc.dis.dispo) 
[zcus.dd.facility,zcus.dd.consultant,zcus.dd.service,zcus.dd.discharge.disp,zcus.dd.yr.month]
:ASZCUSDD[gqb,ggg,ggs,ggf,asm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 zcus.dd.facility            10 FREE     L  MIS.FACILITY   gqb                                                     
 zcus.dd.consultant          10 FREE     L  MIS.DOC.DICT   ggg                                                     
 zcus.dd.service             10 FREE     L  MIS.SVC.DICT   ggs                                                     
 zcus.dd.discharge.disp      10 FREE     L  MIS.DIS.DICT   ggf                                                     
 zcus.dd.yr.month             6 FREE     L                 asm                                                         
 zcus.dd.day.case             5 FREE     L                 :ASZCUSDD[gqb,ggg,ggs,ggf,asm]|1                            
 zcus.dd.discharges           5 FREE     L                 :ASZCUSDD[gqb,ggg,ggs,ggf,asm]|0                            
 Ì     i   2
zcus.ward.activity.by.svc.con    (zcus.ward.activity) 
[zcus.wa.date,zcus.wa.facility,zcus.wa.consultant,zcus.wa.service,zcus.wa.ward]
:ASZCUSWA[asm,gqb,ggg,ggs,ggr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 zcus.wa.date                 6 FREE     L                 asm                                                         
 zcus.wa.facility            10 FREE     L  MIS.FACILITY   gqb                                                     
 zcus.wa.consultant          10 FREE     L  MIS.DOC.DICT   ggg                                                     
 zcus.wa.service             10 FREE     L  MIS.SVC.DICT   ggs                                                     
 zcus.wa.ward                10 FREE     L  MIS.ROOM.DICT  ggr                                                     
 zcus.wa.adm.elec             5 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|1                            
 zcus.wa.adm.emer             5 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|2                            
 zcus.wa.adm.other            5 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|3                            
 zcus.wa.adm.start            5 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|0                            
 zcus.wa.adm.trans            5 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|4                            
 zcus.wa.cl.closed.beds       3 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|19                           
 zcus.wa.dis.advice           5 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|5                            
 zcus.wa.dis.died             5 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|7                            
 zcus.wa.dis.dur              5 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|9                            
 zcus.wa.dis.occ              6 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|10                           
 zcus.wa.dis.self             5 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|6                            
 zcus.wa.dis.trans            5 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|8                            
 zcus.wa.fce.dc.epi           4 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|17                           
 zcus.wa.fce.epi              4 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|16                           
 zcus.wa.fce.epi.days         4 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|18                           
 zcus.wa.los.days             4 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|13                           
 zcus.wa.pp.bed.days          4 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|14                           
 zcus.wa.pp.dis.deaths        4 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|15                           
 zcus.wa.sv.bed.days          5 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|11                           
 zcus.wa.sv.dis.day.case      4 FREE     L                 :ASZCUSWA[asm,gqb,ggg,ggs,ggr]|12                           
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 closed.beds.temp                   [zcus.midnight.run.date,zcus.cl.facility,zcus.cl.service,zcus.cl.yr.month] = sta
   zcus.closed.beds.temp              :ASZCUSCLT[mrdt,gqb,ggs,asm]