sHelp
                                     SCH.FAC
       2
   or.facility.data
     or.facility.budget.year
       or.facility.budgets
     or.facility.nur.dx.screens
     or.facility.par.headers
       or.facility.par.choices
     or.facility.proc.groups
       or.facility.count.headers

 Ì       2
or.facility.data    (main) 
[facility]
&HSFAC[gqb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 facility                    10 FREE     L  MIS.FACILITY   gqb                                                     
 auto.bill.number            10 FREE     L                 &HSFAC[gqb]|10                                              
 facility.add1               30 FREE     L                 &HSFAC[gqb]|1                                               
 facility.add2               30 FREE     L                 &HSFAC[gqb]|2                                               
 facility.city               20 FREE     L                 &HSFAC[gqb]|3                                               
 facility.contact            30 FREE     L                 &HSFAC[gqb]|8                                               
 facility.fax                18 FREE     L                 &HSFAC[gqb]|7                                               
 facility.name               30 FREE     L                 &HSFAC[gqb]|0                                               
 facility.phone              18 FREE     L                 &HSFAC[gqb]|6                                               
 facility.state               2 FREE     L                 &HSFAC[gqb]|4                                               
 facility.zip                10 ZIP.POST L                 &HSFAC[gqb]|5                                               
 last.update                 10 PINT     R                 &HSFAC[gqb]UPD                                              
 par.label                   20 FREE     L                 &HSFAC[gqb]|9                                               
 vendor.prefix                1 FREE     L                 &HSFAC[gqb]|11                                              
 Ì       2
or.facility.budget.year    (budgets.year) 
[facility, budget.year]
&HSFAC[gqb]B[hsbuy]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 budget.year                  4 YEAR     L                 hsbuy                                                       
 Ì       2
or.facility.budgets    (budgets) 
[facility,budget.year, budget]
&HSFAC[gqb]B[hsbuy,hsbud]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 budget                      10 FREE     L                 hsbud                                                       
 budget.apr.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|3                                 
 budget.aug.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|7                                 
 budget.dec.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|11                                
 budget.feb.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|1                                 
 budget.jan.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|0                                 
 budget.jul.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|6                                 
 budget.jun.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|5                                 
 budget.mar.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|2                                 
 budget.may.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|4                                 
 budget.nov.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|10                                
 budget.oct.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|9                                 
 budget.sep.amount            5 INT      R                 &HSFAC[gqb]B[hsbuy,hsbud]|8                                 
 Ì       2
or.facility.nur.dx.screens    (nur.dxs) 
[facility, nur.dx.screen]
&HSFAC[gqb]N[gxx]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 nur.dx.screen               15 FREE     L  MIS.SCREEN     gxx                                                     
 nur.dx.screen.type           1 FREE     L                 &HSFAC[gqb]N[gxx]|0                                         
 Ì       2
or.facility.par.headers    (par.headers) 
[facility, par.urn]
&HSFAC[gqb]PAR[hsfPT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 par.urn                      1 URN      L                 hsfPT                                                       
 par.header                  13 FREE     L                 &HSFAC[gqb]PAR[hsfPT]|0                                     
 Ì       2
or.facility.par.choices    (par.choices) 
[facility,par.urn, par.choice]
&HSFAC[gqb]PAR[hsfPT]CH[hsfPC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 par.choice                   1 INT      R                 hsfPC                                                       
 par.choice.name             20 FREE     L                 &HSFAC[gqb]PAR[hsfPT]CH[hsfPC]|0                            
 Ì       2
or.facility.proc.groups    (proc.groups) 
[facility, procedure.group]
&HSFAC[gqb]S[wac]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 procedure.group             10 FREE     L  SCH.APPT.GROUP wac                                                     
 Ì       2
or.facility.count.headers    (counts) 
[facility,procedure.group, count.urn]
&HSFAC[gqb]S[wac]C[hscnt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 count.urn                    2 URN      L                 hscnt                                                       
 count                       10 FREE     L                 &HSFAC[gqb]S[wac]C[hscnt]|0