home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #1 / NN_1993_1.iso / spool / bit / listserv / dbasel / 1444 < prev    next >
Encoding:
Text File  |  1993-01-11  |  2.6 KB  |  68 lines
  1. Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
  2. Path: sparky!uunet!spool.mu.edu!uwm.edu!zaphod.mps.ohio-state.edu!howland.reston.ans.net!paladin.american.edu!auvm!CC.MSSTATE.EDU!JGB1
  3. Message-ID: <9301112149.AA01302@JayRell.CC.MsState.Edu>
  4. Newsgroups: bit.listserv.dbase-l
  5. Date:         Mon, 11 Jan 1993 15:49:47 CST
  6. Sender:       "Discussion on the use of the dBase language and related
  7.               dialects" <DBASE-L@NMSUVM1.BITNET>
  8. From:         John G 'Jay' Burrell <jgb1@CC.MSSTATE.EDU>
  9. Subject:      Re: Question on LOOP
  10. Lines: 56
  11.  
  12. > From DBASE-L@TECMTYVM.MTY.ITESM.MX Mon Jan 11 15:39:26 1993
  13. > Date:         Mon, 11 Jan 1993 16:35:01 -0500
  14. > Reply-To: "Discussion on the use of the dBase language and related
  15. >               dialects" <DBASE-L@TECMTYVM.BITNET>
  16. > Sender: "Discussion on the use of the dBase language and related
  17. >               dialects" <DBASE-L@TECMTYVM.BITNET>
  18. > Subject:      Question on LOOP
  19. > To: Multiple recipients of list DBASE-L <DBASE-L@TECMTYVM.BITNET>
  20. > Content-Length: 889
  21. > X-Lines: 34
  22. >
  23. >      Question on LOOP
  24. > I've using FoxBase+/Mac, trying to develop a program for one of my
  25. > offices, but this should be a generic enough question to apply to any
  26. > XBase dialect.  Sorry if this is a FAQ, but I can't figure out how to
  27. > do a simple task in my program:
  28. >
  29. > During the course of my program I have:
  30. >
  31. > DO WHILE .T.
  32. >  ...
  33. >  ...
  34. >  ...
  35. >     DO WHILE .NOT. FOUND()
  36. >          ...
  37. >          ...
  38. >          ...
  39. >            IF ....
  40. >               LOOP  && To outside loop  <<<<=== EXIT, not LOOP! >>,
  41. >            ELSE                                                   |
  42. >               ...                                                 |
  43. >               ...                                                 |
  44. >               ...                                                 |
  45. >               IF ...                                              |
  46. >                   LOOP  && To inside loop                         |
  47. >               ENDIF                                               |
  48. >            ENDIF                                                  |
  49. >     ENDDO                                                         |
  50. > ENDDO   <<<<<<===================================================='
  51. >
  52. > How can I cause my first LOOP to loop to the outside DO...WHILE loop
  53. > instead of to the inside one?  Thanks in advance for any help!
  54. >
  55. >
  56.  
  57. EXIT will exit the nested loop only, allowing control to remain in the
  58. outside loop!
  59.  
  60. See changes in your code above...
  61.  
  62. Enjoy!
  63.  
  64.  
  65. Jay Burrell                    E-Mail: jgb1@CC.MsState.Edu
  66. Computing Center & Services     Voice: (601) 325-7025
  67. Mississippi State University      Fax: (601) 355-8921
  68.