Thanks for the Tip Alastair, that works great.

 

Dan

 

-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Alastair Burr
Sent:
Wednesday, October 20, 2004 11:53 PM
To: RBG7-L Mailing List
Subject: [RBG7-L] - Re: Displaying Running Counts

 

Dan,

 

Try the PAUSE command with the following options:

 

PAUSE 4 USING .vMessage CAPTION .vCaption +
  OPTION METER_VISIBLE ON|METER_TYPE +

  Bar3D|METER_VALUE .vProgress

You'll also need a PAUSE 3 first to set it up before the PAUSE 4

 

Regards,

Alastair.

 

----- Original Message -----

From: Dan

Sent: Thursday, October 21, 2004 3:16 AM

Subject: [RBG7-L] - Displaying Running Counts

 

In Previous versions of rbase when using a declare cursor command to update rows I would set a variable to count down the progress of the update. To display it I would use the write command.  The only way I have found in the new version to display a running count is to use the pause 3 command. 

IE:

set var i=1

set var vrows=rows in audience

fetch cursor1 into vcomboid,vdaypartid

while sqlcode <> 100 and (lastkey(0))<>'[esc]' then

  set var vmess=('Updating Arbitron Dayparts'+(CHAR(013))+(CHAR(013)))

  set var vmess=(.vmess+'Row '+(ctxt(.i))+' of '+(ctxt(.vrows)))

  pause 3 using .vmess

  set var i=(.i+1)

  fetch cursor1 into vcomboid,vdaypartid

endwhile

closewindow

 

This works but I’m wondering if anyone knows of a better way to accomplish this.

 

Thanks Dan

 

 

Reply via email to