FIND()

[PILO]

Hola, busco un poco de ayuda
En xbase++ utilizaba esto con el campo indice selecionado
find(nn_ofi) // buscaba el valor completo de la variable "ES34343434"
if found() // si estaba todo el valor igual que ne la variable entraba sino no entraba
end if
find(nn_ofi) // buscaba el valor completo de la variable "ES34"
if found() // si estaba solo esto pera faltaba los demas no entra
end if
En Xailer
find(nn_ofi) // buscaba el valor completo de la variable "ES34343434"
if found() // si estaba todo el valor igual que ne la variable entraba sino no entraba
end if
find(nn_ofi) // si busco el valor completo de la variable "ES34"
if found() // si estaba las 4 primeras tambien me netra y no quiero que entre
end if
Alguien me puede ayudar de como hacerlo, para que pase lo del principio
Gracias
--

[jasm]

Pilo,
¿Find()?
Que yo sepa esa función no existe ni en Alaska xBase++ ni en Xailer.
Existe el comando FIND, pero está obsoleto desde Clipper 5.0.
Supongo que te refieres a DbSeek.
Para hacer lo que quieres (tanto en Alaska como en Xailer):
a) Establece SET SOFTSEEK OFF.
o bien,
b) Usa el segundo parámetro de DbSeek a .F. ---> DbSeek( nn_ofi, .F. )
Saludos
José A. Suárez

[PILO]

Gracias Jose alfonso
"José Alfonso Suárez Moreno" <jasm@tpvsoft.com> escribió en el mensaje
news:[email=4585c907@news.xailer.com...]4585c907@news.xailer.com...[/email]
> Pilo,
>
> ¿Find()?
>
> Que yo sepa esa función no existe ni en Alaska xBase++ ni en Xailer.
> Existe el comando FIND, pero está obsoleto desde Clipper 5.0.
>
> Supongo que te refieres a DbSeek.
>
> Para hacer lo que quieres (tanto en Alaska como en Xailer):
>
> a) Establece SET SOFTSEEK OFF.
>
> o bien,
>
> b) Usa el segundo parámetro de DbSeek a .F. ---> DbSeek( nn_ofi, .F. )
>
> Saludos
>
> José A. Suárez

[PILO]

"José Alfonso Suárez Moreno" <jasm@tpvsoft.com> escribió en el mensaje news:[email=4585c907@news.xailer.com...]4585c907@news.xailer.com...[/email]
>
> b) Usa el segundo parámetro de DbSeek a .F. ---> DbSeek( nn_ofi, .F. )
IF :seek(::oEBCodigoAjeno:Value) UTILIZANDO ESTA
SI EL VALOR ES "ES34" Y EL ORIGINAL ES "ES343434"
ME LO SELECIONA Y LO QUE YO QUIERO HACER ES
SI EL VALOR ES "ES34" Y EL ORIGINAL ES "ES343434" NO LO TIENE QUE SELECCIONAR
PERO SI EL VALOR ES "ES343434" Y EL ORIGINAL ES "ES343434" SI LO TIENE QUE SELECCIONAR
LO QUE ME DISTES ANTE NO ME FUNCIONA COMO QUIERO
--

[zeasoftware]

Lo que quieres es un abusqueda exacta:
DbSeek( nn_ofi, .t. )
de esta manera si lo que buscas no es exactamente igual a lo que tienes an la DBF regresa que no existe.
Te recomiendo desempolvar tu libro de Clipper, ya que hay mucha similitud con Xailer.
Si gustas te podria mandar los archivos NG que tengo, y el program WNG para visualizar en windows.
Saludos.
--
Ramón Zea
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoft/
"PILO" <srmpilo@hotmail.com> escribió en el mensaje news:[email=4585d6c6@news.xailer.com...]4585d6c6@news.xailer.com...[/email]
"José Alfonso Suárez Moreno" <jasm@tpvsoft.com> escribió en el mensaje news:[email=4585c907@news.xailer.com...]4585c907@news.xailer.com...[/email]
>
> b) Usa el segundo parámetro de DbSeek a .F. ---> DbSeek( nn_ofi, ..F. )
IF :seek(::oEBCodigoAjeno:Value) UTILIZANDO ESTA
SI EL VALOR ES "ES34" Y EL ORIGINAL ES "ES343434"
ME LO SELECIONA Y LO QUE YO QUIERO HACER ES
SI EL VALOR ES "ES34" Y EL ORIGINAL ES "ES343434" NO LO TIENE QUE SELECCIONAR
PERO SI EL VALOR ES "ES343434" Y EL ORIGINAL ES "ES343434" SI LO TIENE QUE SELECCIONAR
LO QUE ME DISTES ANTE NO ME FUNCIONA COMO QUIERO
--

[Xavi[1]]

Si no se activa SET EXACT ON
DBSeek compara con "=" no con "=="
MsgInfo("ES343434" = "ES34") => TRUE
MsgInfo("ES343434" == "ES34") => FALSE
Con lo que.-
DBSeek( PadR(nn_ofi, x) ) => Si x == 8; DBSeek( "ES34 " )
Donde x es el tamaño del campo indexado que siempre estará justificado con espacios.
Es DBF
Un saludo
Xavi
ramonzea escribió:
> Lo que quieres es un abusqueda exacta:
>
> DbSeek( nn_ofi, .t. )
> de esta manera si lo que buscas no es exactamente igual a lo que tienes
> an la DBF regresa que no existe.
>
> Te recomiendo desempolvar tu libro de Clipper, ya que hay mucha
> similitud con Xailer.
>
> Si gustas te podria mandar los archivos NG que tengo, y el program WNG
> para visualizar en windows.
>
> Saludos.
> --
> Ramón Zea
> ramonzea@yahoo.com <mailto:ramonzea@yahoo.com>
> zeasoftware@hotmail.com <mailto:zeasoftware@hotmail.com>
> zeasoft.movil@hotmail.com <mailto:zeasoft.movil@hotmail.com>
> http://www.paginasprodigy..com/zeasoft/
> <http://www.paginasprodigy.com/zeasoft/>
>
> "PILO" <srmpilo@hotmail.com <mailto:srmpilo@hotmail.com>> escribió
> en el mensaje news:[email=4585d6c6@news.xailer.com....]4585d6c6@news.xailer.com....[/email]
>
> "José Alfonso Suárez Moreno" <jasm@tpvsoft.com
> <mailto:jasm@tpvsoft.com>> escribió en el mensaje
> news:[email=4585c907@news.xailer.com...]4585c907@news.xailer.com...[/email]
> >
> > b) Usa el segundo parámetro de DbSeek a .F. ---> DbSeek( nn_ofi,
> .F. )
> IF :seek(::oEBCodigoAjeno:Value) UTILIZANDO ESTA
> SI EL VALOR ES "ES34" Y EL ORIGINAL ES "ES343434"
> ME LO SELECIONA Y LO QUE YO QUIERO HACER ES
> SI EL VALOR ES "ES34" Y EL ORIGINAL ES "ES343434" NO LO TIENE QUE
> SELECCIONAR
> PERO SI EL VALOR ES "ES343434" Y EL ORIGINAL ES "ES343434" SI LO
> TIENE QUE SELECCIONAR
> LO QUE ME DISTES ANTE NO ME FUNCIONA COMO QUIERO
>