Discussion :

[poufouille]

bjr,
voila pour quelle raison je me prends la tête :

j'ai une requete avec un critére de date
je compare des objets à la meme période
ex : comparaison entre période du 01/04/03 au jourj (ici 18/03/2004)
et période du 01/04/02 au 18/03/2003

je n'arrive pas à obtenir la date 18/03/2003 qui correspond en fait au meme jour et meme mois que jourj mais avec année-1

quelqu'un peut il m'aider ?
merci

[Harry]

Regarde la fonction incyear, si tu lui met en param -1 ca te retire un an.

[poufouille]

je vois pas trop comment faire (je débute en delphi)

voici ma requete :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
        ssql2:='select count(codeechantillon) as nb from echantillon where supprime<>''O''';
        ssql2 := ssql2 + ' and cli_codeclient = '''+ sql_identite.fieldbyname('codeclient').asstring+'''';
        ssql2 := ssql2 + ' and datesaisie >= ''01/04/'+ anneen2 +'''';
      ***  ssql2 := ssql2 + ' and datesaisie <= ????? ; ***              
        sql_calcul.close;
        sql_calcul.sql.clear;
        sql_calcul.sql.add(ssql2);
        sql_calcul.open;

à l'emplacement ***ssql2....*** de ma requete je ne sais pas comment obtenir le critére de date ex pr aujourd'hui obtenir 19/03/2003 au lieu de 19/03/2004...

merci de m'aider plus explicitement ;-)

[king]

,

dabord je te propose d'utilisé une requete parametre du genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
ssql2:='select count(codeechantillon) as nb from echantillon where supprime<>''O'''; 
        ssql2 := ssql2 + ' and cli_codeclient = '''+ sql_identite.fieldbyname('codeclient').asstring+''''; 
        ssql2 := ssql2 + ' and datesaisie >= :d'; 
        ssql2 := ssql2 + ' and datesaisie <= :d1' ;

tu encode tes dates de cette manieres

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
MaDate,MaDate1: TDateTime;
Year, Month, Day: Word;
 
MaDate:=StrToDate('18/03/2004');
DecodeDate(MaDate, Year, Month, Day);
MaDate1:=EncodeDate(Year-1, Month, Day);

tu renseignes les parametres de ta requete

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Query.Params..Params[0].AsDateTime:=MaDate;
Query.Params..Params[1].AsDateTime:=MaDate1;

A+.

[poufouille]

merci de votre aide, j'ai utilisé seulement quelques points et ca marche !