Discussion :

[davy.g]

Bonjour,

J'ai le INSERT - SELECT suivant dans une proc. stockée :

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
 
INSERT 
  INTO ENVELOPPE
select distinct CODE_MARCHE_NATIONAL, 
                MAPU.NUMERO_PERIODE, 
                DATE_DEBUT_PERIODE, 
		DATE_FIN_PERIODE, 
		MAPU.NUMERO_LOT, 
		MAPU.code_uag , 
                MAPU.MT_MAX_UAG, 
                MAPU.MT_MAX_UAG - (Select NVL(SUM(MONTANT_HT_EJ),0) TOTAL
                                   FROM EJ
                                   WHERE EJ.NUMERO_PERIODE =  MAPU.NUMERO_PERIODE
                                     AND EJ.NUMERO_LOT = MAPU.NUMERO_LOT 
                                     AND EJ.MARCHE = V_MARCHE.CODE_MARCHE_NATIONAL
                                     AND EJ.CODE_UAG = MAPU.code_uag)
from MONTANT_AUTORISE_PAR_UAG MAPU,
    (select distinct id_marche,CODE_MARCHE_NATIONAL from marche
      where CODE_STATUT = 'N'
        and CODE_PRM <> '02') V_MARCHE,  PERIODE     
WHERE MAPU.id_marche = V_MARCHE.id_marche
  AND MAPU.ID_PERIODE = PERIODE.ID_PERIODE;

Cet INSERT fonctionne sous SQL*Plus mais me renvoie l'erreur suivante lorsque je compile la proc. stockée :

Erreurs pour PROCEDURE P_TEST1 :

LINE/COL ERROR
-------- ----------------------------------------------------------------
19/36 PLS-00103: Symbole "SELECT" rencontrÚ Ó la place d'un des
symboles suivants :
( - + mod not null others <an identifier>
<a double-quoted delimited-identifier> <a bind variable> avg
count current exists max min prior sql stddev sum variance
execute forall time timestamp interval date
<a string literal with character set specification>
<a number> <a single-quoted SQL string>

25/1 PLS-00103: Symbole "FROM" rencontrÚ Ó la place d'un des symboles
suivants :

LINE/COL ERROR
-------- ----------------------------------------------------------------
; return returning and or

Auriez-vous une idée ?

Merci.

[Bahan]

La ligne 19 c'est laquelle ? ^_^
Si tu pouvais nous mettre la procédure en entier.

Merci.

Bahan

[davy.g]

Voici la proc. stockée en entier :

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
 
CREATE OR REPLACE PROCEDURE p_test1( pVar_codret in out number, pOra_error in out varchar2 ) IS
 
BEGIN
 
INSERT 
  INTO ENVELOPPE
select distinct CODE_MARCHE_NATIONAL, 
                MAPU.NUMERO_PERIODE, 
                DATE_DEBUT_PERIODE, 
		DATE_FIN_PERIODE, 
		MAPU.NUMERO_LOT, 
		MAPU.code_uag , 
                MAPU.MT_MAX_UAG, 
                MAPU.MT_MAX_UAG - (Select NVL(SUM(MONTANT_HT_EJ),0) TOTAL
                                   FROM EJ
                                   WHERE EJ.NUMERO_PERIODE =  MAPU.NUMERO_PERIODE
                                     AND EJ.NUMERO_LOT = MAPU.NUMERO_LOT 
                                     AND EJ.MARCHE = V_MARCHE.CODE_MARCHE_NATIONAL
                                     AND EJ.CODE_UAG = MAPU.code_uag)
from MONTANT_AUTORISE_PAR_UAG MAPU,
    (select distinct id_marche,CODE_MARCHE_NATIONAL from marche
      where CODE_STATUT = 'N'
        and CODE_PRM <> '02') V_MARCHE,  PERIODE     
WHERE MAPU.id_marche = V_MARCHE.id_marche
  AND MAPU.ID_PERIODE = PERIODE.ID_PERIODE;
 
 
END p_test1;
/

La ligne 19 correspond au SELECT après le ' - ' ( moins : signe négatif ).

[Bahan]

Nous pourrions peut-être essayer ça.

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
38
39
40
41
42
43
44
45
46
47
48
49
CREATE OR REPLACE PROCEDURE p_test1
  (  pVar_codret IN OUT NUMBER
  ,  pOra_error IN OUT VARCHAR2)
IS
  vRequete VARCHAR2(4000);
  vNomFonction VARCHAR2(50);
  vErrReq EXCEPTION;
BEGIN
  vNomFonction := 'p_test1';
 
  vRequete := '
    INSERT INTO ENVELOPPE
    SELECT DISTINCT
      CODE_MARCHE_NATIONAL, 
      MAPU.NUMERO_PERIODE, 
      DATE_DEBUT_PERIODE, 
      DATE_FIN_PERIODE, 
      MAPU.NUMERO_LOT, 
      MAPU.code_uag, 
      MAPU.MT_MAX_UAG, 
      MAPU.MT_MAX_UAG - (
            SELECT NVL(SUM(MONTANT_HT_EJ),0) TOTAL
            FROM EJ
            WHERE EJ.NUMERO_PERIODE =  MAPU.NUMERO_PERIODE
            AND EJ.NUMERO_LOT = MAPU.NUMERO_LOT 
            AND EJ.MARCHE = V_MARCHE.CODE_MARCHE_NATIONAL
            AND EJ.CODE_UAG = MAPU.code_uag)
    FROM
      MONTANT_AUTORISE_PAR_UAG MAPU,
      (
        SELECT DISTINCT 
          id_marche,
          CODE_MARCHE_NATIONAL 
        FROM marche
        WHERE CODE_STATUT = ''N''
        AND CODE_PRM <> ''02''
      ) V_MARCHE,
      PERIODE
    WHERE MAPU.id_marche = V_MARCHE.id_marche
    AND MAPU.ID_PERIODE = PERIODE.ID_PERIODE
  ';
 
  EXECUTE IMMEDIATE vRequete;
EXCEPTION
  WHEN vErrReq THEN
    DBMS_OUTPUT.put_line(vNomFonction||'\ERREUR dans la requête : '||vRequete);
  WHEN OTHERS THEN
    DBMS_OUTPUT.put_line(vNomFonction||'\ERREUR Oracle '||TO_NUMBER(SQLCODE)||' : '||SQLERRM);
END p_test1;

Je vois que tu mets un code retour dans tes paramètres, ne voudrais-tu pas dans ce cas utiliser une fonction plutôt qu'une procédure stockée ?

Cdt.

Bahan

[davy.g]

Le code retour est pour les messages d'erreurs. Je n'ai pas mis toute la proc.

Le problème vient de ce INSERT SELECT.

Ce que je ne comprends pas, c'est pourquoi il passe sous SQL*Plus et pas dans une proc. stockée. ???

[Bahan]

Là, cela ne passe toujours pas ?

Vous avez essayé de la compiler (ça doit marcher ça ^_^) et de la lancer ?
Pourriez-vous m'afficher le buffer de sortie ?

Une autre question : quel front end utilisez-vous ? PL/SQL developper ? Toad ?

Bahan

[davy.g]

Je suis bien en 8i, mais je vais essayer quand même ta proposition.

Merci beaucoup !