Discussion :

[B&B]

Hello tlm

J'ai 2 tables :

TABLE libelle
lib VARCHAR2

lib
'COMP%'

TABLE entreprise
id_ent NUMBER
nom VARCHAR


id_ent | nom
01 | 'COMPAGNIE INFORMATIQUE'
02 | 'TOTO INC'


Je veux rechercher les lignes de la table Entreprise qui correspondent à chaque libelle.

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
DECLARE
CURSOR libcur is select * from libelle;
label libcur%ROWTYPE;
CURSOR entcur is SELECT id_ent, nom FROM entreprise;
ent entcur%ROWTYPE;
BEGIN
  FOR label IN libcur
  LOOP
    FOR ent IN ptcur
    LOOP
    IF (ent.full_name LIKE label.lib) THEN
      DBMS_OUTPUT.PUT_LINE(ent.id_ent || ' - ' || ent.full_name || ' - ' ||label.lib);
    END IF;
    END LOOP;
  END LOOP;
END;
/

Pour le moment j'ai laissé l'affichage avec DBMS_OUTPUT mais j'ai vite le buffer qui explose, et ca prend du temps.

Table Entreprise : 550 000 lignes
Table Libelle : 1 600 lignes
Ca fait 880M comparaison, olé !

Par la suite il faudra que j'insere le resultat dans une table.

Jvoulais savoir si vous auriez une idee pour optimiser la comparaison ? Merci

[mnitu]

Fait les jointure en SQL en non pas en PL/SQL

[McM]

Un curseur pour ensuite faire un test LIKE en PL ?!
Houlala... quelle hérésie !

Faut que tu saches qu'un curseur peut prendre un paramètre.
Pour info (parce qu'il faut faire comme l'a signalé Mnitu)

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
CURSOR entcur (p_lib IN VARCHAR2) IS 
	SELECT id_ent, nom 
	FROM entreprise
    WHERE full_name LIKE p_lib;
BEGIN
  FOR LABEL IN (SELECT lib FROM libelle)
  LOOP
    FOR ent IN ptcur (LABEL.lib)
    LOOP
      DBMS_OUTPUT.PUT_LINE(ent.id_ent || ' - ' || ent.full_name || ' - ' ||LABEL.lib);
    END LOOP;
  END LOOP;
END;

[orafrance]

Voila qui devrait faire l'affaire :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
DECLARE 
result VARCHAR2(4000);
BEGIN
FOR i IN (SELECT ent.id_ent || ' - ' || ent.full_name || ' - ' ||label.lib 
   INTO result
  FROM libelle label, entreprise ent
 WHERE ent.full_name LIKE label.lib) LOOP
   DBMS_OUTPUT.PUT_LINE(i.result);
END LOOP;
END;
/

Ou simplement en SQL :

Code :

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

1
2
3
4
SELECT ent.id_ent || ' - ' || ent.full_name || ' - ' ||label.lib 
   INTO result
  FROM libelle label, entreprise ent
 WHERE ent.full_name LIKE label.lib

[B&B]

Super, merci.

J'ai essayé la procedure de McM, nikel, par contre j'ai un probleme avec celle de orafrance.

Error report:
ORA-06550: line 8, column 27:
PLS-00302: component 'RESULT' must be declared
ORA-06550: line 8, column 4:
PL/SQL: Statement ignored
06550. 00000 - "line %s, column %s:\n%s"
*Cause: Usually a PL/SQL compilation error.
*Action:

??

Et dire qu'une simple requete SQL suffit lol, pourquoi faire simple quand on peut faire compliqué...

[McM]

AS result et non pas INTO result

un mauvais copier-coller.

[mnitu]

Et dire qu'une simple requete SQL suffit lol, pourquoi faire simple quand on peut faire compliqué...

Avec le grand avantage que c’est la base des données qui choisit le meilleur algorithme pour faire la jointure surtout quand les informations données par les statistiques sont fiables.