help to make a condition

Post Reply
User avatar
Silvio.Falconi
Posts: 7104
Joined: Thu Oct 18, 2012 7:17 pm

help to make a condition

Post by Silvio.Falconi »

Insert a code block

I have
sample nLastRecords:= 2000

IF nLastRecords > 0
nInit:=olotto:lastrec()-nLastRecords
nEnd:= olotto:lastrec()
ENDIF


and I must insert this on a codeblock

bFor:= { || recno() <= nInit .and. recno() >= nEnd }

but make error
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 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
User avatar
nageswaragunupudi
Posts: 10691
Joined: Sun Nov 19, 2006 5:22 am
Location: India
Contact:

Re: help to make a condition

Post by nageswaragunupudi »

This is working for me here

Code: Select all | Expand

#include "fivewin.ch"

REQUEST DBFCDX

function Main()

   local bFor, aData
   local nStart, nLast

   USE CUSTOMER NEW SHARED VIA "DBFCDX"

   nStart   := 100
   nLast    := 110

   bFor  := { || RECNO() >= nStart .AND. RECNO() <= nLast }
   aData := FW_DbfToArray( "ID,FIRST,SALARY", bFor )
   XBROWSER aData

return nil
 
Regards

G. N. Rao.
Hyderabad, India
User avatar
Silvio.Falconi
Posts: 7104
Joined: Thu Oct 18, 2012 7:17 pm

Re: help to make a condition

Post by Silvio.Falconi »

nageswaragunupudi wrote:This is working for me here

Code: Select all | Expand

#include "fivewin.ch"

REQUEST DBFCDX

function Main()

   local bFor, aData
   local nStart, nLast

   USE CUSTOMER NEW SHARED VIA "DBFCDX"

   nStart   := 100
   nLast    := 110

   bFor  := { || RECNO() >= nStart .AND. RECNO() <= nLast }
   aData := FW_DbfToArray( "ID,FIRST,SALARY", bFor )
   XBROWSER aData

return nil
 
Thanks
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 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
Post Reply