sHelp
                                     SCH.PRE.RULE
     i   2
   or.preop.time.rule
     or.preop.time.rule.charges
     or.preop.time.rule.facility
     or.preop.time.rule.fields

 Ì     i   2
or.preop.time.rule    (main) 
[mnemonic]
&HSPTC[hsp]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mnemonic                    10 FREE     L                 hsp                                                         
 active                       1 YN       L                 &HSPTC[hsp]|0                                               
 last.update                 50 FREE     L                 &HSPTC[hsp]UPD                                              
 name                        30 FREE     L                 &HSPTC[hsp]|1                                               
 sort.order                   3 INT      R                 &HSPTC[hsp]|2                                               
 Ì     i   2
or.preop.time.rule.charges    (charges) 
[mnemonic, charge.urn]
&HSPTC[hsp]C[hsptc]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 charge.urn                   2 URN      L                 hsptc                                                       
 charge.code                 10 FREE     L                 &HSPTC[hsp]C[hsptc]|2                                       
 charge.freq                  2 INT      R                 &HSPTC[hsp]C[hsptc]|1                                       
 charge.min                   3 INT      R                 &HSPTC[hsp]C[hsptc]|0                                       
 Ì     i   2
or.preop.time.rule.facility    (facilities) 
[mnemonic, facility]
&HSPTC[hsp]FAC[gqb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 facility                    10 FREE     L  MIS.FACILITY   gqb                                                     
 Ì     i   2
or.preop.time.rule.fields    (rules) 
[mnemonic, queue]
&HSPTC[hsp]R[hspQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 queue                        2 PINT     R                 hspQ                                                        
 field                       16 FREE     L  SCH.TIME.FIELDS&HSPTC[hsp]R[hspQ]|0                                    
 operator                     3 CHOICE   L                 &HSPTC[hsp]R[hspQ]|1                                        
 value                       15 FREE     L                 &HSPTC[hsp]R[hspQ]|2                                        
 value.date                   8 DATE     L                 &HSPTC[hsp]R[hspQ]|3                                        
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 or.preop.time.rule.sort.x          [sort.order,mnemonic] = active
   sort.x                             &HSPTO[hsyo,hsp]