Re: Why does this not work on one machine?
Posted in 1992
In article <9208281432.AA00270@salmon.demon.co.uk> neil@salmon.demon.co.uk ("Neil S. Briscoe") complains that the following code doesn't work on some machines: > ON KEY (CONTROL-O) > DISPLAY FORM sptq_frm_ > CALL short_query("Y", "N") > CALL make_pat_name() > CALL disp_patient() > DISPLAY FORM add_appt_frm_ > DISPLAY diary_.* TO sc_find.* > CALL disp_instruct() > EXIT INPUT To me the idea of displaying form "b" from within an INPUT statement that is using form "a"; and then repainting form "a"; is so bizarre it would never have occurred to me -- nor, I would guess, to the developers... Why f'r'evvins sake don't you open a subordinate window? The code comes out shorter by a bit. > ON KEY (CONTROL-O) > -- DISPLAY FORM sptq_frm_ OPEN WINDOW sptq AT 1,1 USING FORM "sptq" > CALL short_query("Y", "N") > CALL make_pat_name() > CALL disp_patient() > -- DISPLAY FORM add_appt_frm_ > -- DISPLAY diary_.* TO sc_find.* CLOSE WINDOW sptq > CALL disp_instruct() > EXIT INPUT But then maybe I don't understand the whole point (as for example I don't see why the EXIT INPUT is there...)