sHelp
                                     ADM.PARAM
       2
   adm.parameters.file
     adm.params.by.facility
       adm.parameters.forms.statuses
         adm.parameters.embosses
         adm.parameters.adm.forms
       adm.param.by.facility.location
       adm.param.mri.search.vals
     adm.param.abstracting.dbs
     adm.param.bar.dbs
     adm.param.chg.capture.dbs
     adm.param.edm.dbs
     adm.param.nurse.station.dbs
     adm.param.oth.vendor.facils
     adm.param.pmm.dbs
     adm.param.scheduling.databases
       adm.param.stats.edit.users
   adm.param.tables

 Ì       2
adm.parameters.file    (main) 
[mnemonic]
&APARAM

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 allergy.query               10 FREE     L  MIS.QUERY      &APARAM|10                                              
 emr.link                     1 YN       L                 &APARAM|11                                                  
 fin.class.default           10 FREE     L  MIS.FIN.CLASS  &APARAM|14                                              
 invalid.log.delete.days      4 PINT     R                 &APARAM|15                                                  
 mother.relation.pt          10 FREE     L  MIS.RELAT.DICT &APARAM|2                                               
 mri.appl.database           12 FREE     L  MIS.APPL       &APARAM["I"]|0                                          
 mri.appl.database.new.old   12 FREE     L  MIS.APPL       VAL=IF{@ADM.PARAM.mri.appl.database;@ADM.PARAM.main|2}  
 nmi.connection.for.ov.qry   10 FREE     L                 &APARAM|12                                                  
 other.vendor.interface       1 YN       L                 &APARAM["I"]|1                                              
 ov.interface                 1 YN       L                 VAL=@ADM.PARAM.other.vendor.interface                       
 purge.spool.group           10 FREE     L  MIS.SPOOL.GROUP&APARAM|9                                               
 rcr.file.delete.days         3 PINT     R                 &APARAM|6                                                   
 rcr.file.dir                20 FREE     L                 &APARAM|5                                                   
 rcr.file.mach               10 FREE     L                 &APARAM|4                                                   
 reinstate.log.purge          3 PINT     R                 &APARAM|16                                                  
 repeat.pat.on.searches       1 YN       L                 &APARAM|8                                                   
 soundex.method              10 CHOICE   L                 &APARAM|7                                                   
 start.mnr.after              4 HHMM     L                 &APARAM|1                                                   
 update.ins.order             1 YN       L                 &APARAM|13                                                  
 use.ub.82                    1 YN       L                 &APARAM|3                                                   
 xq.delete.days               3 PINT     R                 &APARAM|0                                                   
 zcus.er.gp.ltr.pgm          50 FREE     L                 &APARAM["ZCUSRES"]|1                                        
 zcus.res.access              1 YN       L                 &APARAM["ZCUSRES"]|0                                        
 zcus.sch.appl.database      12 FREE     L  MIS.APPL       &APARAM["ZCUS.I"]|1                                     
 zcus.spc.appl.database      12 FREE     L  MIS.APPL       &APARAM["ZCUS.I"]|2                                     
 zcus.wl.appl.database       12 FREE     L  MIS.APPL       &APARAM["ZCUS.I"]|0                                     
 Ì       2
adm.params.by.facility    (by.facility) 
[mnemonic, facility]
&APARAM["F",gqb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 facility                    10 FREE     L  MIS.FACILITY   gqb                                                     
 acct.no.check.digit         10 CHOICE   L                 VAL=@ADM.PARAM.acct.no.check.digit.ee[@.facility]           
 acct.no.check.digit.ee      10 CHOICE   L                 &APARAM["F",gqb]|8                                          
 acct.no.prefix               2 FREE     L                 VAL=@MIS.FACILITY.acct.number.prefix[@.facility]            
 allow.non.chk.dig            1 YN       L                 VAL=@ADM.PARAM.allow.non.chk.dig.ee[@.facility]             
 allow.non.chk.dig.ee         1 YN       L                 &APARAM["F",gqb]|20                                         
 allow.old.out.hours          3 PINT     R                 VAL=@ADM.PARAM.allow.old.out.hours.ee[@.facility]           
 allow.old.out.hours.ee       3 PINT     R                 &APARAM["F",gqb]|19                                         
 allow.old.out.to.in          1 YN       L                 VAL=@ADM.PARAM.allow.old.out.to.in.ee[@.facility]           
 allow.old.out.to.in.ee       1 YN       L                 &APARAM["F",gqb]|0                                          
 ask.sch.pre.drc              1 YN       L                 VAL=@ADM.PARAM.ask.sch.pre.drc.ee[@.facility]               
 ask.sch.pre.drc.ee           1 YN       L                 &APARAM["F",gqb]|39                                         
 auto.remove.bed.or.svc       8 CHOICE   L                 VAL=@ADM.PARAM.auto.remove.bed.or.svc.ee[@.facility]        
 auto.remove.bed.or.svc.ee    8 CHOICE   L                 &APARAM["F",gqb]|42                                         
 auto.remove.hours            3 PINT     R                 VAL=@ADM.PARAM.auto.remove.hours.ee[@.facility]             
 auto.remove.hours.ee         3 PINT     R                 &APARAM["F",gqb]|41                                         
 auto.remove.outpt.bed        1 YN       L                 VAL=@ADM.PARAM.auto.remove.outpt.bed.ee[@.facility]         
 auto.remove.outpt.bed.ee     1 YN       L                 &APARAM["F",gqb]|40                                         
 backdate.date                8 DATE     L                 VAL=@ADM.PARAM.backdate.date.ee[@.facility]                 
 backdate.date.ee             8 DATE     L                 &APARAM["F",gqb]|17                                         
 backdate.stats.days          5 PINT     R                 VAL=@ADM.PARAM.backdate.stats.days.ee[@.facility]           
 backdate.stats.days.ee       5 PINT     R                 &APARAM["F",gqb]|18                                         
 bed.code                    90 FREE     L                 &APARAM["F",gqb]C|1                                         
 bed.header                  30 FREE     L                 &APARAM["F",gqb]C|0                                         
 bed.header.width             2 PINT     R                 &APARAM["F",gqb]C|2                                         
 cancellation.override        1 YN       L                 &APARAM["F",gqb]|24                                         
 cci.name                    15 FREE     L  MIS.SCREEN     &APARAM["F",gqb]|25                                     
 charges.delete.days          4 PINT     R                 VAL=@ADM.PARAM.charges.delete.days.ee[@.facility]           
 charges.delete.days.ee       4 PINT     R                 &APARAM["F",gqb]|5                                          
 confidential.message        25 FREE     L                 VAL=@ADM.PARAM.confidential.message.ee[@.facility]          
 confidential.message.ee     25 FREE     L                 &APARAM["F",gqb]|13                                         
 copy                         1 FREE     L                                                                             
 default.mothers.hcn          1 YN       L                 &APARAM["F",gqb]|32                                         
 default.page.number          1 YN       L                 &APARAM["F",gqb]|27                                         
 default.zip.code             5 FREE     L                 &APARAM["F",gqb]|23                                         
 dirty.bed.status            10 FREE     L  ADM.BED.STATUS VAL=@ADM.PARAM.dirty.bed.status.ee[@.facility]          
 dirty.bed.status.ee         10 FREE     L  ADM.BED.STATUS &APARAM["F",gqb]|14                                     
 fiscal.first.month           2 PINT     R                 VAL=@ADM.PARAM.fiscal.first.month.ee[@.facility]            
 fiscal.first.month.ee        2 PINT     R                 &APARAM["F",gqb]|12                                         
 fm.ignore.last.edit          1 YN       L                 VAL=@ADM.PARAM.fm.ignore.last.edit.ee[@.facility]           
 fm.ignore.last.edit.ee       1 YN       L                 &APARAM["F",gqb]|11                                         
 generate.charges             1 YN       L                 VAL=@ADM.PARAM.generate.charges.ee[@.facility]              
 generate.charges.ee          1 YN       L                 &APARAM["F",gqb]|1                                          
 guar.emp.upd.name.loc        1 CHOICE   L                 VAL=@ADM.PARAM.guar.emp.upd.name.loc.ee[@.facility]         
 guar.emp.upd.name.loc.ee     1 CHOICE   L                 &APARAM["F",gqb]|48                                         
 guarantor.indexing           1 YN       L                 VAL=@ADM.PARAM.guarantor.indexing.ee[@.facility]            
 guarantor.indexing.ee        1 YN       L                 &APARAM["F",gqb]|9                                          
 override.corp                4 FREE     L                 VAL=@ADM.PARAM.override.corp.ee[@.facility]                 
 override.corp.ee             4 FREE     L  MIS.GL.CORP    &APARAM["F",gqb]|49                                     
 patient.delete.days          4 PINT     R                 VAL=@ADM.PARAM.patient.delete.days.ee[@.facility]           
 patient.delete.days.ee       4 PINT     R                 &APARAM["F",gqb]|4                                          
 pt.addr.upd.guar             1 CHOICE   L                 VAL=@ADM.PARAM.pt.addr.upd.guar.ee[@.facility]              
 pt.addr.upd.guar.ee          1 CHOICE   L                 &APARAM["F",gqb]|46                                         
 pt.addr.upd.nok              1 CHOICE   L                 VAL=@ADM.PARAM.pt.addr.upd.nok.ee[@.facility]               
 pt.addr.upd.nok.ee           1 CHOICE   L                 &APARAM["F",gqb]|44                                         
 pt.addr.upd.ptn              1 CHOICE   L                 VAL=@ADM.PARAM.pt.addr.upd.ptn.ee[@.facility]               
 pt.addr.upd.ptn.ee           1 CHOICE   L                 &APARAM["F",gqb]|45                                         
 pt.emp.upd.guar              1 CHOICE   L                 VAL=@ADM.PARAM.pt.emp.upd.guar.ee[@.facility]               
 pt.emp.upd.guar.ee           1 CHOICE   L                 &APARAM["F",gqb]|47                                         
 rcr.autodisch.method.dis    12 FREE     L                 VAL=IF{@rcr.autodischarge.method^a=1 "DO NOT";a=2 "FIR      
                                                           VAL=ST VISIT";a=3 "LAST VISIT";a=4 "END OF MONTH"}          
 rcr.autodischarge.days       4 INT      R                 VAL=@ADM.PARAM.rcr.autodischarge.days.ee[@.facility]        
 rcr.autodischarge.days.ee    4 INT      R                 &APARAM["F",gqb]|3                                          
 rcr.autodischarge.loc.day    4 PINT     R                 &APARAM["F",gqb]|22                                         
 rcr.autodischarge.meth.ee    1 CHOICE   L                 &APARAM["F",gqb]|7                                          
 rcr.autodischarge.method     1 CHOICE   L                 VAL=@ADM.PARAM.rcr.autodischarge.meth.ee[@.facility]        
 rcr.copy.auth.query          1 YN       L                 VAL=@ADM.PARAM.rcr.copy.auth.query.ee[@.facility]           
 rcr.copy.auth.query.ee       1 YN       L                 &APARAM["F",gqb]|50                                         
 rcr.create.new               1 CHOICE   L                 &APARAM["F",gqb]|34                                         
 rcr.create.new.status        3 CHOICE   L                 &APARAM["F",gqb]|36                                         
 rcr.discharge.location      10 FREE     L  MIS.LOCN.DICT  &APARAM["F",gqb]|21                                     
 rcr.reserv.days              3 INT      R                 &APARAM["F",gqb]|37                                         
 rcr.revisit.days             3 PINT     R                 &APARAM["F",gqb]|35                                         
 reg.pt.date.from.dft         9 FREE     L                 VAL=@ADM.PARAM.reg.pt.date.from.dft.ee[@.facility]          
 reg.pt.date.from.dft.ee      9 FREE     L                 &APARAM["F",gqb]|30                                         
 reg.pt.date.thru.dft         9 FREE     L                 VAL=@ADM.PARAM.reg.pt.date.thru.dft.ee[@.facility]          
 reg.pt.date.thru.dft.ee      9 FREE     L                 &APARAM["F",gqb]|31                                         
 save.changed.name            1 YN       L                 &APARAM["F",gqb]|38                                         
 sch.pt.date.from.dft         8 FREE     L                 VAL=@ADM.PARAM.sch.pt.date.from.dft.ee[@.facility]          
 sch.pt.date.from.dft.ee      8 FREE     L                 &APARAM["F",gqb]|28                                         
 sch.pt.date.thru.dft         8 FREE     L                 VAL=@ADM.PARAM.sch.pt.date.thru.dft.ee[@.facility]          
 sch.pt.date.thru.dft.ee      8 FREE     L                 &APARAM["F",gqb]|29                                         
 sch.pt.delete.days           4 PINT     R                 VAL=@ADM.PARAM.sch.pt.delete.days.ee[@.facility]            
 sch.pt.delete.days.ee        4 PINT     R                 &APARAM["F",gqb]|26                                         
 screen.saving                1 YN       L                 VAL=@ADM.PARAM.screen.saving.ee[@.facility]                 
 screen.saving.ee             1 YN       L                 &APARAM["F",gqb]|33                                         
 show.bad.debt                1 YN       L                 VAL=@ADM.PARAM.show.bad.debt.ee[@.facility]                 
 show.bad.debt.ee             1 YN       L                 &APARAM["F",gqb]|16                                         
 similar.pt.warning           1 YN       L                 VAL=@ADM.PARAM.similar.pt.warning.ee[@.facility]            
 similar.pt.warning.ee        1 YN       L                 &APARAM["F",gqb]|43                                         
 stats.delete.days            4 PINT     R                 VAL=@ADM.PARAM.stats.delete.days.ee[@.facility]             
 stats.delete.days.ee         4 PINT     R                 &APARAM["F",gqb]|6                                          
 stats.ed.cutoff.date         8 DATE     L                 VAL=@ADM.PARAM.stats.ed.cutoff.date.ee[@.facility]          
 stats.ed.cutoff.date.ee      8 DATE     L                 &APARAM["F",gqb]|10                                         
 stats.ed.restriction         8 FREE     L                 VAL=IF{@ADM.PARAM.stats.ed.users[@.user] "";@ADM.PARAM      
                                                           VAL=.stats.ed.cutoff.date<@.today}                       
 vip.flag                     1 FREE     L                 VAL=@ADM.PARAM.vip.flag.ee[@.facility]                      
 vip.flag.ee                  1 FREE     L                 &APARAM["F",gqb]|2                                          
 yn                           1 YN       L                                                                             
 zcus.ae.default.location    10 FREE     L  MIS.LOCN.DICT  &APARAM["F",gqb]ZCUS.UK|3                               
 zcus.default.pre.ref.loc    10 FREE     L  MIS.LOCN.DICT  &APARAM["F",gqb]ZCUS.UK|6                               
 zcus.default.pt.category    10 FREE     L  MIS.FIN.CLASS  &APARAM["F",gqb]ZCUS.UK|4                               
 zcus.default.pt.type        10 FREE     L  MIS.CAN.REGCAT &APARAM["F",gqb]ZCUS.UK|5                               
 zcus.deindex.days            4 FREE     L                 &APARAM["F",gqb]ZCUS.UK|7                                   
 zcus.deindex.in.done         8 DATE     L                 &APARAM["F",gqb]ZCUS.UK|8                                   
 zcus.deindex.out.done        8 DATE     L                 &APARAM["F",gqb]ZCUS.UK|9                                   
 zcus.remove.default          1 YN       L                 &APARAM["F",gqb]ZCUS.UK|1                                   
 zcus.remove.from.wl          1 YN       L                 &APARAM["F",gqb]ZCUS.UK|0                                   
 zip.or.county.stats          1 CHOICE   L                 VAL=@ADM.PARAM.zip.or.county.stats.ee[@.facility]           
 zip.or.county.stats.ee       1 CHOICE   L                 &APARAM["F",gqb]|15                                         
 Ì        2
adm.parameters.forms.statuses    (adm.forms.statuses) 
[mnemonic,facility, status]
&APARAM["F",gqb]P[stc]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 status                       8 FREE     L                 stc                                                         
 adm.oth.visit.history        1 YN       L                 &APARAM["F",gqb]P[stc]O|0                                   
 adm.swipe.card               1 YN       L                 &APARAM["F",gqb]P[stc]O|1                                   
 Ì        2
adm.parameters.embosses    (adm.embosses) 
[mnemonic,facility,status, emboss.seq.no]
&APARAM["F",gqb]P[stc]E[sten]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 emboss.seq.no                2 PINT     R                 sten                                                        
 emboss.format                8 FREE     L  MIS.ADM.PF     &APARAM["F",gqb]P[stc]E[sten]|1                         
 emboss.program              41 FREE     L                 &APARAM["F",gqb]P[stc]E[sten]|2                             
 emboss.prompt               30 FREE     L                 VAL=@ADM.PARAM.emboss.prompt.ee[@.facility,ADM.PARAM.s      
                                                           VAL=tatus,ADM.PARAM.emboss.seq.no]                          
 emboss.prompt.ee            30 FREE     L                 &APARAM["F",gqb]P[stc]E[sten]|0                             
 Ì        2
adm.parameters.adm.forms    (adm.forms) 
[mnemonic,facility,status, form.seq.no]
&APARAM["F",gqb]P[stc]F[stfn]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 form.seq.no                  2 PINT     R                 stfn                                                        
 adm.form                     1 CHOICE   L                 VAL=@ADM.PARAM.adm.form.ee[@.facility,ADM.PARAM.status      
                                                           VAL=,ADM.PARAM.form.seq.no]                                 
 adm.form.ee                  1 CHOICE   L                 &APARAM["F",gqb]P[stc]F[stfn]|1                             
 adm.form.mrf                15 FREE     L  MIS.MR.FORM    &APARAM["F",gqb]P[stc]F[stfn]|2                         
 form.prompt                 30 FREE     L                 VAL=@ADM.PARAM.form.prompt.ee[@.facility,ADM.PARAM.sta      
                                                           VAL=tus,ADM.PARAM.form.seq.no]                              
 form.prompt.ee              30 FREE     L                 &APARAM["F",gqb]P[stc]F[stfn]|0                             
 Ì        2
adm.param.by.facility.location    (by.facility.locations) 
[mnemonic,facility, facility.location]
&APARAM["F",gqb]F[ggn]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 facility.location           10 FREE     L  MIS.LOCN.DICT  ggn                                                     
 loc.rcr.autodis.days         4 INT      R                 &APARAM["F",gqb]F[ggn]|0                                    
 loc.rcr.create.new           1 CHOICE   L                 &APARAM["F",gqb]F[ggn]|1                                    
 loc.rcr.revisit.days         3 PINT     R                 &APARAM["F",gqb]F[ggn]|2                                    
 Ì        2
adm.param.mri.search.vals    (mri.search) 
[mnemonic,facility, questionnaire.mri]
&APARAM["F",gqb]MRI[apQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 questionnaire.mri           10 FREE     L                 apQ                                                         
 quest.mri.search             1 CHOICE   L                 VAL=@ADM.PARAM.quest.mri.search.ee[@.facility,ADM.PARA      
                                                           VAL=M.questionnaire.mri]                                    
 quest.mri.search.dis        12 FREE     L                 VAL=IF{@quest.mri.search^a=1 "NONE";a=2 "INTERNAL";a=3      
                                                           VAL= "INTL & UNIT#"}                                        
 quest.mri.search.ee          1 CHOICE   L                 &APARAM["F",gqb]MRI[apQ]|0                                  
 Ì       2
adm.param.abstracting.dbs    (abstracting.databases) 
[mnemonic, abstracting.system]
&APARAM["I"]ABS[iaD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 abstracting.system          12 FREE     L  MIS.APPL       iaD                                                     
 Ì       2
adm.param.bar.dbs    (bar.appl.databases) 
[mnemonic, bar.appl.database]
&APARAM["I"]BAR[iaD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 bar.appl.database           12 FREE     L  MIS.APPL       iaD                                                     
 Ì       2
adm.param.chg.capture.dbs    (charge.capture.databases) 
[mnemonic, cc.facility]
&APARAM["I"]CC[gqb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cc.facility                 10 FREE     L  MIS.FACILITY   gqb                                                     
 charge.capture.system       12 FREE     L  MIS.APPL       VAL=@ADM.PARAM.charge.capture.system.ee[@.facility]     
 charge.capture.system.ee    12 FREE     L  MIS.APPL       &APARAM["I"]CC[gqb]|0                                   
 Ì       2
adm.param.edm.dbs    (edm.databases) 
[mnemonic, edm.database]
&APARAM["I"]EDM[iaD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 edm.database                12 FREE     L  MIS.APPL       iaD                                                     
 Ì       2
adm.param.nurse.station.dbs    (nurse.station.databases) 
[mnemonic, nurse.station.system]
&APARAM["I"]NSC[iaD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 nurse.station.system        12 FREE     L  MIS.APPL       iaD                                                     
 Ì       2
adm.param.oth.vendor.facils    (other.vendor.facils) 
[mnemonic, ov.facility]
&APARAM["I"]OV[gqb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ov.facility                 10 FREE     L  MIS.FACILITY   gqb                                                     
 send.sch                     1 YN       L                 &APARAM["I"]OV[gqb]|0                                       
 Ì       2
adm.param.pmm.dbs    (pmm.appl.databases) 
[mnemonic, pmm.appl.database]
&APARAM["I"]PMM[iaD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 pmm.appl.database           12 FREE     L  MIS.APPL       iaD                                                     
 Ì       2
adm.param.scheduling.databases    (scheduling.databases) 
[mnemonic, sched.system]
&APARAM["I"]SCH[iaD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 sched.system                12 FREE     L  MIS.APPL       iaD                                                     
 Ì       2
adm.param.stats.edit.users    (stats.ed.users) 
[mnemonic, stats.ed.user]
&APARAM["SEU",gu]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 stats.ed.user               10 FREE     L  MIS.USER       gu                                                      
 Ì       2
adm.param.tables    (tables) 
&APARAMT

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 status.map.table             0 FREE     L                 &APARAMT["ST"]