Interrupt button on PROMPT statement in Dynamic-4GL
Posted in 1998
Candy McCall — — source: Informix-list mailing list archive (1991-1998)
The interrupt button (Button on right) does not appear to be working on a PROMPT statement in Dynamic-4GL. However, pressing the interrupt key does work on the prompt statement. We're using SCO OpenServer 5.0.4. Here is a test case demonstrating the behavior: MAIN DEFINE answer CHAR(1) --# --# --#-----Initialize Dynamic-4GL --# --# CALL fgl_init4js() --# CALL fgl_settitle("Test Prompt") DEFER INTERRUPT WHILE TRUE LET int_flag = FALSE PROMPT "Press Interrupt key or Interrupt button to exit." FOR CHAR answer IF int_flag THEN LET int_flag = FALSE EXIT WHILE END IF END WHILE END MAIN Thanks for any help in verifying this problem! Candy -- Candy McCall ONLINE Computing, Inc. (candym@olcinc.com)