BUG czy mala niedorobka?

[Tomasz Fidecki <tomek@fsli1.fsl.com.pl>]

Witam

Natknalem sie dzis na ciekawy problem. Proponuje wyprobowac ponizszy kod,
a nastepnie zakomentowac linie 23, odkomentowac linie 22 i sprobowac
ponownie. Efekt jest dla mnie zaskakujacy i chetnie wyslucham refleksji.  


/* 1*/  DEF VAR pole-1 AS CHAR.
/* 2*/  DEF VAR pole-2 AS CHAR.
/* 3*/
/* 4*/  DEF FRAME frame-1
/* 5*/    pole-1
/* 6*/    pole-2
/* 7*/  WITH CENTERED.
/* 8*/
/* 9*/  ON RETURN OF pole-1 IN FRAME frame-1 DO:
/*10*/    ASSIGN pole-1.
/*11*/    ENABLE pole-2 WITH FRAME frame-1.
/*12*/    DISABLE pole-1 WITH FRAME frame-1.
/*13*/    APPLY "ENTRY" TO pole-2.
/*14*/  END.
/*15*/
/*16*/  ON RETURN OF pole-2 IN FRAME frame-1 DO:
/*17*/    ASSIGN pole-2.
/*18*/    DISABLE pole-2 WITH FRAME frame-1.
/*19*/    APPLY "WINDOW-CLOSE" TO DEFAULT-WINDOW.
/*20*/  END.
/*21*/
/*22*/  /* UPDATE pole-1 WITH FRAME frame-1. */ 
/*23*/  ENABLE pole-1 WITH FRAME frame-1. 
/*24*/
/*25*/  WAIT-FOR WINDOW-CLOSE OF DEFAULT-WINDOW.
/*26*/  MESSAGE "Koniec" VIEW-AS ALERT-BOX.


Pozdrawiam

Tomasz Fidecki                          phone (voice)  +48 22 6404728 
Financial Services LTD                  mailto:tomek@fsl.com.pl 
Marynarska 21 
02-674 Warsaw Poland