Fórum Procurar Data -Campo Chave- #203073
26/12/2003
0
Eu tenho uma tabela no qual a data é um campo chave. E sempre que o usuario for inserir uma data no arquivo e esta já existe gostaria que ele buscasse os dados deste registro o mostrasse na tela. O detalhe que esta acontecendo é que ele encontra a data , mas na hora de mostar ele mostra outra data. Já fiz a busca por filter e locate , mas nenhum funcionou . O que eu poderia fazer?
Rs_ferreira
Curtir tópico
+ 0
Responder
Posts
27/12/2003
Pr.mas
Não entendi sua pergunta? Onde você quer o retorno da busca? No campo
em que ele digitou ou em uma nova janela?
em que ele digitou ou em uma nova janela?
Responder
Gostei + 0
28/12/2003
Edilcimar
vc está fazendo algo errado, mostre o procedimento de procura e o procedimento onde mostra os dados para que alguém possa corrigí-los, pois quando a data é ´achada´ o que é mostrado tem que estar correto, portanto o código deve estar errado
Responder
Gostei + 0
29/12/2003
Rs_ferreira
Caros Amigos:
A tabela é a seguinte:
TABLE ´VLRMOEDA´
(
´VMO_TIPO´NUMERIC(2, 0) NOT NULL,
´VMO_DATA´DATE NOT NULL,
´VMO_VALOR´NUMERIC(7, 2),
PRIMARY KEY (´VMO_TIPO´, ´VMO_DATA´)
);
E o codigo é este:
if dmtabela.TbVlrMoeda.Locate(´vmo_tipo;vmo_data´,
VarArrayOf([cmbtipo.KeyValue, strtodate(edtdata.text)]), []) = true then
dmtabela.Tbvlrmoeda.edit;
end;
Observações:
Ela só busca certo data até o dia 12/mm/aaaa. Passando para o dia 13 ela da erro.
Ja usei o shortdateformat := ´dd/mm/yyyy´ , mas segue com o mesmo erro.
O interbase é ver 6 e DEFAULT CHARACTER SET WIN1252
A tabela é a seguinte:
TABLE ´VLRMOEDA´
(
´VMO_TIPO´NUMERIC(2, 0) NOT NULL,
´VMO_DATA´DATE NOT NULL,
´VMO_VALOR´NUMERIC(7, 2),
PRIMARY KEY (´VMO_TIPO´, ´VMO_DATA´)
);
E o codigo é este:
if dmtabela.TbVlrMoeda.Locate(´vmo_tipo;vmo_data´,
VarArrayOf([cmbtipo.KeyValue, strtodate(edtdata.text)]), []) = true then
dmtabela.Tbvlrmoeda.edit;
end;
Observações:
Ela só busca certo data até o dia 12/mm/aaaa. Passando para o dia 13 ela da erro.
Ja usei o shortdateformat := ´dd/mm/yyyy´ , mas segue com o mesmo erro.
O interbase é ver 6 e DEFAULT CHARACTER SET WIN1252
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)