Hallo,

ich wollte bei leerem Sfl, einfach einen Text ausgeben.
Aber leider Funktioniert das anscheinend nur bei mir in
einem Window.


Code:
A          R SFL1CLEAR                                                   
A                                      SLNO(03)                          
A                                      CLRL(07)                          
A                                      OVERLAY                           
A                                                                        
A          R SFL1EMPTY                                                   
A                                      OVERLAY                           
A                                 10 30'!! no records found !!'          
A                                      DSPATR(BL)                        
A                                      COLOR(RED)                        
A          R FMTC1                     SFLCTL(FMTS1)
A                                      SFLSIZ(0015) 
A                                      SFLPAG(0014) 
A                                      CHANGE(05)   
A  20                                  SFLDSP       
A N20                                  SFLCLR       
A  21                                  SFLDSPCTL  
A                                      OVERLAY    


IF  (SF#1 = 0);   
  *IN20 = *OFF;   
  WRITE SFL1CLEAR;
  WRITE SFL1EMPTY;
ELSE;             
  *IN20 = *ON;    
ENDIF;
Dank und Gruß

Tarki