sHelp
                                     LAB.C.NPR
       2
   lab.c.npr.main
     lab.c.npr.elements
       lab.c.npr.fields
     lab.c.npr.other.dpms
     lab.c.npr.physical.levels

 Ì       2
lab.c.npr.main    (main) 
[dpm]
&SNPR[if]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 dpm                         15 URN      L  NPR.DPM        if                                                      
 active                       1 YN       L                 &SNPR[if]|0                                                 
 last.update                  9 TIME     L                 &SNPR[if]UPD                                                
 last.update.date             8 DATE     L                 VAL=%Z.date.in.magic(@LAB.C.NPR.last.update)                
 name                        30 FREE     L                 &SNPR[if]|1                                                 

 Ì   €�     2
lab.c.npr.elements    (elements) 
[dpm, ele.data.name]
&SNPR[if]E[snprE]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ele.data.name               30 FREE     L                 snprE                                                       

 Ì   €�     2
lab.c.npr.fields    (fields) 
[dpm,ele.data.name, ele.field.no]
&SNPR[if]E[snprE,snprF]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ele.field.no                 2 PINT     R                 snprF                                                       
 ele.field.name              20 FREE     L                 &SNPR[if]E[snprE,snprF]                                     

 Ì   €�     2
lab.c.npr.other.dpms    (other.dpms) 
[dpm, other.dpm]
&SNPR[if]D[if]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 other.dpm                   15 URN      L  NPR.DPM        if                                                      

 Ì   €�     2
lab.c.npr.physical.levels    (physical.levels) 
[dpm, phy.level]
&SNPR[if]P[snprL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 phy.level                   25 FREE     L                 snprL