topic-7108

Posts: 4840

Joined: Fri Nov 18, 2005 04:52 PM

Index problem with ver 7.05
Posted: Thu May 24, 2007 06:27 PM

I am getting an undefined function error when the function is in an index definition. Here is the index definition:

ref + strzero( recno(), 7)

"ref" is a fieldname.

When using TDatabase's addIndex() method I get this error:

Code: Select all Collapse

Application
===========
   Path and name: C:\Program Files\TP7a\tp7.exe (32 bits)
   Size: 4,122,112 bytes
   Time from start: 0 hours 0 mins 9 secs 
   Error occurred at: 05/24/2007, 10:10:03
   Error description: Error BASE/1001  Undefined function: RECNO

Stack Calls
===========
   Called from:  => RECNO(0)
   Called from:  => ORDLISTADD(0)
   Called from: DATABASE.PRG => (b)TDATABASE:TDATABASE(0)

This index was working in previous versions without problems.

Here is the sample test program I am using:

Code: Select all Collapse

#include "fivewin.ch"

function main()
   local words

   use words new shared
   database words
   words:addIndex("words")  // crashes here

   msgInfo( "OK" )

return nil

I am using FWH and xHarbour with the Borland compiler and NTX indexes. I don't know if this is a FWH or a xHarbour issue.

Anyone else having a similar problem?

James

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10

Antonio Linares

Posts: 44158