sHelp
                                     AP.PROGRAM
     i   2
   ap.custom.program.dictionary

 Ì     i   2
ap.custom.program.dictionary    (main) 
[mnemonic]
&KF.PG[kfpg]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mnemonic                    15 FREE     L                 kfpg                                                        
 active                       1 YN       L                 &KF.PG[kfpg]|0                                              
 cust.pgm.type               10 CHOICE   L                 &KF.PG[kfpg]|3                                              
 last.update                 10 PINT     R                 &KF.PG[kfpg]UPD                                             
 magic.pgm.name              50 FREE     L                 &KF.PG[kfpg]|4                                              
 name                        30 FREE     L                 &KF.PG[kfpg]|1                                              
 pgm.type                    10 CHOICE   L                 &KF.PG[kfpg]|3                                              
 source                       1 CHOICE   L                 &KF.PG[kfpg]|2                                              
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 ap.program.type.index              [pgm.type,mnemonic]
   pgm.type.x                         &KF.PGI[kfpgT,kfpg]