Discussion :

[samworld]

[FONT=Times New Roman]Bonjour,[/FONT]

[FONT=Times New Roman]J'ignore si certains travaillent encore à cette heure au bureau, moi j'y suis et je me demande comment modifier cette procédure PL/SQL pour qu'elle marche :[/FONT]

[FONT=Times New Roman]CREATE OR REPLACE PROCEDURE TABLE_INSERT([/FONT]
[FONT=Times New Roman] VersionLbl IN VARCHAR2(30), CommentLbl IN VARCHAR2(200)) IS[/FONT]
[FONT=Times New Roman]BEGIN[/FONT]
[FONT=Times New Roman] DECLARE newId NUMBER;[/FONT]
[FONT=Times New Roman] newId := SELECT MAX(id) FROM REQM_TOOL_VERSION;[/FONT]
[FONT=Times New Roman] INSERT INTO TABLE ( ID, VERSION_LBL, COMMENT_LBL ) VALUES ( [/FONT]
[FONT=Times New Roman]newId, VersionLbl, CommentLbl);[/FONT]
[FONT=Times New Roman] COMMIT;[/FONT]
[FONT=Times New Roman]END;[/FONT]
[FONT=Times New Roman]/[/FONT]

Et à cause de documentations contradictoires, je vous demande de me le confirmer : un appel à la procédure peut bien se faire par la commande EXECUTE TABLE_INSERT('5.0', 'Voilà pourquoi') ?

Merci ; Sam

[phili_b]

Merci d'utiliser la balide code, donc après avoir mis cette balise on a:

Code :

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

1
2
3
4
5
6
7
8
9
10
CREATE OR REPLACE PROCEDURE TABLE_INSERT(
 VersionLbl IN VARCHAR2(30), CommentLbl IN VARCHAR2(200)) IS
BEGIN
 DECLARE newId NUMBER;
 newId := SELECT MAX(id) FROM REQM_TOOL_VERSION;
 INSERT INTO TABLE ( ID, VERSION_LBL, COMMENT_LBL ) 
VALUES ( 
newId, VersionLbl, CommentLbl);
 COMMIT;
END;

cette ligne ne peut pas fonctionner en PL/SQL.

Code :

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

 newId := SELECT MAX(id) FROM REQM_TOOL_VERSION;

ça s'écrit:

Code :

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

 SELECT MAX(id) INTO  newId FROM REQM_TOOL_VERSION;

DECLARE n'est pas à utiliser dans une procédure.

Un commit dans un procédure n'est pas recommandé, en tout cas pas de cette façon il faut une gestion d'exception, et un ROLLBACK en cas de souci.

Donc ça donnerait, si je n'ai pas laissé passer d'autres erreurs:

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
CREATE OR REPLACE PROCEDURE TABLE_INSERT(
 VersionLbl IN VARCHAR2(30), CommentLbl IN VARCHAR2(200)) IS
    newId NUMBER;
BEGIN
    SELECT MAX(id) INTO newId  FROM REQM_TOOL_VERSION; -- modifié le 14/1/07 copier,coller intempestif
    INSERT INTO TABLE ( ID, VERSION_LBL, COMMENT_LBL ) 
    VALUES 
    (newId, VersionLbl, CommentLbl);
    COMMIT;
EXCEPTION  
    WHEN OTHERS THEN
        raise_application_error(-20001,'An error was encountered - '||SQLCODE||' -ERROR- '||SQLERRM);
        ROLLBACK;
END;
/

edit:

un appel à la procédure peut bien se faire par la commande EXECUTE TABLE_INSERT('5.0', 'Voilà pourquoi') ?

oui, une fois que le reste sera corrigé. Si tu utilises TOAD il te donne l'impression que ça "compile" mais souvent il ne detectes pas d'erreur à moins d'utiliser l'onglet de création de procédure idoine.

edit 14/1/07:
SELECT MAX(id) INTO newId FROM REQM_TOOL_VERSION; -- modifié le 14/1/07 copier,coller intempestif , newId:=SELECT MAX(id) FROM était faux

[Invité]

Il y a encore du monde au bureau, il est juste midi vingt!! Doucement sur l'ethnocentrisme !

Bon, déjà, affiche un formattage lisible de ton message, je ne ferais pas l'effort une autre fois.
Et utilise aussi la balise [ code ] [ /code ] pour le code...

J'ai jeté un oeil sur ton code et visiblement tu ne maitrises pas le PL/SQL alors je te renvois sur http://sheikyerbouti.developpez.com/pl_sql/
Regarde les messages de compilation, ils sont tout de même assez explicite...

[wondersonic]

Attention à la déclaration des types de tes paramètres :

Code :

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

( param1 IN VARCHAR2, param2 IN VARCHAR2 )

(et oui on ne spécifie pas la taille).

Que penses-tu de :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
CREATE OR REPLACE PROCEDURE TABLE_INSERT(
 VersionLbl IN VARCHAR2, CommentLbl IN VARCHAR2) IS
BEGIN
    INSERT INTO TABLE ( ID, VERSION_LBL, COMMENT_LBL ) 
    VALUES 
    ((SELECT MAX(id) FROM REQM_TOOL_VERSION), VersionLbl, CommentLbl);
    COMMIT;
EXCEPTION  
    WHEN OTHERS THEN
        raise_application_error(-20001,'An error was encountered - '||SQLCODE||' -ERROR- '||SQLERRM);
        ROLLBACK;
END;
/