Ver Mensaje Individual
  #2  
Antiguo 18-08-2008
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 25
Caral Va por buen camino
Hola
Seguro me equivoco, pero:

Código Delphi [-]
Crp_OcuRat.WindowState:=WsMaximized;
      Crp_OcuRat.Selection.Formula.Clear;
      if dbl_Age.KeyValue=Null then
      begin
         Crp_OcuRat.Selection.Formula.Add('reserve.sStaRes =''PA'' and reserve.dArrivaldate >= :?fecini and reserve.dArrivaldate <= :?fecend');
         Crp_OcuRat.Paramfields[0].currentvalue:=FormatDateTime(' yyyy,mm,dd',Dtp_ArrDat.date);
         Crp_OcuRat.Paramfields[1].currentvalue:=FormatDateTime(' yyyy,mm,dd',dtp_deda.date);
      end
      else
      begin
         Crp_OcuRat.Selection.Formula.Add('reserve.sStaRes =''PA'' and reserve.dArrivaldate >= :?fecini and reserve.dArrivaldate <= :?fecend and sources.sSourceCode = :?agencie');
         Crp_OcuRat.Paramfields[0].currentvalue:=FormatDateTime(' yyyy,mm,dd',Dtp_ArrDat.date);
         Crp_OcuRat.Paramfields[1].currentvalue:=FormatDateTime(' yyyy,mm,dd',dtp_deda.date);
         Crp_OcuRat.Paramfields[2].currentvalue:=dbl_age.KeyValue;
      end;
        Crp_OcuRat.Show;
Desconozco por que el uso del signo de interrogarion en los parametros., si el campo se llama asi, pues estará bien.
Me da la impresion de que usas Access, me equivoco?.
Saludos
__________________
Siempre Novato
Responder Con Cita