sHelp
                                     PHA.PU
       2
   pha.price.update.file
     pha.pu.already.filed
     price.update.data
       price.update.data.by.fac
     purchasing.facilities

 Ì       2
pha.price.update.file    (main) 
[run]
:TZ[tz]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 run                          4 PINT     R                 tz                                                          
 end.date                     8 DATE     L                 :TZ[tz]|3                                                   
 end.time                     4 HHMM     L                 :TZ[tz]|4                                                   
 start.date                   8 DATE     L                 :TZ[tz]|1                                                   
 start.time                   4 HHMM     L                 :TZ[tz]|2                                                   
 type                         5 CHOICE   L                 :TZ[tz]|0                                                   
 user                        10 FREE     L  MIS.USER       :TZ[tz]|5                                               
 Ì       2
pha.pu.already.filed    (already.filed) 
[run, ndc.filed]
:TZ[tz]F[tfND]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ndc.filed                   11 FREE     L                 tfND                                                        
 drug.filed                   1 FREE     L                 :TZ[tz]F[tfND]|0                                            
 Ì       2
price.update.data    (price.data) 
[run, ndc]
:TZ[tz]P[tfND]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ndc                         12 FREE     L                 tfND                                                        
 extraction.date              8 DATE     L                 :TZ[tz]P[tfND]|1                                            
 mnemonic                    10 FREE     L                 :TZ[tz]P[tfND]|0                                            
 pkg.size                    13 DECZ     R                 :TZ[tz]P[tfND]|3                                            
 purchase.price               9 DECZ     R                 :TZ[tz]P[tfND]|2                                            
 Ì       2
price.update.data.by.fac    (price.data.by.fac) 
[run,ndc, purchasing.facility]
:TZ[tz]P[tfND]MMFAC[tfmw]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 purchasing.facility         10 FREE     L                 tfmw                                                        
 new.unit.cost                9 DECZ     R                 :TZ[tz]P[tfND]MMFAC[tfmw]|1                                 
 old.cost.up                 10 DECZ     R                 :TZ[tz]P[tfND]MMFAC[tfmw]|2                                 
 old.unit.cost                9 DECZ     R                 :TZ[tz]P[tfND]MMFAC[tfmw]|0                                 
 old.unit.cost.pp             1 YN       L                 :TZ[tz]P[tfND]MMFAC[tfmw]|4                                 
 old.vendor                  11 FREE     L  MIS.VEN        :TZ[tz]P[tfND]MMFAC[tfmw]|3                             
 Ì       2
purchasing.facilities    (purchasing.facilities) 
[run, purchasing.facility.used]
:TZ[tz]PU.FAC[tfmw]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 purchasing.facility.used    10 FREE     L                 tfmw