In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Cambiar el orden de los indices

Foro público de Xailer en español
Responder
Armando Ruiz
Mensajes: 12
Registrado: Jue May 15, 2008 4:48 am

Cambiar el orden de los indices

Mensaje por Armando Ruiz »

Hola,
Sigo siendo nuevo en esto de Xailer, y quiero saber como debo hacerle para
canbiar los indices de una base de datos si esta base de datos tiene dos
Tag.
Por lo tanto como debo seleccionar cada una de ellas segun requiera hacer un
seek
::oDbfDataSet1:seek(ccodigo)
y
::oDbfDataSet1:seek(cnombre)
nombre de la base de datos """""CLIENTES"""
nombres de los Tag;
indice1 """"codigo"""
indice2 """"apellido"""
Saludos
Armando Ruiz
Fernando Leal
Mensajes: 294
Registrado: Jue Mar 13, 2008 3:03 pm

Cambiar el orden de los indices

Mensaje por Fernando Leal »

Asi:
::oDbfDataSet1:OrdSetFocus("CODIGO")
if ::oDbfDataSet1:seek( ::oEditCodigo:Value ) // --> Suponiendo que tengas
un control Edit de nombre Codigo
msginfo("Existe")
endif
::oDbfDataSet1:OrdSetFocus("APELLIDO")
if ::oDbfDataSet1:seek( ::oEditApellido:Value )
msginfo("Existe")
endif
Armando Ruiz
Mensajes: 12
Registrado: Jue May 15, 2008 4:48 am

Cambiar el orden de los indices

Mensaje por Armando Ruiz »

Perdon por responder hasta ahorita pero tenia problemas tecnicos con mi
maquina, pero la manera en que lo explicaste fue excelente y si pude hacer
lo que necesitaba.
Saludos
Armando Ruiz
"Fernando Leal" <visitante32@hotmail.com> escribió en el mensaje de noticias
news:[email=48ab7571@ozsrv2.ozlan.local...]48ab7571@ozsrv2.ozlan.local...[/email]
> Asi:
>
> ::oDbfDataSet1:OrdSetFocus("CODIGO")
>
> if ::oDbfDataSet1:seek( ::oEditCodigo:Value ) // --> Suponiendo que
> tengas un control Edit de nombre Codigo
> msginfo("Existe")
> endif
>
> ::oDbfDataSet1:OrdSetFocus("APELLIDO")
>
> if ::oDbfDataSet1:seek( ::oEditApellido:Value )
> msginfo("Existe")
> endif
>
>
>
Responder