FiveTech Software tech support forums

A ver creo que me he explicado mal. Mi consulta es para ver si alguien es capaz de decirme como puedo hacer que TRANSDAT funcione con los indices sin que me de error de longitud de datos y así eliminar el segundo parametro. Tiene que ser por culpa del tipo de datos que devuelve ...

"INDEX ON TransDat(APELLIDOS+NOMBRE,.T.) TO ..." pero no puedio hacer "INDEX ON TransDat(APELLIDOS)+TransDat(NOMBRE), .T.)", que es en realidad lo que deseo hacer. ES QUE LA FUNCION QUE DEFINISTES TIENE DOS PARÁMETROS, ...

PRUEBA CON

INDEX ON TransDat(_FIELD->APELLIDOS)+TransDat(_FIELD->NOMBRE), .T.)

NO SE, PUDIERA TRABAJAR

... y asi te evitarias colocar la funcion en el indice y ganarias mas performace append blank base->Campo := apellido + nombre base->Campo2 := transdat(apellido) + transdat(nombre) y crea ambos indices.. espero que te sirva..

... trimeada (sin espacios blancos por delante ni por detras) en mayusculas y sin accentos (Lo ideal para indices), ademas, puedo hacer "INDEX ON TransDat(APELLIDOS+NOMBRE,.T.) TO ..." pero no puedio hacer "INDEX ON TransDat(APELLIDOS)+TransDat(NOMBRE), .T.)", que es en realidad ...

Una aclaración, verás que en la funcion TransDat() pone:

k = 15 ;

Donde debería poner:

k = 13 ;

Ahí no está el problema, sólo ha sido un problema de transcripción.

... == ' ' && nHasta > nDesde ) // nHasta-1 PORQUE EMPIEZA POR 0 --nHasta ; *pwLen = nHasta - nDesde ; return szText+nDesde ; } CLIPPER TransDat( PARAMS ) // ( LPSTR cText, BOOL lMayusculas = .T.) { WORD hancho = _parclen( 1 ) ; LPSTR cText = SinEspa( _parc( 1 ), &hancho ) ; BOOL ...

... == ' ' && nHasta > nDesde ) // nHasta-1 PORQUE EMPIEZA POR 0 --nHasta ; *pwLen = nHasta - nDesde ; return szText+nDesde ; } CLIPPER TransDat( PARAMS ) // ( LPSTR cText, BOOL lMayusculas = .T.) { WORD hancho = _parclen( 1 ) ; LPSTR cText = SinEspa( _parc( 1 ), &hancho ) ; BOOL ...