Pb sur un CURSOR explicite dans une boucle FOR LOOP

Version imprimable

Bonjour,

J'aurais besoin d'aide sur une procédure que j'essaie de mettre en place :

Code:

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
 
create or replace procedure DataCompliance_Purge_Histo as
 
BEGIN
    DECLARE 
        CURSOR id_cust Is
            select * from customer cust where cust.customer_number in (43337,11211114);
        c_limit integer := 1000;
        TYPE id_cust_type IS TABLE OF id_cust%ROWTYPE INDEX BY BINARY_INTEGER;
        id_cust_array id_cust_type;
 
    BEGIN 
 
        EXECUTE IMMEDIATE 'truncate table PURGE_HISTO_DC';
 
        FOR IDS IN id_cust LOOP 
            FETCH id_cust BULK COLLECT INTO id_cust_array LIMIT c_limit;
 
            EXECUTE IMMEDIATE 'INSERT INTO PURGE_HISTO_DC (CUSTOMER_NUMBER,CREATION_DATE,EVENT_CONSENT,EVENT_CONSENT_NB,APPLICATION)
                                   select cust.customer_number, cust.update_date, ''CUSTOMER'',cust.customer_number, ''SCR'' 
                                     from customer cust
                                    where cust.customer_number = :1'
                                    USING IDS.customer_number;
        END LOOP IDS;
    end;
end;

Lorsque je lance la procédure, j'obtiens une erreur oracle :

Code:

1
2
3
ORA-01001: curseur non valide
ORA-06512: à "SIRIUSLMFR.DATACOMPLIANCE_PURGE_HISTO", ligne 23
ORA-06512: à ligne 2

Est-ce que vous pouvez m'aider à diagnostiquer le problème ?

Bonjour,

1/ A quoi sert cette ligne : FETCH id_cust BULK COLLECT INTO id_cust_array LIMIT c_limit; ?
Le bulk Collect c'est pour mettre toutes les lignes dans un tableau en 1 fois (sans boucle)

2/ Pourquoi un execute immediate ? Le nom de la table n'est pas dynamique.

3/ Simplifions (mais si ça se trouve tu souhaites faire autre chose)

Code:

1
2
3
4
5
6
7
8
9
10
CREATE OR REPLACE PROCEDURE DataCompliance_Purge_Histo IS
BEGIN 
	EXECUTE IMMEDIATE 'TRUNCATE TABLE PURGE_HISTO_DC'; -- Attention, ceci fait un commit implicite
  FOR IDS IN (SELECT customer_number, update_date  FROM CUSTOMER WHERE customer_number IN (43337,11211114))
  LOOP 
      INSERT INTO PURGE_HISTO_DC (CUSTOMER_NUMBER,CREATION_DATE,EVENT_CONSENT,EVENT_CONSENT_NB,APPLICATION)
      VALUES( ids.customer_number, ids.update_date, 'CUSTOMER', ids.customer_number, 'SCR');                     
  END LOOP;
  -- COMMIT; ? 
END;

Ou sans curseur

Code:

1
2
3
4
INSERT INTO PURGE_HISTO_DC (CUSTOMER_NUMBER,CREATION_DATE,EVENT_CONSENT,EVENT_CONSENT_NB,APPLICATION)
SELECT customer_number, update_date, 'CUSTOMER', customer_number, 'SCR'
FROM CUSTOMER 
WHERE customer_number IN (43337,11211114);

04/04/2019, 14h51
Philomelo

Merci pour cette réponse,

Et voici quelque précision :

Citation:

Envoyé par McM

3/ Simplifions (mais si ça se trouve tu souhaites faire autre chose)

* je dois parcours une table de plusieurs millions d'entrées (customer)
* je réalise plusieurs insert de différentes table.

=> c'est pour cette raison que j'ai mis un cursor.

Citation:

Envoyé par McM

2/ Pourquoi un execute immediate ? Le nom de la table n'est pas dynamique

Je vais vérifier, mais il me semble que sql developper me remonte une erreur si je n'utilise le execute immed

Citation:

Envoyé par McM

1/ A quoi sert cette ligne : FETCH id_cust BULK COLLECT INTO id_cust_array LIMIT c_limit; ?

Comme je brasse une grosse quantité de lignes, je me dis que cela permettra de gagner en performance.

J'ai essayé de me baser un un post du site https://www.developpez.net/forums/d9...-fetch-cursor/
04/04/2019, 15h29
Waldar

Citation:

Envoyé par Philomelo

* je dois parcours une table de plusieurs millions d'entrées (customer)
* je réalise plusieurs insert de différentes table.

Regardez du côté de INSERT ALL avec un seul ordre SQL et une seule lecture de la table customer.
Plusieurs millions de lignes n'est pas effrayant.