home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #19 / NN_1992_19.iso / spool / comp / database / 6439 < prev    next >
Encoding:
Text File  |  1992-08-30  |  1.5 KB  |  42 lines
  1. Newsgroups: comp.databases
  2. Path: sparky!uunet!kithrup!stanford.edu!ames!pacbell.com!network.ucsd.edu!munnari.oz.au!metro!seagoon.newcastle.edu.au!cc.newcastle.edu.au!cslib
  3. From: cslib@cc.newcastle.edu.au (DOUGLAS SCOTT)
  4. Subject: Help with Clipper5.01!!
  5. Message-ID: <1992Aug29.161928.1@cc.newcastle.edu.au>
  6. Summary: Multiple-to-single reads and knowing the variable's value
  7. Keywords: Clipper, Read
  8. Lines: 28
  9. Sender: news@seagoon.newcastle.edu.au
  10. Reply-To: john@pleiades.newcastle.edu.au
  11. Organization: University of Newcastle, AUSTRALIA
  12. Date: Sat, 29 Aug 1992 06:19:28 GMT
  13.  
  14.  
  15.     I am new to clipper and have one major question. How can I perform
  16.   a multiple read and still be able to obtain the variables that are read?
  17.  
  18.   Example:    @ 1,1 SAY "Enter first variable:" COLOR "w+/b"
  19.           @ 1,20 GET M->var1 PICTURE "XXXX" COLOR "bg+/b"
  20.           
  21.           IF M->var1 == "TEST"
  22.              @ 2,1 SAY "Enter second variable:" COLOR "w+/b"
  23.              @ 2,20 GET M->var2 PICTURE "9999" COLOR "bg+/b"
  24.               ENDIF
  25.  
  26.           READ
  27.  
  28.  
  29.     All I want to do is to be able to check each variable as it is entered
  30.   in the respective field. Is there an easy way?
  31.  
  32.     I tried LOOPER() in the super.lib, but although it will give the effect
  33.   of multiple reads with a single read statement, it still does not allow you
  34.   to obtain the entered value before terminating the complete read.
  35.  
  36.     If anyone knows of an easy way of doing this I would appreciate it if
  37.    they could tell me how, or even better show me some source code.
  38.  
  39.     Thanks for any help.
  40.  
  41.         Jonathan Coombes
  42.