Discussion :

[claralavraie]

J'ai l'erreur suivante quand j'execute ma procedure:

Code :

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

1
2
3
4
5
6
 
ORA-01001: invalid cursor
ORA-06512: at "LOG_ERROR", line 7
ORA-06512: at "RD", line 36
ORA-01001: invalid cursor
ORA-06512: at line 2

Voici ma procédure:

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
 
  procedure send_exp is
   CURSOR cur IS
  select * from A_STREAM where stream_type='exp' and result=0 FOR UPDATE;
 
   return_txt varchar2(32767);
   return_code integer;
   ligne varchar2(32767);
   EMAIL varchar2(255);
 
  begin
 
  EMAIL:=tools.env('EMAIL');
 
  for c in cur
  loop
      LIGNE:='<table>';
      LIGNE:= LIGNE||'<tr><td > Commande <b>'||c.KEY1||' </b></td><td></td><td></td><td></td><td></td><td></td></tr>';
    for c2 in (select fd._NUMBER, fd.QUANTITY, fd.CODE, fd.PRODUCT, fd.COLOR, fd.SIZE, fd.DATE from D_FORWARD f, D_FORWARD_DETAIL fd  
	           where f.FORWARDING_NUMBER=c.KEY1 and  f.FORWARDING_NUMBER=fd.FORWARDING_NUMBER)
	loop
       LIGNE:= LIGNE||'<tr><td></td><td> Colis n° '||c2.NACKLACE_NUMBER||'</td><td> Quantité : '||c2.ORDERED_QUANTITY||'</td><td> produit : '||c2.PRODUCT_ID||'</td><td> Couleur  : '||c2.COLOR||'</td><td> Taille : '||c2.SIZE||'</td><td> Date envoi : '||c2.DATE||'</td></tr>';
	   UPDATE A_STREAM SET result=1 WHERE CURRENT OF cur;
	end loop;	 
  end loop;
  LIGNE:=LIGNE||'</table>';
    Stream.post(return_txt
		,return_code
					,'MAIL=exp&EMAIL='||EMAIL||'&LNG=fr&_VAR1='||LIGNE
	,'http://mail.php');
	LOG_ERROR ('exp', 'fr', 'OK' , ' ' , return_code , return_txt, 'ERR');
    end;

je ne vois vraiment pas d'ou cela peut venir...

[claralavraie]

Apparemment cela viendrait de la ligne suivante:

Code :

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

1
2
 
LOG_ERROR ('exp', 'fr', 'OK' , ' ' , return_code , return_txt, 'ERR');

[noirot]

Bonjour,
Tu veux dire que quand tu supprime cette ligne ta procédure fonctionne ?

PS : LOG_ERROR c'est une fonction ou une procédure ?

[claralavraie]

Oui quand je supprime cette ligne, ma procédure fonctionne:
La voici:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
CREATE OR REPLACE PROCEDURE Log_Error (v_PROG VARCHAR2, v_KEY1 VARCHAR2, 
                                       v_KEY2  VARCHAR2, v_PROG_DESC  VARCHAR2, 
									   v_ORACLE_NUM  VARCHAR2, v_ORACLE_DESC VARCHAR2, 
									   v_ERROR_TYPE VARCHAR2) IS
 
BEGIN
   INSERT INTO ERROR (ERROR_ID, PROG, KEY1, KEY2, ERROR_DATE, PROG_DESC, ORACLE_NUM, ORACLE_DESC, ERROR_TYPE) 
   VALUES (S_A_ERROR.NEXTVAL, v_PROG, DECODE(v_KEY1,NULL,' ',v_KEY1), DECODE(v_KEY2,NULL,' ',v_KEY2), SYSDATE() , v_PROG_DESC, v_ORACLE_NUM, v_ORACLE_DESC, v_ERROR_TYPE);
   END Log_Error;
/

[orafrance]

pourtant le problème semble venir de :

Code :

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

1
2
CURSOR cur IS
  select * from A_STREAM where stream_type='exp' and result=0 FOR UPDATE;

selon le message

La requête fonctionne sous SQL*Plus ?

[claralavraie]

oui elle fonctionne

[orafrance]

c'est quoi ça : SYSDATE()

il n'y a pas de parenthése normalement

[noirot]

Bon c'est la fin de la semaine ... et quelquechose m'échape donc au lieu de rester bête pendant mes vacances qui arrivent je pose ma question :

Comment sont initialiser les variables return_code et return_txt ?

[claralavraie]

Ah oui je n'avais pas vu...
en effet c'est du a cela car cela fonctionne maintenant...

[remi4444]

Et pourquoi ne pas avoir directement cherché à la ligne 7 de la procédure LOG_ERROR ? enfin je dit ça juste parceque c'est ce qui était indiqué dans la pile d'erreur oracle....

[noirot]

Arrivé après la guerre, c'est arrivé trop tard !!!

Un petit tag résolu non ?