Insert select sur un champ Long

Version imprimable

04/03/2009, 14h40
pev15

Insert select sur un champ Long
Bonjours à tous.

J'ai le problème suivant :

Dans mon application je dois charger depuis un fichier plat des données dans une table.
Cependant, avant d'insérer dans la table cible , j'importe les données dans une table temporaire (sans clé, ni autre contraintes) qui a la même structure que ma table cible mais avec un champ Error_flag pour pointer les données du fichier plats posant des probléme de contraites d'intégrité.

Aprés l'éxécution d'un traitement sur la qualité des données lignes à ligne de ma table temporaire, J'effectue un insert select de la table temporaire dans ma table cible que pour les lignes dont le Error_flag est vide.

C'est la qu'arrive le probléme : Toutes les données sont bien insérer sauf le champ de type Long.
J'ai essayé avec un update avec jointure sur les deux tables, Oracle n'accepte pas ce type d'update avec un long :
Code:

1 2 3 4 UPDATE Table_cible a SET a.comments = (SELECT b.comments FROM Table_temp b WHERE b.clé = a.clé
Une idée ?

Merci d'avance.

intéressant. Ca fait un moment que je n'ai plus fait de long, j'imagine qu'il doit y avoir une soluce toute simple.

Bon, en plsql je pourrais imaginer :
Code:

1 2 3 4 5 6 7 8 begin for f in (SELECT a.cle, b.comments FROM lsc_Table_cible a, lsc_Table_temp b WHERE b.cle = a.cle) loop UPDATE lsc_Table_cible SET comments = f.comments WHERE cle = f.cle; end loop; end; /

N'étant pas à l'aise en PL/SQL, j'ai beaucoup de difficulté à développer cette soluce. voici ce que j'ai tenté tout de même :

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
CREATE OR REPLACE function VB_TEST(
  vb_s_param1 in varchar2)
  return varchar2
 
is
 
  vb_s_result VARCHAR2(32767);
 
 
BEGIN
   FOR f IN  (SELECT a.siren_num, a.vb_seq_num, b.comments
                FROM ps_vb_crdt_comment a, ps_vb_crtdescr_tao b
               WHERE a.siren_num = b.siren_num
                 AND a.vb_seq_num = b.vb_seq_num
                 AND b.error_flag = 'Y')
   LOOP
      UPDATE ps_vb_crdt_comment
         SET comments = f.comments
       WHERE siren_num = f.siren_num AND vb_seq_num = f.vb_seq_num;
   END LOOP;
 
 
vb_s_result := 'Fin';
 
return vb_s_result;
end VB_TEST;
/

L'erreur se situe au niveau de la synthaxe du for car l'expression du In n'est pas considérer comme un entier.
Dans mon exemple, siren_num (Char) et seq_num(Integer) sont clé primaire de la table... Je pense que le probléme vient de la...

04/03/2009, 17h09
laurentschneider

quelle est ta version?
04/03/2009, 18h18
pev15

Si on parle de la base Oracle, il s'agit de 10.2.0.4.0

et l'erreur, c'est quoi?

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
37
38
39
40
41
42
43
 
SQL> create table ps_vb_crdt_comment(
  2    siren_num char(10),vb_seq_num number,comments long);
 
Table created.
 
SQL> create table ps_vb_crtdescr_tao(
  2    siren_num char(10),vb_seq_num number,error_flag varchar2(1),comments long);
 
Table created.
 
SQL> CREATE OR REPLACE FUNCTION VB_TEST(
  2    vb_s_param1 IN varchar2)
  3    RETURN varchar2
  4  
  5  IS
  6  
  7    vb_s_result VARCHAR2(32767);
  8  
  9  
 10  BEGIN
 11     FOR f IN  (SELECT a.siren_num, a.vb_seq_num, b.comments
 12                  FROM ps_vb_crdt_comment a, ps_vb_crtdescr_tao b
 13                 WHERE a.siren_num = b.siren_num
 14                   AND a.vb_seq_num = b.vb_seq_num
 15                   AND b.error_flag = 'Y')
 16     LOOP
 17        UPDATE ps_vb_crdt_comment
 18           SET comments = f.comments
 19         WHERE siren_num = f.siren_num AND vb_seq_num = f.vb_seq_num;
 20     END LOOP;
 21  
 22  
 23  vb_s_result := 'Fin';
 24  
 25  RETURN vb_s_result;
 26  end VB_TEST;
 27  /
 
Function created.
 
SQL> sho error;
No errors.

Re bonjour et merci pour ta réponse.

J'ai revérifier mon code, et j'avais également oublié un troisiéme champs de la clé (VB_TYPE_ITEM). Après la correction cela ne change rien. La fonction se compile correctement mais l'éxécution ne rempli pas ma table.

Voici le code de la fonction :
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 CREATE OR REPLACE FUNCTION VB_TEST( vb_s_param1 IN varchar2) RETURN varchar2 IS vb_s_result VARCHAR2(32767); BEGIN FOR f IN (SELECT a.siren_num, a.vb_seq_num, a.VB_TYPE_ITEM, b.comments FROM ps_vb_crdt_comment a, ps_vb_crtdescr_tao b WHERE a.siren_num = b.siren_num AND a.vb_seq_num = b.vb_seq_num and a.VB_TYPE_ITEM = b.VB_TYPE_ITEM AND b.error_flag = 'Y') LOOP UPDATE ps_vb_crdt_comment SET comments = f.comments WHERE siren_num = f.siren_num AND vb_seq_num = f.vb_seq_num AND VB_TYPE_ITEM= f.VB_TYPE_ITEM; END LOOP; vb_s_result := 'Fin'; RETURN vb_s_result; end VB_TEST; /
Petite précision sur mon environement technique : Je travail sur ma base Oracle avec le client Toad.
Toad propose un débuggeur de fonction plsql que j'utilise pour corriger les erreurs. Cependant, à la fin de la compilation, je n'ai aucune Erreur de compilation mais une message box windows s'affiche avec le message suivant :

'IN' is not a valid integer value.

Pourtant quand j'éxécute ce sript pour créer la fonction, je n'ai aucune erreur.

Pour appeler la fonction j'utilise le code suivant :

Code:

select VB_TEST('1') from dual

Il y a bien quelque chose qui tourne mais ça ne remplie pas ma table cible...

05/03/2009, 20h25
laurentschneider
il n'est pas possible d'appeler une fonction qui fait un UPDATE depuis un select.

Pour avoir une erreur que l'on puisse comprendre, utilise sqlplus et pas toad.

dans sqlplus, que te donne ceci?
Code:

1 2 3 4 5 6 declare x varchar2(400); begin x:=VB_TEST('1'); end; /

Dans Sql plus, voici ce que me donne la commande :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 SQL> declare 2 x varchar2(400); 3 begin 4 x:=VB_TEST('1'); 5 end; 6 / Procédure PL/SQL terminée avec succès. SQL> commit 2 ; Validation effectuée.
Mais ma table cible n'est pas chargée. Le champ commentaire reste vide.

chez moi ça marche au poil...

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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
 
SQL> CREATE TABLE ps_vb_crdt_comment(
siren_num char(10),vb_seq_num number,
comments long)
Table created.
SQL> CREATE TABLE ps_vb_crtdescr_tao(
siren_num char(10),vb_seq_num number,error_flag varchar2(1),
comments long)
Table created.
SQL> CREATE OR REPLACE FUNCTION VB_TEST(
vb_s_param1 IN varchar2)
RETURN varchar2
IS
vb_s_result VARCHAR2(32767);
BEGIN
FOR f IN  (SELECT a.siren_num, a.vb_seq_num, b.comments
FROM ps_vb_crdt_comment a, ps_vb_crtdescr_tao b
WHERE a.siren_num = b.siren_num
AND a.vb_seq_num = b.vb_seq_num
AND b.error_flag = 'Y')
LOOP
UPDATE ps_vb_crdt_comment
SET comments = f.comments
WHERE siren_num = f.siren_num AND vb_seq_num = f.vb_seq_num;
END LOOP;
vb_s_result := 'Fin';
RETURN vb_s_result;
end VB_TEST;
Function created.
SQL> sho error
No errors.
SQL> insert into ps_vb_crdt_comment(
  siren_num,vb_seq_num,comments)
values(
  'A',1,null)
1 row created.
SQL> insert into ps_vb_crtdescr_tao(
  siren_num ,vb_seq_num ,error_flag ,comments )
values(
  'A',1,'Y','blabla')
1 row created.
SQL> select comments from ps_vb_crdt_comment
 
COMMENTS
----------------------------------------------------------------------
 
 
1 row selected.
SQL> declare 
  x varchar2(400);
begin 
  x:=VB_TEST('1');
end;
PL/SQL procedure successfully completed.
SQL> select comments from ps_vb_crdt_comment
 
COMMENTS
----------------------------------------------------------------------
blabla
 
1 row selected.

En effet, ça marche.

Je viens de trouver mon erreur : La valeur de error_flag. Les lignes valides avec un commentaire sont à 'N' et non 'Y'...:oops:

Forcément avec les bonnes conditions... ça marche tout de suite mieux.

Ta fonction marche nickel :
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 37 38 39 40 41 42 43 SQL> CREATE OR REPLACE FUNCTION VB_TEST( 2 vb_s_param1 IN varchar2) 3 RETURN varchar2 4 IS 5 vb_s_result VARCHAR2(32767); 6 BEGIN 7 FOR f IN (SELECT a.siren_num, a.vb_seq_num, a.vb_type_item, b.comments 8 FROM ps_vb_crdt_comment a, ps_vb_crtdescr_tao b 9 WHERE a.siren_num = b.siren_num 10 AND a.vb_seq_num = b.vb_seq_num 11 and a.vb_type_item = b.vb_type_item 12 AND b.error_flag = 'N') 13 LOOP 14 UPDATE ps_vb_crdt_comment 15 SET comments = f.comments 16 WHERE siren_num = f.siren_num AND vb_seq_num = f.vb_seq_num and vb_type_item = f.vb_type_item; 17 END LOOP; 18 vb_s_result := 'Fin'; 19 RETURN vb_s_result; 20 end VB_TEST; 21 / Fonction créée. SQL> declare 2 x varchar2(400); 3 begin 4 x:=VB_TEST('1'); 5 end; 6 / Procédure PL/SQL terminée avec succès. SQL> commit; Validation effectuée. SQL> select count(*) from ps_vb_crdt_comment where comments is not null 2 ; COUNT(*) ---------- 1951250
Merci beaucoup pour tes réponses, ce morceau de code me permet enfin de compléter mon traitement de reprise de données. :king:

l'opération prend quelques minutes (3-4 min) pour 2000000 de lignes mais sur un traitement qui dure déja 4 heurs ça me parait largement convenable.

Merci beaucoup.