Discussion :

[ouinih]

Bonjour,

Je veux extraire des dates à partir d'une chaine de caractère.
voila un ex de ma chaine :
"debut: Paiement : 26/01/09 Detachement. : 26/01/09 pour le produit X"
mon but est d'extraire les deux dates : 26/01/09 et 26/01/09.
Ma chaine peut contenir une seule date
"debut: Paiement : 26/01/09 pour le produit Y"

je suis sous Oarcle 9i
Merci

[SheikYerbouti]

Instr( chaîne, '/') vous donnera la position du premier caractère / rencontré

instr( chaîne, '/', x) vous donnera la position du premier caractère / à partir de la position x.
Donc vous pouvez trouver la position des 3 oui six caratères / et extraire les données environnantes avec la fonction Substr()

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
DECLARE
  LN$Pos  PLS_INTEGER;
  LC$Ch   VARCHAR2(100) := 'xxxx 10/10/2009 yyyy 31/10/2009 zzz' ;
BEGIN
  -- date 1  ? --
  LN$Pos := INSTR( LC$Ch, '/'); 
  IF LN$Pos > 0 THEN
    DBMS_OUTPUT.PUT_LINE('d1:' || SUBSTR( LC$Ch, LN$Pos -2, 10 )) ;
  END IF ;
  -- date 2 ? --
  LN$Pos := INSTR( LC$Ch, '/', LN$Pos+10);
  IF LN$Pos > 0 THEN
    DBMS_OUTPUT.PUT_LINE('d2:' || SUBSTR( LC$Ch, LN$Pos -2, 10 )) ;
  END IF ;  
END;