Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.1 6/24/83; site lanl-a.UUCP
Path: utzoo!linus!decvax!ittvax!dcdwest!sdcsvax!sdcrdcf!hplabs!hao!seismo!cmcl2!lanl-a!jp
From: jp@lanl-a.UUCP
Newsgroups: net.micro.cpm
Subject: dBASE II v. 2.4 'feature'
Message-ID: <12609@lanl-a.UUCP>
Date: Sun, 26-Aug-84 19:56:21 EDT
Article-I.D.: lanl-a.12609
Posted: Sun Aug 26 19:56:21 1984
Date-Received: Thu, 30-Aug-84 19:42:28 EDT
Organization: Los Alamos National Laboratory
Lines: 22

I believe that I have discovered a feature of dBASE II v. 2.4.
The report command has a new option 'WHILE' <exp>' that terminates the
report as soon as the while condition is not satisfied.  The feature is
that 'WHILE' does not work in combination with 'FOR <exp>'.  I thought
that I would be clever and fix up a way to terminate the report prematurely
by using the patch (I forgot where it comes from) that stores the most recent
keyboard character in a location (337 decimal) that does not get zeroed
by dBASE II.   Then I could set up the report something like:

REPORT FORM TEST FOR LASTNAME='D' WHILE PEEK(337)<>3 TO PRINT

Then, if I was unhappy with the report  I could quit with a CTL-C instead
of waiting for the whole thing to finish or hitting the reset button (not a
good practice if you have recently editted a file.)

Both the 'FOR' and the 'WHILE' options work OK by themselves, but not together
in either order.  
Maybe I ask too much of dBASE II.  Does anyone have a good idea about how 
to interrupt a report output without hitting reset???

Jim Potter  jp@LANL