topic-25557

Posts: 7317

Joined: Thu Oct 18, 2012 07:17 PM

RANDOMIZE
Posted: Thu Jan 31, 2013 10:24 AM

I have a dbf with some record and I must take a record from this archive but on randomize
How I can make ?

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

sambomb

Posts: 389

Joined: Mon Oct 13, 2008 11:26 AM

Re: RANDOMIZE
Posted: Thu Jan 31, 2013 10:49 AM

Select YOURDBF
DbGoTo( nRandom(LastRec()-1)+1 )

nRandom is 0 to nParam
LastRec() is your total recs
You need the -1 on LastRec to compensate the 0 start from nRandom and the +1 is to compensate the -1

Email: SamirSSabreu@gmail.com
xHarbour 1.2.3 + Fwhh 20.2

Silvio.Falconi

Posts: 7317

Joined: Thu Oct 18, 2012 07:17 PM

Re: RANDOMIZE
Posted: Thu Jan 31, 2013 12:48 PM

NRANDOM HAVE PROBLEM
i REMEMBER THERE WAS ANOTHER WITH HB_

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

BeoBeo

Posts: 6

Joined: Tue Oct 09, 2012 09:59 AM

Re: RANDOMIZE
Posted: Thu Jan 31, 2013 01:11 PM

Why u cry

sambomb

Posts: 389

Joined: Mon Oct 13, 2008 11:26 AM

Re: RANDOMIZE
Posted: Thu Jan 31, 2013 01:42 PM

I never had a problem with nRandom, but...

DbGoTo( HB_Random(1, LastRec() ) ) should solve too.

Email: SamirSSabreu@gmail.com
xHarbour 1.2.3 + Fwhh 20.2

James Bott

Posts: 4840

Joined: Fri Nov 18, 2005 04:52 PM

Re: RANDOMIZE
Posted: Thu Jan 31, 2013 02:56 PM

I think you are going to need to convert the values to integers.

And, I assume for what you want you will need to generate an array so you can check for duplicates and not add them. You are looking to create an array of unique values.

James

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10

FiveTech Support Forums

Continue the discussion