FiveTech Software tech support forums

Posted: **Wed Jan 14, 2009 5:23 pm**

Hola,

Estou testando esta funçao com FwPpc:

********************************************************************************
FUNCTION LoadDbf()
********************************************************************************
  LOCAL aVars  := {=>}
  LOCAL nField := FCount()
  LOCAL nX := 1
   FOR nX := 1 TO  nField
       aVars[FieldName(nX)] := FieldGet(nX)
   NEXT

Return aVars

, mas, estas retornando el erro:

Code: Select all

Erro de limite
array assign
   Args:
     [   1] = H   
     [   2] = C   DATAENTR
     [   3] = D   13/01/2009

stack calls:
LOADDBF(48)
VERSIS(29)
(b)MAIN(97)
TWINDOW:ACTIVATE(0)
MAIN(97)

.Prg

Code: Select all

Local aVars
dbUseArea(.T.,"DBFCDX","SbInfo.Dbf",, .F.)
     aVars := LoadDbf()

Struct del BD SBInfo.Dbf

Code: Select all

'DataEntr', 'd',  08,  0

O que podes estar havendo ?

Saluds, Ale

Posted: **Wed Jan 14, 2009 5:57 pm**

I think that
LOCAL aVars := {=>}
is only for xHarbour not for harbour , you have to chek how works HASH for HArbour

Regards Maurizio

Posted: **Wed Jan 14, 2009 6:17 pm**

Gracias Maurizio

Saluds, Ale

Posted: **Fri Jan 16, 2009 11:54 am**

No consegui, encontrar nenhuma documentação do harbour para uso de Hash, alguem pode me alguma dica ?

Saluds, Ale

FiveTech Software tech support forums

Problema con uso del Hash .....

Problema con uso del Hash .....

Re: Problema con uso del Hash .....

Re: Problema con uso del Hash .....

Re: Problema con uso del Hash .....