Re: How to loop through records in a data block?

From: Steve Cosner <stevec_at_zimmer.csufresno.edu>
Date: 24 Apr 1999 19:47:47 GMT
Message-ID: <7ft753$ifi$1_at_nntp.csufresno.edu>


In article <37212bdb.0_at_ecn.ab.ca>, <suisum_at_ecn.ab.ca> wrote:
>I need to loop through all records in a data block. What is the condition
>for the WHILE loop, please?
>
>I have tried WHILE :SYSTEM.LAST_RECORD = 'FALSE' LOOP
>or WHILE :data_block.item IS NOT NULL LOOP

Go_Block('Your_Block');
First_Record;
IF :System.Record_Status<>'NEW' then
  Loop

    [Quoted]
  • do something here -- Exit when :system.last_record = 'TRUE'; Next_Record; End Loop; First_Record;

Steve Cosner



http://members.aol.com/stevec5088
[Quoted] Downloadable Quick Access utility form: Display and update any table. Received on Sat Apr 24 1999 - 21:47:47 CEST

Original text of this message