Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   como tomo el mes de una fecha?? (https://www.clubdelphi.com/foros/showthread.php?t=58471)

ale_metall 21-07-2008 21:19:02

como tomo el mes de una fecha??
 
buenas gente... esta vez consulto de q forma se puede realizar una consulta tomando el mes en curso.
Es decir, necesito hacer una consulta q me traiga los registros del mes en curso, pero como tomo solo el mes de una fecha y como lo comparo?? el campo es de tipo date.
trabajo con delphi6 y paradox7.

gracias...

coso 21-07-2008 21:48:57

hola, echale un vistazo a la funcion decodedate

EDITO : demasiado rapido. Eso es solo en delphi, no sql

donald shimoda 21-07-2008 21:54:59

Cita:

Empezado por ale_metall (Mensaje 302036)
buenas gente... esta vez consulto de q forma se puede realizar una consulta tomando el mes en curso.
Es decir, necesito hacer una consulta q me traiga los registros del mes en curso, pero como tomo solo el mes de una fecha y como lo comparo?? el campo es de tipo date.
trabajo con delphi6 y paradox7.

gracias...

Obtenes el dia de incio del mes y el dia final del mes en Delphi, y lo metes en los parámetros del query:

select * from whatever where dia between :dia_inicio and :dia_fin

Como resolverlo en el sql, pasandole ;por ejemplo un mes determinado NI IDEA, seguro se puede pero excede mis conocimientos. :D

Saludos.

coso 21-07-2008 22:00:48

segun este link, es usando la funcion Month

donald shimoda 21-07-2008 22:03:11

Cita:

Empezado por coso (Mensaje 302055)
segun este link, es usando la funcion Month

No camina el vinculo. :(

coso 21-07-2008 22:07:43

si, ya lo edite. Y si, funciona
Código SQL [-]
 select Month(DATA) as m from AGENDA;

enecumene 21-07-2008 22:10:52

quizas algo así:

Código Delphi [-]
var
Mes: string;
  begin
    Mes := DateToStr(MonthOf(Now));
   Query1.SQL.Text := ' select * from whatever where dia between :dia_inicio and :dia_fin';
   Query1.Parameters.ParamByName('dia_inicio').Value := Concat(Edit1.Text,'/',Mes,'/',Año);
   Query1.Parameters.ParamByName('dia_fin').Value := Concat(Edit2.Text,'/',Mes,'/',Año);
  Query1.Open
end;

lo hice al vuelo no lo he probado pero es una idea.

Saludos.

eduarcol 21-07-2008 22:20:00

si lo quieres hacer en la consulta podrias hacer algo asi:

Código SQL [-]
Select * from mitabla where extract(month from Fecha)  = :mes

hecospina 22-07-2008 00:11:26

Alguna vez intente hacerlo con una sentencia sql en paradox y no encontre la forma de tomar la fecha del sistema, adicione un campo a la tabla con el "now" como valor por defecto y lo tome de alli
En firebird seria tomara extract(month from current_date) y listo,
pero siendo en paradox eduarcol te dio la instruccion y puedes adicionar el campo como lo hice yo:)

Casimiro Notevi 22-07-2008 08:00:12

Pequeño tutorial de funciones de fecha en firebird.

eduarcol 22-07-2008 14:58:51

Cita:

Empezado por Casimiro Notevi (Mensaje 302156)

Esta buenisimo casimiro, gracias por el aporte me servira mucho.

Pero creo que estamos hablando de Paradox

Casimiro Notevi 22-07-2008 18:24:52

Cita:

Empezado por eduarcol (Mensaje 302218)
Esta buenisimo casimiro, gracias por el aporte me servira mucho.

Pero creo que estamos hablando de Paradox


jejeje... pequeño despiste... pero me alegra de que te sirva :)

ale_metall 22-07-2008 22:01:39

Gracias gente, con la ayuda de todos lo solucione de la sigueinte manera..



Código Delphi [-]fecha:=now;
decodedate(fecha, ano, mes, dia);



asi tomo el mes de la fecha actual.



Código Delphi [-]query1.parambyname('mes').value:=mes;

Parametro de la consulta.



Código SQL [-]where extract(month from FechaPago)=:mes



comparo el parametro extrayendo el mes del campo q me interesa compara..




gracias a los que me respondieron y me pasaron todas esas ideas..

un abrazo.


La franja horaria es GMT +2. Ahora son las 03:10:45.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi