Clipper On Line • Ver Tópico - Duvida em função seek()

Duvida em função seek()

Aqui você poderá oferecer suas Contribuições, Dicas e Tutoriais (Texto ou Vídeo) que sejam de interesse de todos.

Moderador: Moderadores

 

Duvida em função seek()

Mensagempor lugab » 06 Abr 2018 13:56

Bom dia, amigos...

Eu tenho um arquivo indexado com a chave str(chave,8), exemplo de alguns registros :
reg1=12345450
reg2=12345671
reg3=13456781
reg4=23456782

Seria correto pesquisar esse arquivo utilizando "seek str(campo,7)", considerando que o arquivo é indexado com "str(campo,8)" , ou seja:

Se campo=1234567 ( somente os 7 primeiros bytes)
a linha "seek str(campo,7)" iria achar o registo reg2 ou daria eof() ???

grato,
lugab
lugab
Colaborador

Colaborador
 
Mensagens: 843
Data de registro: 19 Mai 2009 15:58
Curtiu: 126 vezes
Mens.Curtidas: 38 vezes

Duvida em função seek()

Mensagempor JoséQuintas » 06 Abr 2018 19:14

lugab escreveu:Se campo=1234567 ( somente os 7 primeiros bytes)a linha "seek str(campo,7)" iria achar o registo reg2 ou daria eof() ???


Supondo que no arquivo existam as chaves Str( 1, 8 ), Str( 10, 8 ), Str( 11, 8 )
SEEK Str( 1, 7 ) vai encontrar 10.

Da mesma forma que "JOSE QUINTAS", " JOSE"
SEEK "JOSE" vai encontrar o que começar com JOSE, portanto "JOSE QUINTAS"
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18008
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Duvida em função seek()

Mensagempor lugab » 07 Abr 2018 11:09

Obrigado pelo apoio, Quintas

Aqui eu entendi...
Da mesma forma que "JOSE QUINTAS", " JOSE"
SEEK "JOSE" vai encontrar o que começar com JOSE, portanto "JOSE QUINTAS"


Mas aqui eu buguei...
Supondo que no arquivo existam as chaves Str( 1, 8 ), Str( 10, 8 ), Str( 11, 8 )
SEEK Str( 1, 7 ) vai encontrar 10.
lugab
lugab
Colaborador

Colaborador
 
Mensagens: 843
Data de registro: 19 Mai 2009 15:58
Curtiu: 126 vezes
Mens.Curtidas: 38 vezes

Duvida em função seek()

Mensagempor JoséQuintas » 07 Abr 2018 13:45

Exatamente a mesma coisa.

" 1"
"10"

SEEK "1" // vai encontrar "10" e não " 1"
SEEK Str( 1, 1 ) // vai enconrar "10" e não " 1"
SEEK Str( 1, 2 ) // vai encontrar " 1"
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18008
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes




Retornar para Contribuições, Dicas e Tutoriais

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 12 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro