Guten Morgen,

auch mit ausgeschaltetem SFLDSP bleibt eine Subfile beim nächsten WXFMT auf dem Bildschirm.
Die Kontrollsatz Defi
Code:
        R LISTECTL                  SFLCTL(LISTESFL)                   
                                    SFLSIZ(0098)                       
                                    SFLPAG(0005)                       
                                    CA03                               
                                    CF06                               
                                    CA12                               
                                    RTNCSRLOC(&RCDFMT &RCDFLD &RCDPOS) 
                                    CSRLOC(POSY       POSX)            
                                    OVERLAY                            
90                                  SFLDSP                             
91                                  SFLDSPCTL                          
92                                  SFLCLR                             
99                                  SFLEND(*MORE)                      
          RCDFMT        10A  H                                         
          RCDFLD        10A  H                                         
          RCDPOS         4S 0H                                         
          POSY           3S 0H                                         
          POSX           3S 0H                                         
          RCDNR1         4S 0H      SFLRCDNBR(CURSOR)
Die Bezugszahlen habe ich im Programm benamst

Code:
d INDPTR          S               *   INZ(%ADDR(*IN))   
                                                        
D BEZUGSZ         ds                  based(IndPtr)     
d  SFLDSP                90     90                      
d  SFLDSPCTL             91     91                      
d  SFLCLR                92     92                      
D  MSGALARM              96     96                      
D  MSGSFLEND             97     97                      
D  SFLEND                99     99
Vor dem nächsten EXFMT rufe ich eine Prozedur auf:

Code:
p SFLClear        b   
d                 pi  
 /FREE                
    sfldspctl = *off; 
    sfldsp    = *off; 
    sflclr = *on;     
    RCDNR1 = 0;       
    CTLHEADA = ND;    
    write Listectl;   
    sfldspctl = *on;  
    sflclr = *off;    
                      
 /END-FREE            
                      
p SFLclear        e
Kann mir jemand erklären, warum das Subfile trotzdem stehen bleibt?

Herzlichen Dank im Voraus

Hubert