Discussion :

[vavastan]

Bonjour,

je suis en version oracle 9i

j'ai un probleme avec un execute immediate

SousRequeteSQL := 'SELECT 1 FROM ' || TRIM(TT_Table)
|| ' WHERE ' || TRIM(TT_Lot)
|| ' = ' || '''' || TRIM(i_lot) ;
RequeteSQL := 'UPDATE ' || TRIM(TM_Table)
|| ' SET ' || TRIM(TM_Integrer) || ' = 0 WHERE EXISTS ('
|| TRIM(SousRequeteSQL)
|| ')';

EXECUTE IMMEDIATE RequeteSQL;

mais il ne se passe rien, le update ne fonctionne pas

ma requete est dans une procedure lancée via un batch sous pl/sql


j'ai recuperer ma requete dans une variable
et quand je la lance sous toad, la, ça fonctionne

[plaineR]

As-tu fait un commit derrière ?

[vavastan]

oui j'ai bien fait un commit

[orafrance]

fait un :

Code :

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

DBMS_OUTPUT.PUT_LINE(RequeteSQL);

Pour afficher la requête et vérifier qu'elle est correcte.

Code :

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

|| ' = ' || '''' || TRIM(i_lot) ;

il ne manque pas la fermeture des quotes :

Code :

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

|| ' = ' || '''' || TRIM(i_lot) || '''';

[vavastan]

J'ai deja fait ca
la requete est correcte
elle fonctionne quand je la lance sous toad

[Korfandar]

Tu as essayé la fermeture des quotes comme le propose orafrance ?

[vavastan]

voici le code complet :

CREATE OR REPLACE PROCEDURE PRC_Maj_Flag_Integrer_TM
(
i_lot IN VARCHAR2,
i_PrefixeErreur IN VARCHAR2
) IS

PrefixeErreur VARCHAR2(6);
TT_Prefixe VARCHAR2(3);
TT_Table VARCHAR2(30);
TT_Colonne VARCHAR2(30);
TT_Chrono VARCHAR2(30);
TT_Lot VARCHAR2(30);
TT_Integrer VARCHAR2(30);
TM_Table VARCHAR2(30);
TM_Colonne VARCHAR2(30);
TM_Chrono VARCHAR2(30);
TM_Lot VARCHAR2(30);
TM_Integrer VARCHAR2(30);
zTestUnderScore VARCHAR2(1);

RequeteSQL VARCHAR2(1000);
SousRequeteSQL VARCHAR2(500);

BEGIN

PrefixeErreur := i_PrefixeErreur || '%';
IF (SUBSTR(PrefixeErreur, 2, 1) = '_') THEN
zTestUnderScore := '_';
ELSE
zTestUnderScore := SUBSTR(PrefixeErreur, 2, 1);
END IF;
SELECT DISTINCT TEC_NOM_TABLE_CTRL,TEC_PREFIXE,
TEC_NOM_COL_TABLE_SOURCE,TEC_NOM_TABLE_MAITRE,
TEC_NOM_COL_TABLE_MAITRE
INTO TT_Table,
TT_Prefixe,
TT_Colonne,
TM_Table,
TM_Colonne
FROM &6..TEC_ERREURS_CODES
WHERE TEC_CODE_ERREUR LIKE PrefixeErreur AND
SUBSTR(TEC_CODE_ERREUR, 2, 1) = zTestUnderScore;

TT_Chrono := TT_Prefixe || '_SASMIG_CHRONO';
TT_Lot := TT_Prefixe || '_SASMIG_LOT';
TT_Integrer := TT_Prefixe || '_SASMIG_A_INTEGRER';
TM_Chrono := SUBSTR(TM_Colonne, 1, 3) || '_SASMIG_CHRONO';
TM_Lot := SUBSTR(TM_Colonne, 1, 3) || '_SASMIG_LOT';
TM_Integrer := SUBSTR(TM_Colonne, 1, 3) || '_SASMIG_A_INTEGRER';

SousRequeteSQL := 'SELECT 1 FROM '
|| TRIM(TT_Table)
|| ' WHERE '
|| TRIM(TT_Lot)
|| ' = '
|| ''''
|| TRIM(i_lot)
|| ''''
|| ' AND '
|| TRIM(TT_Integrer)
|| ' = 0 AND '
|| TRIM(TM_Integrer)
|| ' = 1 AND '
|| TRIM(TT_Colonne)
|| ' = '
|| TRIM(TM_Colonne);
RequeteSQL := 'UPDATE '
|| TRIM(TM_Table)
|| ' SET '
|| TRIM(TM_Integrer)
|| ' = 0 WHERE EXISTS ('
|| TRIM(SousRequeteSQL)
|| ')';
EXECUTE IMMEDIATE RequeteSQL;
COMMIT;

END

[orafrance]

essaye d'ajouter ceci :

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
50
51
52
53
54
55
56
CREATE OR REPLACE PROCEDURE PRC_Maj_Flag_Integrer_TM
(
i_lot IN VARCHAR2,
i_PrefixeErreur IN VARCHAR2
) IS
nb_lig NUMBER;
...
BEGIN
...
SousRequeteSQL := 'SELECT count(*) FROM '
|| TRIM(TT_Table)
|| ' WHERE '
|| TRIM(TT_Lot)
|| ' = '
|| ''''
|| TRIM(i_lot)
|| ''''
|| ' AND '
|| TRIM(TT_Integrer)
|| ' = 0 AND '
|| TRIM(TM_Integrer)
|| ' = 1 AND '
|| TRIM(TT_Colonne)
|| ' = '
|| TRIM(TM_Colonne);
 
EXECUTE IMMEDIATE RequeteSQL INTO nb_lig;
DBMS_OUTPUT.PUT_LINE(nb_lig);
 
SousRequeteSQL := 'SELECT 1 FROM '
|| TRIM(TT_Table)
|| ' WHERE '
|| TRIM(TT_Lot)
|| ' = '
|| ''''
|| TRIM(i_lot)
|| ''''
|| ' AND '
|| TRIM(TT_Integrer)
|| ' = 0 AND '
|| TRIM(TM_Integrer)
|| ' = 1 AND '
|| TRIM(TT_Colonne)
|| ' = '
|| TRIM(TM_Colonne);
RequeteSQL := 'UPDATE '
|| TRIM(TM_Table)
|| ' SET '
|| TRIM(TM_Integrer)
|| ' = 0 WHERE EXISTS ('
|| TRIM(SousRequeteSQL)
|| ')';
EXECUTE IMMEDIATE RequeteSQL;
DBMS_OUTPUT.PUT_LINE(SQL%ROWCOUNT);
 
...

[vavastan]

je recupère bien mon nombre de ligne avec DBMS_OUTPUT
mais ça ne change rien :
la requete update marche sous toad
mais pas via mon batch

[orafrance]

à mon avis tu ne regardes pas la bonne table... tu utilises le même user ? Il n'y a pas de synonyme ?

[mnitu]

à mon avis tu ne regardes pas la bonne table... tu utilises le même user ? Il n'y a pas de synonyme ?

peut être je me trompe mais Bingo

Code :

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

1
2
3
4
...
FROM &6..TEC_ERREURS_CODES
...

[vavastan]

je suis bien sur le bon user
et je n'ai pas de synonyme
(ce sont des tables toutes créées dynamiquement)