Problema com CLipper 5.3b...Help

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

scom
Usuário Nível 3
Usuário Nível 3
Mensagens: 133
Registrado em: 15 Nov 2004 10:49
Localização: Dourados/MS

Problema com CLipper 5.3b...Help

Mensagem por scom »

Ola amigos...


Baixei o clipper 5.3b da pagina do STANIS LUKSYS e compilei meu programa mas ai ficou com um problema nas pesquisas nao acha o que foi digitado...cai sempre no final do registro.

SELE CLI
DBSETORDER(1)
SEEK NOME SOFTSEEK

CAI NO ULTIMO REGISTRO...NAO ACHA...HELP...


OBS: SE EU COMPILE COM A VERSAO 5.3 QUE EU TENHO AQUI...FICA BLEZA.

ATENCIOSAMENTE

ROBSON
S COM INFORMATICA
Avatar do usuário
alaminojunior
Colaborador
Colaborador
Mensagens: 1717
Registrado em: 16 Dez 2005 21:26
Localização: Ubatuba - SP

Mensagem por alaminojunior »

Qual RDD vc usa ?
Compilador xHarbour 1.2.3 + Embarcadero C++ 7.30
MySQL c/ SQLRDD
HwGui + GTWVG
scom
Usuário Nível 3
Usuário Nível 3
Mensagens: 133
Registrado em: 15 Nov 2004 10:49
Localização: Dourados/MS

RDD DBFCDX

Mensagem por scom »

EU USO INDICES CDX...RDD DBFCDX
Avatar do usuário
janio
Colaborador
Colaborador
Mensagens: 1846
Registrado em: 06 Jul 2004 07:43
Localização: UBAJARA - CE

Re: Problema com CLipper 5.3b...Help

Mensagem por janio »

scom escreveu: SELE CLI
DBSETORDER(1)
SEEK NOME SOFTSEEK
Amigo,

Tô achando estranho o comando 'softseek' junto com o seek, além de vc também nao mover o ponteiro no banco de dados para o início com o DBGOTOP().

Tente:

Código: Selecionar todos

SELE CLI
DBSETORDER(1)
DBGOTOP()
DBSEEK( NOME, .T.)
Janio
fui...
e-mail:janioaguiar@yahoo.com.br
msn: janio_aguiar@hotmail.com
xHarbour1.2.1/Harbour3.2 + wvg + hwgui + Mediator + MySql
scom
Usuário Nível 3
Usuário Nível 3
Mensagens: 133
Registrado em: 15 Nov 2004 10:49
Localização: Dourados/MS

amigao deu certo...mas sempre usei assim

Mensagem por scom »

ola amigo...deu certo...

mudei a pesquisar do jeito que vc me passou e deu certo....

mas o pior e´ que sempre usei essa sintaxe e nunca deu esse problema...

porque se nao vou ter que nudar em todo o meu programa.

atenciosamente

obrigado.

ROBSON
Avatar do usuário
gvc
Colaborador
Colaborador
Mensagens: 1270
Registrado em: 23 Ago 2005 10:57

Mensagem por gvc »

Não é necessário colocar o dbgotop().

O dbseek/seek posiciona o ponteiro de arquivos na primeira ocorrencia da chave.
Se vc quer a ultima ocorrencia:
dbseek(<chave>, <softseek>, .T.)

Da forma que o scom estava fazendo:

set softseek on
seek nome
set softseek off
"TRS-80/Sincler/Apple/PC - Clipper Winter 85, tlink 1.0 [pc 10 MHz - 640K] {NEZ 8000 2Kb RAM}"
{POG - Programação Orientada a Gambiarra}
DENTINHO
Usuário Nível 1
Usuário Nível 1
Mensagens: 5
Registrado em: 06 Dez 2006 21:48

Mensagem por DENTINHO »

EU USO ASSIM

VAR = ANA
SEEK VAR SOFTSEEK

ASSIM EU NAO ME PREOCUPO COM
SOFTSEEK ON
SOFTSEEK OF
Avatar do usuário
vagucs
Membro Master
Membro Master
Mensagens: 1480
Registrado em: 10 Jul 2004 10:45
Localização: Ipanema - MG
Contato:

Mensagem por vagucs »

O Comando SEEK <sFind> SOFTSEEK está declaro dentro do STD.CH se der algum erro coloque este include no inicio do seu procura

#include "std.ch"

Mesmo no clipper 5.3 ele deveria ter aceitado o comando.

Sempre, se for usar usar o comando SEEK desta forma, deixe sempre no inicio do seu programa o SET SOFTSEEK OFF, assim, procura sem especificar o SOFTSEEK na frente são procuras OFF, se colocar no inicio do programa SET SOFTSEEK ON e o comando fica inutil.
Sem mais
Wagner Nunes
www.vagucs.com.br
Abadder

Mensagem por Abadder »

Mário Isa
Usuário Nível 4
Usuário Nível 4
Mensagens: 907
Registrado em: 07 Jul 2004 13:54
Localização: Ilha Solteira-sp

Mensagem por Mário Isa »

quem é esse Abbadder ????
:-o
Avatar do usuário
vagucs
Membro Master
Membro Master
Mensagens: 1480
Registrado em: 10 Jul 2004 10:45
Localização: Ipanema - MG
Contato:

Mensagem por vagucs »

nAO CLIQUE NO LINK ISSO É UM VIRUS.
Sem mais
Wagner Nunes
www.vagucs.com.br
Responder