FiveTech Software tech support forums

... mui bien! #include "FiveWin.ch" #include "Fileio.ch" ANNOUNCE RDDSYS // IDEM: ANNOUNCE FPTCDX REQUEST OrdKeyNo, OrdKeyCount, OrdCreate, OrdKeyGoto // Para ListBox REQUEST DBFCDX, DBFFPT FUNCTION Main() LOCAL oBrw, oDlgMain, uData SET EXCLUSIVE OFF SET DELETED ON SET OPTIMIZE ...

nageswaragunupudi wrote:if DBFCDX

Code: Select all  Expand view  RUN

INDEX ON FIELD JUMP TAG JUMPTMP TO TMP TEMPORARY

OR
Using this syntax:

Code: Select all  Expand view  RUN

METOD CreateIndex( cFile, cTag, cKey, lUnique, lDescend, lMemory )

Code: Select all  Expand view  RUN

oTmp4:CreateIndex( "TMP", "JUMPTMP", "JUMP", nil, nil, .T. )

thanks

if DBFCDX

Code: Select all  Expand view  RUN

INDEX ON FIELD JUMP TAG JUMPTMP TO TMP TEMPORARY

OR
Using this syntax:

Code: Select all  Expand view  RUN

METOD CreateIndex( cFile, cTag, cKey, lUnique, lDescend, lMemory )

Code: Select all  Expand view  RUN

oTmp4:CreateIndex( "TMP", "JUMPTMP", "JUMP", nil, nil, .T. )

I use tdatabase

Select( oTemp4:nArea )
index on oTemp4:jump To Temp

why make error ?

... elseif !Empty(cField1 ) .and. !Empty(cField2 ) cExpression:=(cCampo1 +'+'+cCampo2) elseif !Empty(cField1 ) cExpression:=(cCampo1) Endif //ordcreate bCode := "{ || " + cExpression + "}" OrdCondSet(cFor,bFor,,,,, RECNO(),,,, ) OrdCreate( , cneworder, cExpression, &bCode ...

ooppss
you're right

hi Silvio, i think 3rd. Parameter "cIndexKey" does not use PATH OrdCreate( ::cFilesPath+::aIdx[ i, 2, k, 3 ], ;           ::aIdx[ i, 2, k, 2 ],;           ::cFilesPath+::aIdx[ i, 2, k, 1 ],;           &bCode ) OrdCreate( ...

... "{ || " + ::aIdx[ i, 2, k, 1 ] + "}"             OrdCondSet(cFor,bFor,,,,, RECNO(),,,, )             OrdCreate( ::cFilesPath+::aIdx[ i, 2, k, 3 ], ::aIdx[ i, 2, k, 2 ],  ::cFilesPath+::aIdx[ i, 2, k, 1 ], &bCode )  ...

... talk off set echo off set bell off set confirm off set wrap on set date french set date format 'dd/mm/yyyy' set century on Request DBFCDX, DBFFPT, OrdCreate, OrdKeyCount, OrdKeyNo, OrdKeyGoto RddSetDefault( 'DBFCDX') set deleted on set autopen off set exclusive on Set optimize on cursorwait() readinsert( ...

cfor := "!Deleted()"
bFor := "{ || " + cfor + "}"

OrdCondSet(cFor,bFor,,,,, RECNO(),,,, )

How I can Order with ordcreate the condition "!deleted()" ? I made I insert all ::aIdx on an array type { "RESERVA" , { { "Rooms_id+Dtos(Check_in)" , "room_in" , "Reserva" } } } FOR ...

... field->COD TO data I get server error: Error: Erro de cria‡Ćo filename: data.ntx called from: ../../apache.prg, (b)MAIN, line: 50 called from: ORDCREATE, line: 0 called from: ../../../rddord.prg, DBCREATEINDEX, line: 0 called from: pcode.hrb, MAIN, line: 43 called from: HB_HRBDO, line: 0 called ...

Hola Despues de mucho probar encontre esto: La base de datos tiene un indice .CDX construido de esta manera Ordcreate(".\data\codgrup","ID", "codgrup->id" ) Ordcreate(".\data\codgrup","DESCR", "codgrup->descgrup" ...

... DBUSEAREA(.T.,,".\FINAL\"+cFile) <- (AQUI SE PRODUCE EL ERROR) //DBUSEAREA(.T.,,".\FINAL\"+cFile+".DBF") ordCreate(".\FINAL\"+cFile,"RUT","(cFile)->RUT",{|| (cFile)->RUT}) ordCreate(".\FINAL\"+cFile,"NOMBRE","(cFile)->NOMBRE",{|| ...

... siguiente error Stack Calls =========== Called from: => DESCEND( 0 ) Called from: .\___x_54_d.prg => (b)BUILDINDEX( 772 ) Called from: => ORDCREATE( 0 ) Called from: ../../../rddord.prg => DBCREATEINDEX( 0 ) donde encuentro rddord.prg para ver el dbcreateindex () cual es la solución ...