Discussion :

[prugne]

bonjour,
j'ai une chaine de caractère, et je dois récupérer les 6 digits en fin de chaines,qui sont toujours placés après DO ou MA.
Le problème est que je peux rencontrer des chaines de Type DO au milieu de la chaine, si c'est le cas, je dois continuer à parcourir la chaine jusque à la fin ou il y a mes digits.
je peux pas utiliser les regex car pas bonne version d'oracle.
Donc j 'ai fait un programme qui permet de boucler sur la chaine de caractères tant que je n'ai pas mon résultat.
mais ca fonctionne pas, ca tourne dans le vide.
Pourriez vous m'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
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
 
w_x_text := 'Cible : vvvv DO tttt /  vvv / DO123456789</p>';
 
w_t_donnees.extend(2);
w_t_donnees(1) := 'DO';
w_t_donnees(2) := 'MA';
 
if instr(w_x_text, 'Cible') > 0 then
 
    w_n_positionDep     := instr(w_x_text, 'Cible');
    w_n_positionFin     := instr(w_x_text, 'Cible') + length('Cible');
 
for j in 1..w_t_donnees.count loop
 
   while (w_x_utilFormEmailEtu is null or w_n_new_position = 0) loop
        w_n_new_position    := instr(w_x_text, w_t_donnees(j),w_n_positionFin);
        w_n_new_positionFin := instr(w_x_text, w_t_donnees(j),w_n_positionFin) +  length(w_t_donnees(j));
 
        if w_n_new_position > 0 then
 
          w_b_result := true;
           while (w_b_result) loop
             w_x_utilFormInter := substr(w_x_text,w_n_new_positionFin, 1);
             if w_x_utilFormInter in ('0', '1', '2', '3', '4', '5','6', '7', '8', '9') then
               w_x_utilFormEmailEtu := w_x_utilFormEmailEtu ||w_x_utilFormInter;
             else
               w_b_result:= false;
             end if;
             w_n_new_positionFin := w_n_new_positionFin + 1;
           end loop;
         end if;
 
   end loop;
   exit when w_x_utilFormEmailEtu is not null;
end loop;
 
end if;

[Waldar]

et je dois récupérer les 6 digits en fin de chaines,qui sont toujours placés après DO ou MA.

Donc selon votre exemple 'Cible : vvvv DO tttt / vvv / DO123456789</p>', vous devez récupérer la chaîne 123456 c'est bien ça ?

[prugne]

oui tout a fait.
Mais je boucle toujours....malgré mes conditions dans mon while.

[Waldar]

Ok et sur cet exemple que cherchez-vous à obtenir :
'Cible : vvvv DO tttt / vvv / DO1A2B3C4D5E6F7G8H9</p>'

Toujours 123456 ?

[prugne]

Dans cet exemple :
'Cible : vvvv DO tttt / vvv / DO1A2B3C4D5E6F7G8H9</p>'

rien du tout car le format est toujours DO et des digit.
DO1233654 ou TT1236547 ou PP11245411

mais le souci c est que ces deux caracteres comme DO peuvent etre en milieu de chaine mais il ne faut pas les prendre en compte.

[Waldar]

Ok si vous êtes sûr d'avoir toujours six chiffres après un DO :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
select reverse(
          substr(reverse(str),
                 least(case instr(reverse(str), 'OD') when 0 then 99 else instr(reverse(str), 'OD') end,
                       case instr(reverse(str), 'AM') when 0 then 99 else instr(reverse(str), 'AM') end) - 6, 6)) as res
  from
(
select 'Cible : vvvv DO tttt /  vvv / DO123456789</p>' as str
  from dual
);
 
RES   
------
123456

Chercher le dernier DO / MA revient à chercher le premier OD / AM de la chaîne inversée. C'est cette logique que j'ai appliquée à la requête ci-dessus.

[Garuda]

Merci pour le REVERSE que je ne connaissais pas !