F�rum Verificar data e hora no banco #430263

03/12/2012

Estou fazendo uma aplica��o de agenda, e queria saber como fa�o pra verificar se j� existe alguma agenda marcada para o mesmo hor�rio e data.

Grato.

Vander Carlos

Curtir t�pico

+ 0

Responder

Posts

03/12/2012

Deivison Melo

Se for fazer baseado no banco de dados, basta antes executar uma consulta passando as informa��es que est� tentando entrar como cadastro e caso tenha informar que j� existe o cadastro...

Responder

Gostei + 0

04/12/2012

Fabianoluizdb

N�o sei que banco de dados esta utilizando mas pode fazer uma consulta no banco para saber a data e hora atual do mesmo SELECT TO_CHAR(SYSDATE,'DD/MM/YYYY HH:MM')DATAHORA FROM DUAL

Responder

Gostei + 0

04/12/2012

Vander Carlos

N�o entendi muito bem o que voc�s disseram, vou tentar explicar mais detalhado.

Por exemplo, pra localizar se j� existe um CPF cadastrado � s� utilizar o Locate...

Quando vou cadastrar uma consulta eu escolho:

Nome: Teste
Data 04/12/2012
Hora: 07:00:00
Situa��o: Agendada

Como eu verifico se na data 04/12/2012 j� tem uma consulta marcada para o hor�rio de 07:00:00

Grato.

Responder

Gostei + 0

04/12/2012

Fabianoluizdb

Hum... bom a dica que eu dou � criar uma fun��o para pesquisar se j� existe consulta marcada para esse dia e hora para esse cpf, voc� pode utilizar um locate mesmo passando esses 3 parametros ou se preferir criar um query e passa um select para o banco de dados que se a query esiver vazia � sinal que n�o tem consulta e no evento exit do campo data voc� verifico com um bloco if se os dois campos data e hora est�o diferentes de vazio se estiver voc� chama a fun��o para pesquisar se existe consulta, faz o mesmo para o exit do campo hora tamb�m.

Responder

Gostei + 0

04/12/2012

Vander Carlos

N�o, o CPF foi s� o exemplo, n�o entra n�o. rsrs

Responder

Gostei + 0

05/12/2012

Vander Carlos

Tentei fazer desse jeito:

 if (tbConsulta.Locate('dataconsulta', edtDataConsulta.Text,[]) and
      tbConsulta.Locate('horaconsulta', cbxHoraConsulta.Text,[])) then begin

      ShowMessage('J� existe uma consulta marcada para este hor�rio, ');
  end;

Eu tentei cadastrar uma consulta assim, mas n�o deu certo:

Data: 05/12/2012
Hora: 07:00

N�o tinha nenhuma consulta marcada para este dia e hor�rio, mas tinha uma para:

Data: 06/12/2012
Hora: 07:00

S� quando eu exclui a do dia 06 eu consegui cadastrar a do dia 05, ou seja, esse verifica��o ta sendo na tabela toda.

Algu�m pode me ajudar ? :(

Responder

Gostei + 0

05/12/2012

Bruno Leandro

qual o tipo dos campos dataconsulta e horaconsulta no seu banco de dados, eu costumo utilizar assim

var
Data: TDateTime;
begin
Data := StrToDate(edtData.text);

Query.Locate( 'dataconsulta', Data, [] );

Responder

Gostei + 0

05/12/2012

Alan Souza

tenta desse modo:

if (tbConsulta.Locate('dataconsulta;horaconsulta', VarArrayOf([edtDataConsulta.Text, cbxHoraConsulta.Text]),[]) then
begin
  ShowMessage('J� existe uma consulta marcada para este hor�rio, ');
end;

Responder

Gostei + 0

06/12/2012

Vander Carlos

Tentei e deu esse erro:

EConvertError with message "0.2500000' is not a valid timestamp

Responder

Gostei + 0

06/12/2012

Claudia Nogueira

S� uma curiosidade. Qual o Banco de Dados?

Responder

Gostei + 0

06/12/2012

Vander Carlos

MySQL.

Responder

Gostei + 0

06/12/2012

Claudia Nogueira

Voc� est� usando Ado:
Tem dois campos, um pra data e um pra hora ou um campo tipo timestamp?
Se for dois, qual o tipo de cada um?

MySQL.

Responder

Gostei + 0

07/12/2012

Vander Carlos

dataconsulta: date
horaconsulta: time

Responder

Gostei + 0

13/12/2012

Vander Carlos

Algu�m ?

Responder

Gostei + 0

13/12/2012

William

A fun��o q o colega sugeriu funciona normalmente, verifique como est� passando os par�metros?

tenta desse modo:

if (tbConsulta.Locate('dataconsulta;horaconsulta', VarArrayOf([edtDataConsulta.Text, cbxHoraConsulta.Text]),[]) then
begin
  ShowMessage('J� existe uma consulta marcada para este hor�rio, ');
end;

Responder

Gostei + 0

Mais t�picos