Buenas a todos, aqui con un problema con respecto a una query donde involucra un campo fecha.
Les explico:
Estoy ejecutando un query donde deseo traerme las facturas vencidas a cierto dia de corte, este dia esta en un DatetimeEdit.
El codigo para traer las facturas vencidas por ejemplo al dia de hoy 21 de Mayo si funciona aqui esta como lo tengo:
Código Delphi
[-]
consulta:='SELECT admDocumentos.CIDDOCUMENTODE, admDocumentos.CSERIEDOCUMENTO,admDocumentos.CFOLIO, admDocumentos.CFECHA, admDocumentos.CRAZONSOCIAL, admDocumentos.CFECHAVENCIMIENTO, admDocumentos.CIDMONEDA, admDocumentos.CCANCELADO,'+
' admDocumentos.CTOTAL, admDocumentos.CPENDIENTE, admDocumentos.CIDCONCEPTODOCUMENTO,admDocumentos.CIDDOCUMENTOORIGEN,admDocumentos.CIDDOCUMENTO';
consulta:=consulta+' FROM admDocumentos';
Consulta:=Consulta +' WHERE (admDocumentos.CIDCONCEPTODOCUMENTO = 21)';
Consulta:=Consulta +' AND (';
Consulta:=Consulta +' CCANCELADO=0';
consulta:=consulta+')';
Consulta:=Consulta +' and (CFECHAVENCIMIENTO>=';
consulta:=consulta + FormatDateTime('YYYY-MM-DD',FechaIni.Date);
consulta:=consulta+')';
Consulta:=Consulta +' AND (';
Consulta:=Consulta +' CPENDIENTE<>0';
consulta:=consulta+')';
Consulta:=Consulta +' AND (';
Consulta:=Consulta +' admDocumentos.CIDMONEDA=1';
consulta:=consulta+')';
todo muy bien ya que me trae todas las facturas vencidas hasta el dia de hoy. Por ejemplo tengo una factura que se vencio el 02-Mayo-19 y la trae.
Pero alli mismo deseo traerme las facturas que no se han vencido , es decir, la contraparte del codigo de arriba.
Por ejemplo tengo una factura que se vence el 25 de Mayo y no la trae se la brinca la consulta, va el codigo.
Código Delphi
[-]
consulta:='SELECT admDocumentos.CIDDOCUMENTODE, admDocumentos.CSERIEDOCUMENTO,admDocumentos.CFOLIO, admDocumentos.CFECHA, admDocumentos.CRAZONSOCIAL, admDocumentos.CFECHAVENCIMIENTO, admDocumentos.CIDMONEDA, admDocumentos.CCANCELADO,'+
' admDocumentos.CTOTAL, admDocumentos.CPENDIENTE, admDocumentos.CIDCONCEPTODOCUMENTO,admDocumentos.CIDDOCUMENTOORIGEN,admDocumentos.CIDDOCUMENTO';
consulta:=consulta+' FROM admDocumentos';
Consulta:=Consulta +' WHERE (admDocumentos.CIDCONCEPTODOCUMENTO = 21)';
Consulta:=Consulta +' AND (';
Consulta:=Consulta +' CCANCELADO=0';
consulta:=consulta+')';
Consulta:=Consulta +' and (admDocumentos.CFECHAVENCIMIENTO<';
consulta:=consulta + FormatDateTime('YYYY-MM-DD',FechaIni.Date);
consulta:=consulta+')';
Consulta:=Consulta +' AND (';
Consulta:=Consulta +' CPENDIENTE<>0';
consulta:=consulta+')';
Consulta:=Consulta +' AND (';
Consulta:=Consulta +' admDocumentos.CIDMONEDA=1';
consulta:=consulta+')';
El truco esta en el campo CFECHAVENCIMIENTO donde si arriba me funciona para las vencidas pues entonces invierto el sigo de "<".
Pero no funciona.
Alguna recomendacion??
Delphi 7 y BD SQL.
Gracias.