Hier ein kleines Beispiel

PHP-Code:

d TABKEY          S              4S 0 Dim
(32CTData PerRcd(1
d TABDSC          S              8    Dim(32Alt(TABKEY)  

Das hier muss ans Ende der Quelle gestellt werden.
    
** 
Table of Function Key Values
0049F1                         
0050F2                         
0051F3                         
0052F4                         
0053F5                         
0054F6                         
0055F7                         
0056F8                         
0057F9                         
0058F10                        
0059F11                        
0060F12                        
0063AUTOENT                    
0177F13                        
0178F14                        
0179F15                        
0180F16                        
0181F17                        
0182F18                        
0183F19                        
0184F20                        
0185F21         
0186F22         
0187F23         
0188F24         
0189CLEAR       
0241ENTER       
0243HELP        
0244ROLLDOWN    
0245ROLLUP      
0246
PRINT       
0248HOME