Discussion :

[daliok]

bonjour
j'ai besoin de connaitre le nbre des années,mois et jours entre deux dates données j'utilise actuellement la méthode suivante:

Code :

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

1
2
3
4
 
 x :=trunc((d1-d2)/356) pour avoir le nbre des ans
 m := x*12 - months_between(d2,d1) pour avoir le nbre des mois
 d := trunc(mod(d1-d2,30)) pour avoir le nbre des jours

j'ai le pb avec months_between par exemple
months_between(to_date('01032005','ddmmyyyy'),to_date('31052008','ddmmyyyy'))
donne 2.9 alors qu'en principe j'ai exactement 3 mois avez vous une idée
et merci d'avance

[McM]

C'est pas terrible de faire des divisions par 356 (d'ailleurs c'est 365 ou 366).

Mieux vaudrait utiliser des calculs sur les années.
Pour le mois, le mois est complet entre le 01/03 00h00 et le 01/04 00h00
Donc c'est normal qu'entre le 01/03 0h00 et le 31/05 0h00, il n'y ait pas 3 mois complet.
Rajoute donc 1 jour (+1 à la date fin) pour le calcul des mois (et des jours aussi).

[JerryMouse]

Effectivement, Ajoute 1 à la date de fin.
Pour le nombre de jours

Code :

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

Trunc(D2-D1+1)

Pour le nombre de Mois

Code :

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

Trunc(Months_Between(D2+1,D1))

Pour le nombre d'années

Code :

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

Trunc(Months_Between(D2+1,D1)/12)

[McM]

C'est pas vraiment ça qu'il veut :
Il veut x années, y mois et z jours entre 2 dates,
Donc plutôt un modulo qu'un trunc mais je suis pas sur.

[Yorglaa]

une petite fonction qui, je crois, vient d'ici même peut servir de point de départ...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Function Time_Diff (
                        LD$Date_Deb     IN DATE DEFAULT SYSDATE
	                    ,LD$Date_Fin    IN DATE DEFAULT SYSDATE
                   ) 
    Return Varchar2 
IS
	LN$JJ       PLS_INTEGER ;
	LN$HH       PLS_INTEGER ;
	LN$MI       PLS_INTEGER ;
    LN$SS       PLS_INTEGER ;
Begin
 
  If LD$Date_Fin < LD$Date_Deb Then
     Return Null ;
  End if ;
 
  Select  trunc ( LD$Date_Fin - LD$Date_Deb)  Into LN$JJ  From DUAL ;
  Select  trunc ( (LD$Date_Fin - LD$Date_Deb) * 24) -  ( LN$JJ * 24 ) Into LN$HH From DUAL ;
  Select  trunc ( (LD$Date_Fin - LD$Date_Deb) * 1440) - ( (LN$HH * 60) + ( LN$JJ * 1440) ) Into LN$MI From DUAL ;
  Select  trunc ( (LD$Date_Fin - LD$Date_Deb) * 86400) - ( (LN$MI * 60) + (LN$HH * 3600) + ( LN$JJ * 3600 * 24 ) ) Into LN$SS From DUAL ;
 
  Return( LN$JJ||' Jour(s), '||LN$HH||' Heure(s), '||LN$MI||' Minute(s), '||LN$SS||' Seconde(s)' ) ;
 
End Time_Diff ;

[JerryMouse]

Voici un code qui peut aider:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
declare
  dat2 Date := sysdate;
  dat1 Date := to_date('01012000','DDMMYYYY');
  Jour Number;
  Nomb Number;
  Annee Number;
  Mois Number;
Begin
  Nomb := Months_Between(Dat2, Dat1);
  Annee := Trunc( Nomb/12);
  Mois := Trunc(Nomb-Annee*12);
  Jour := Trunc((Nomb - Trunc( Nomb))*30);
  Dbms_Output.Put_Line( ANNEE ||' an(s) '|| Mois ||' mois '||Jour||' jour(s).');
End;