home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #19 / NN_1992_19.iso / spool / comp / database / informix / 1846 < prev    next >
Encoding:
Internet Message Format  |  1992-08-31  |  1.5 KB
  1. Path: sparky!uunet!oracle!pyramid!infmx!news
  2. From: cortesi@informix.com (David Cortesi)
  3. Newsgroups: comp.databases.informix
  4. Subject: Re: Why does this not work on one machine?
  5. Message-ID: <1992Aug31.190029.25872@informix.com>
  6. Date: 31 Aug 92 19:00:29 GMT
  7. References: <9208281432.AA00270@salmon.demon.co.uk>
  8. Sender: news@informix.com (Usenet News)
  9. Reply-To: cortesi@informix.com
  10. Organization: Informix Software, Inc.
  11. Lines: 35
  12.  
  13. In article <9208281432.AA00270@salmon.demon.co.uk> neil@salmon.demon.co.uk
  14. ("Neil S. Briscoe") complains that the following code doesn't
  15. work on some machines:
  16. >     ON KEY (CONTROL-O)
  17. >     DISPLAY FORM sptq_frm_
  18. >     CALL short_query("Y", "N")
  19. >     CALL make_pat_name()
  20. >     CALL disp_patient()
  21. >     DISPLAY FORM add_appt_frm_
  22. >     DISPLAY diary_.* TO sc_find.*
  23. >     CALL disp_instruct()
  24. >     EXIT INPUT
  25.  
  26. To me the idea of displaying form "b" from within
  27. an INPUT statement that is using form "a"; and then
  28. repainting form "a"; is so bizarre it would never have
  29. occurred to me -- nor, I would guess, to the developers...
  30.  
  31. Why f'r'evvins sake don't you open a subordinate window?
  32. The code comes out shorter by a bit.
  33.  
  34. >     ON KEY (CONTROL-O)
  35. > --     DISPLAY FORM sptq_frm_
  36.     OPEN WINDOW sptq AT 1,1 USING FORM "sptq"
  37. >     CALL short_query("Y", "N")
  38. >     CALL make_pat_name()
  39. >     CALL disp_patient()
  40. > --     DISPLAY FORM add_appt_frm_
  41. > --     DISPLAY diary_.* TO sc_find.*
  42.     CLOSE WINDOW sptq
  43. >     CALL disp_instruct()
  44. >     EXIT INPUT
  45.  
  46. But then maybe I don't understand the whole point (as for
  47. example I don't see why the EXIT INPUT is there...)
  48.