home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #16 / NN_1992_16.iso / spool / comp / database / 5771 < prev    next >
Encoding:
Text File  |  1992-07-23  |  1.9 KB  |  43 lines
  1. Newsgroups: comp.databases
  2. Path: sparky!uunet!cs.utexas.edu!usc!sdd.hp.com!ux1.cso.uiuc.edu!news.iastate.edu!vincent1.iastate.edu!viking
  3. From: viking@iastate.edu (Dan Sorenson)
  4. Subject: FoxPro, printer not ready error trap
  5. Message-ID: <viking.711947974@vincent1.iastate.edu>
  6. Summary: How can I trap this thing?
  7. Keywords: help, trap, error, printer
  8. Sender: news@news.iastate.edu (USENET News System)
  9. Organization: Iowa State University, Ames IA
  10. Date: Fri, 24 Jul 1992 03:19:34 GMT
  11. Lines: 30
  12.  
  13.     I've a minor problem that's driving me crazy.  I've an application
  14. that will list records to the HP LaserJet IIP on a 286 clone under DOS 4.01,
  15. and this printer is only 4ppm at best.  So I collect the data, list it off,
  16. eject, collect more, list off, eject, etc...  About ten pages into this
  17. dump the dreaded "Printer Not Ready" window comes up.  I want to get rid
  18. of it and just let the thing sit in an idle loop until the printer is ready.
  19.  
  20.     I tried a simple loop like this:
  21. store .f. to canprint
  22. do while .not. canprint
  23.     store printerstatus() to canprint
  24. enddo
  25. release canprint
  26.  
  27.     I think the function was printerstatus() -- it could be something
  28. slightly different.  Anyway, it didn't work, and I got the window after
  29. ten pages again.  This loop was placed right after the eject, and right
  30. before the list off, for what I hoped was maximum effect.  The only
  31. other thing I can think of doing is writing my own error-handling routine,
  32. give an "onerr do myerror" and trap this error and then do the above
  33. routine.  I'm not looking forward to this, though, since if I trap errors
  34. I had better trap them all!  Ugh!  There has to be a simpler method.
  35.  
  36.     Any ideas?
  37.  
  38. <Dan Sorenson, DoD #1066 |"There'll be angels on Ariels in leather>
  39. <z1dan@exnet.iastate.edu | and chrome, Ridin' down from heaven    >
  40. <viking@iastate.edu      | just to carry me home." -- R. Thompson >
  41. < ISU thinks I need more education, which they provide for a fee. >
  42.  
  43.