Procédure PL/SQL avec sql dynamique [Résolu]

[Fiona08]

Salut à tous,


Soit la procedure suivante:

J’essaye de faire un update sur table. Mais avant de faire le update je veux verifier la syntaxe de mon code sql en l’ecrivant dans une table d’essaie. J’obtient toujours la faute suivante : ORA-00972: identifier is too long

Quelqu’un peut-il me dire comment faire un update dynamique?

J’ai lu le cours suivant(http://sheikyerbouti.developpez.com/execute_immediate/), mais n’a malheureusemet pas trouvé mon bonheur.

Je cherche depuis des heures quelques exemples sur le net en vain.

Mon code

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
27
28
29
30
31
32
33
34
35
36
CREATE OR REPLACE PROCEDURE table_essaie_update IS 
 
  erreur           varchar2(200);
  stmt_str         varchar2(32000);
  v_table          varchar2(256);
 
  CURSOR c1 IS SELECT * FROM ma_table WHERE id_medecin = '674' ; 
 
 
BEGIN
 
    FOR c1_rec IN c1 LOOP 
      begin
        DELETE FROM table_essaie;
 
        SELECT nom_table INTO v_table FROM toute_tables WHERE id = c1_rec.tbl_id;
 
        stmt_str := 'UPDATE' || v_table || 
        'SET
          NAME = ''' || c1_rec.NAME|| ''' ';
 
 
          INSERT INTO table_essaie (table_essaie) VALUES (stmt_str);
          execute immediate stmt_str;
          commit;          
 
    exception
            when others then            
        rollback;
                erreur := substr(sqlerrm,1,200);
        INSERT INTO table_essaie (table_essaie ) VALUES (erreur);        
 
        end; 
    END LOOP;
COMMIT;
END table_essaie_update;

Merci d'avance pour votre aide
Fiona

[7gyY9w1ZY6ySRgPeaefZ]

si vous voulez voir ce que vous lancez en dynamique, utilisez DBMS_OUTPUT : http://sheikyerbouti.developpez.com/pl_sql/?page=Chap7

[Waldar]

Il manque les espaces autour du nom de la table : après update et avant set.
Quelle est la longueur de la colonne qui stocke la requête ?

[Fiona08]

Salut Waldar,

la longueur de la colonne qui stocke la requête est VARCHAR2(2000 Byte)

Fiona

[breizh76]

et quelque chose comme ca !!!

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
type r_cursor IS ref cursor;
    c_cursor1 r_cursor;
 
    cursor_rc AU_AUX_FT%ROWTYPE;
 
BEGIN 
...
 
vc2_select := 'SELECT * FROM UOAUP.AU_AUX_FT partition (' || vc2_partition_name || ') where rownum <10';
 
open c_cursor1 FOR vc2_select;
    LOOP
        FETCH c_cursor1 INTO cursor_rc;
        EXIT WHEN c_cursor1%NOTFOUND;
        dbms_output.put_line(cursor_rc.EXE_IDT_NUM);
        vc2_requete := 'INSERT INTO ....

[Fiona08]

Salut à tous,

j'ai resolu le probleme en faisant une insertion en plusieurs partie.

Code :

1
2
3
INSERT INTO table_essaie (test) VALUES (substr(sql_str,1,2000));
 
INSERT INTO table_essaie (test) VALUES (substr(sql_str,2001,4000));

Merci encore pour vos propositions
Fiona