Ich poste mal meine Definitionen ohne die einzelnen Felder

Dateiebene

PHP-Code:
A                                      DSPSIZ(27 132 *DS4) 
A                                      PRINT               
A                                      INDARA 
SFL01C
PHP-Code:
A                                      CF01(01 'HELP')                   
A                                      CF03(03 'EXIT')                   
A                                      ROLLDOWN(25)                      
A                                      ROLLUP(26)                        
A                                      CF04(04 'Values')                 
A                                      CF05(05 'REFRESH')                
A                                      CF21(21 'RIGHT MOUSE DBLCLICK')   
A                                      CF22(22 'LEFT MOUSE DBLCLICK')    
A  32                                CF06(06 'ADD')                    
A                                      CF10(10 'Excel')                  
A  37                                CF02(02 'Mode')                   
A                                      RTNCSRLOC(&CSRRCD &CSRFLD &CSRPOS)
A                                      CSRLOC(CSRLIN     CSRCOL)         
A                                      OVERLAY                   
A                                      PROTECT                     
A                                      SFLCSRRRN(&SF@RRN)          
A  87                                  SFLDSP                      
A  88                                  SFLDSPCTL                   
A N88                                  SFLCLR                      
A  89                                  SFLEND(*MORE)               
A                                      SFLSIZ(0015)                
A                                      SFLPAG(0015)                
A                                      MOUBTN(*ULD CF22)           
A                                      MOUBTN(*URD CF21)           
A                                      MOUBTN(*URP CF04) 
FMT01
PHP-Code:
A                                      TEXT('KEY INPUT SCREEN')          
A                                      CF01(01 'HELP')                   
A                                      CF03(03 'EXIT')                   
A  35                                 CF04(04 'Values')                 
A  36                                 CF09(09 'CONFIRM DELETE')         
A                                      CF12(12 'Cancel')                 
A                                      MOUBTN(*URD CF12)                 
A  35                                 MOUBTN(*URP CF04)                 
A                                      CHANGE(70)                        
A                                      RTNCSRLOC(&CSRRCD &CSRFLD &CSRPOS)
A                                      CSRLOC(CSRLIN     CSRCOL)         
A                                      OVERLAY                           
A                                      PROTECT                           
A                                      ERASE(SFL01 SFL01C)