[firebase-br] RES: procedure pra determinar proximo vencimento

Elton da Motta Barbosa embarbosa em gmail.com
Qui Set 24 11:22:56 -03 2009


tipo assim... se vc fizer no Delphi acho mais fácil usar as funções
incMonth(), incDay() ou incYear().
tipo

var
 data_t:date;
begin
  data_t := now;
  showmessage(datetostr(incMonth(data_t,1)));
  showmessage(datetostr(incMonth(data_t,2)));
end;

  acho q precisa acrescentar dateutils na clausula uses. o código não
foi testado, mas olha no help do delphi q vc acha.

  Se quiser fazer no BD (eu pessoalmente não acho legal... mas...) use
um dos exemplos citados dos outros colegas (exemplo: o do PauloVale),
mas passando a lógica pra SQL.
  Use extract para extrair o mes, dia e ano e
cast(mes||'.'||dia||"."||ano as date) para juntar depois denovo, ao
inves de um encodedtate(...)
  bem é algo assim, acho q vc consegue terminar.
flw.




Mais detalhes sobre a lista de discussão lista