Importer les données d'une table dans une autre

Version imprimable

Voir 40 message(s) de cette discussion en une page

Bonjour,

J'essaie d'importer les données d'une table dans une autre en exécutant ce code mais ça ne marche pas mais lorsque j'inverse l'update avec l'insert ça marche mais lorsque j'exécute la procédure une deuxième fois les enregistrements se font en double.

Je sais qu'il y a le select count into mais je ne sais pas comment faire ? ou bien une autre solution si quelqu'un peut m'aider ?

Merci d'avance !

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
create or replace PROCEDURE IMPORT_TRANSFERT
IS
  CURSOR CUR
  IS
    SELECT
      UPP_NAM,UPP_FNA,UPP_LOG,UPP_PWD,UPP_STA,UPP_INM,UPP_END,UPP_MEL,UPP_IPA,UPP_SST,UPP_PSS,TIT_KEY,CIV_KEY,AUD_KEY,UPP_PPW,
      UPP_DPW,UPP_TIC,UPP_SUD,UPP_INN,CPS_KEY,MAU_KEY,UPP_WWI,UPP_EXT,UPP_UPD,UPP_SGN,UPP_DAD,UPP_DAF,UPP_AMS
    FROM PPP_UPP;
BEGIN
  FOR CUR_REC IN CUR
  LOOP
    BEGIN
      UPDATE PPP_MAIN_TRANSFERT
      SET PER_NAM = CUR_REC.UPP_NAM, PER_FNA = CUR_REC.UPP_FNA, UPP_LOG = CUR_REC.UPP_LOG, UPP_PWD = CUR_REC.UPP_PWD,
          UPP_STA = CUR_REC.UPP_STA, UPP_INM = CUR_REC.UPP_INM, UPP_END = CUR_REC.UPP_END, UPP_MEL = CUR_REC.UPP_MEL,
          UPP_IPA = CUR_REC.UPP_IPA, UPP_SST = CUR_REC.UPP_SST, UPP_PSS = CUR_REC.UPP_PSS, TIT_KEY = CUR_REC.TIT_KEY,
          CIV_KEY = CUR_REC.CIV_KEY, AUD_KEY = CUR_REC.AUD_KEY, UPP_PPW = CUR_REC.UPP_PPW, UPP_DPW = CUR_REC.UPP_DPW,
          UPP_TIC = CUR_REC.UPP_TIC, UPP_SUD = CUR_REC.UPP_SUD, UPP_INN = CUR_REC.UPP_INN, CPS_KEY = CUR_REC.CPS_KEY,
          MAU_KEY = CUR_REC.MAU_KEY, UPP_WWI = CUR_REC.UPP_WWI, UPP_EXT = CUR_REC.UPP_EXT, UPP_UPD = CUR_REC.UPP_UPD, 
          UPP_SGN = CUR_REC.UPP_SGN, UPP_DAD = CUR_REC.UPP_DAD, UPP_DAF = CUR_REC.UPP_DAF
      WHERE PER_NAM = CUR_REC.UPP_NAM
        AND PER_FNA  = CUR_REC.UPP_FNA
        AND UPP_LOG  = CUR_REC.UPP_LOG;
    EXCEPTION
      -- SI L'INSERTION ECHOUE, ON FAIT UN UPDATE
      WHEN NO_DATA_FOUND THEN
        BEGIN
          INSERT INTO PPP_MAIN_TRANSFERT
          (
            PER_NAM,PER_FNA,UPP_LOG,UPP_PWD,UPP_STA,UPP_INM,UPP_END,UPP_MEL,UPP_IPA,UPP_SST,UPP_PSS,TIT_KEY,CIV_KEY,AUD_KEY,
            UPP_PPW,UPP_DPW,UPP_TIC,UPP_SUD,UPP_INN,CPS_KEY,MAU_KEY,UPP_WWI,UPP_EXT,UPP_UPD,UPP_SGN,UPP_DAD,UPP_DAF,UPP_AMS
          )
          VALUES 
          (
            CUR_REC.UPP_NAM,CUR_REC.UPP_FNA,CUR_REC.UPP_LOG,CUR_REC.UPP_PWD,CUR_REC.UPP_STA,CUR_REC.UPP_INM,CUR_REC.UPP_END,
            CUR_REC.UPP_MEL,CUR_REC.UPP_IPA,CUR_REC.UPP_SST,CUR_REC.UPP_PSS,CUR_REC.TIT_KEY,CUR_REC.CIV_KEY,CUR_REC.AUD_KEY,
            CUR_REC.UPP_PPW,CUR_REC.UPP_DPW,CUR_REC.UPP_TIC,CUR_REC.UPP_SUD,CUR_REC.UPP_INN,CUR_REC.CPS_KEY,CUR_REC.MAU_KEY,
            CUR_REC.UPP_WWI,CUR_REC.UPP_EXT,CUR_REC.UPP_UPD,CUR_REC.UPP_SGN,CUR_REC.UPP_DAD,CUR_REC.UPP_DAF,CUR_REC.UPP_AMS
          );
        END;
 
    END;
    COMMIT;
  END LOOP; -- END EXCEPTION
END; -- END PROGRAM

21/09/2009, 11h02
orafrance

Utilise Merge qui évite d'utiliser du PL/SQL ;)
21/09/2009, 11h06
Jinkas

Je ne sais pas comment faire sinon j'aurai préféré faire de cette façon ?
21/09/2009, 11h11
orafrance

tu fais une recherche sur le forum et/ou tu lis la doc :mrgreen:

Sinon est ce que mon update est correcte ?

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
 
 
DECLARE
 
  CURSOR CUR
  IS
    SELECT
      PER_NAM,PER_FNA,UPP_LOG,UPP_PWD,UPP_STA,UPP_INM,UPP_END,UPP_MEL,UPP_IPA,UPP_SST,UPP_PSS,TIT_KEY,CIV_KEY,AUD_KEY,UPP_PPW,
      UPP_DPW,UPP_TIC,UPP_SUD,UPP_INN,CPS_KEY,MAU_KEY,UPP_WWI,UPP_EXT,UPP_UPD,UPP_SGN,UPP_DAD,UPP_DAF,UPP_AMS
    FROM PPP_MAIN_TRANSFERT;
 
BEGIN
 
  FOR CUR_REC IN CUR LOOP
      UPDATE PPP_UPP
      SET UPP_NAM = CUR_REC.PER_NAM, UPP_FNA = CUR_REC.PER_FNA, UPP_LOG = CUR_REC.UPP_LOG, UPP_PWD = CUR_REC.UPP_PWD,
          UPP_STA = CUR_REC.UPP_STA, UPP_INM = CUR_REC.UPP_INM, UPP_END = CUR_REC.UPP_END, UPP_MEL = CUR_REC.UPP_MEL,
          UPP_IPA = CUR_REC.UPP_IPA, UPP_SST = CUR_REC.UPP_SST, UPP_PSS = CUR_REC.UPP_PSS, TIT_KEY = CUR_REC.TIT_KEY,
          CIV_KEY = CUR_REC.CIV_KEY, AUD_KEY = CUR_REC.AUD_KEY, UPP_PPW = CUR_REC.UPP_PPW, UPP_DPW = CUR_REC.UPP_DPW,
          UPP_TIC = CUR_REC.UPP_TIC, UPP_SUD = CUR_REC.UPP_SUD, UPP_INN = CUR_REC.UPP_INN, CPS_KEY = CUR_REC.CPS_KEY,
          MAU_KEY = CUR_REC.MAU_KEY, UPP_WWI = CUR_REC.UPP_WWI, UPP_EXT = CUR_REC.UPP_EXT, UPP_UPD = CUR_REC.UPP_UPD, 
          UPP_SGN = CUR_REC.UPP_SGN, UPP_DAD = CUR_REC.UPP_DAD, UPP_DAF = CUR_REC.UPP_DAF
      WHERE UPP_NAM = CUR_REC.PER_NAM
        AND UPP_FNA  = CUR_REC.PER_FNA
        AND UPP_LOG  = CUR_REC.UPP_LOG;
  END LOOP;
 
  COMMIT;
END;

21/09/2009, 12h30
Waldar

Oui, il a l'air correct.
21/09/2009, 12h41
Jinkas

Malheureusement rien ne se passe. La modification ne se fait pas dans la table destination. Je m'explque, j'ai une seule ligne dans ma table source et la même ligne existe aussi dans ma table destination. Lorsque je modifie la valeur d'un champs de ma table source et que j'exécute la procédure update, le changement n'est pas fait mais l'exécution se fait sans erreur.

???
21/09/2009, 12h50
Waldar

Est-ce que votre clef de jointure dans le WHERE est correcte ?
N'est-elle pas trop restrictive ?
Votre select dans le curseur renvoie-t-il bien quelque chose (rajouter un compteur et affichez son état avec dbms_output, et/ou exécutez la requête à côté) ?
N'avez-vous pas un problème de session ou de commit (dans une session vous voyez la ligne, pas dans une autre) ?
21/09/2009, 13h49
mnitu

L’update ne soulève pas l’exception NO_DATA_FOUND. Il faut utiliser SQL%ROWCOUNT pour vérifier qu’au moins un enregistrement a été modifié.
21/09/2009, 14h03
Jinkas

Oui le select renvoie la seule ligne existante dans la table !
21/09/2009, 14h06
Jinkas

Sincèrement je suis débutant et je ne sais pas comment adaper le rowcount à mon code
21/09/2009, 14h18
orafrance

C'est super de réinventer la roue :aie:

Est ce que ce code est correcte ?

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
DECLARE
  CURSOR CUR
  IS
    SELECT
      PER_NAM,PER_FNA,UPP_LOG,UPP_PWD,UPP_STA,UPP_INM,UPP_END,UPP_MEL,UPP_IPA,UPP_SST,UPP_PSS,TIT_KEY,CIV_KEY,AUD_KEY,UPP_PPW,
      UPP_DPW,UPP_TIC,UPP_SUD,UPP_INN,CPS_KEY,MAU_KEY,UPP_WWI,UPP_EXT,UPP_UPD,UPP_SGN,UPP_DAD,UPP_DAF,UPP_AMS
    FROM PPP_MAIN_TRANSFERT;
BEGIN
  FOR CUR_REC IN CUR
  LOOP
    IF SQL%ROWCOUNT = 1 THEN
      DBMS_OUTPUT.put_line('INSERT');
    ELSE
      DBMS_OUTPUT.put_line('UPDATE');
    END IF;
  END LOOP;
  COMMIT;
END;

c'est pas le contraire ? Si la ligne existe -> UPDATE.

Une fois pour toute, essaye :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
MERGE INTO ppp_main_transfert D
   USING ( SELECT 
      upp_nam,upp_fna,upp_log,upp_pwd,upp_sta,upp_inm,upp_end,upp_mel,upp_ipa,upp_sst,upp_pss,tit_key,civ_key,aud_key,upp_ppw,
      upp_dpw,upp_tic,upp_sud,upp_inn,cps_key,mau_key,upp_wwi,upp_ext,upp_upd,upp_sgn,upp_dad,upp_daf,upp_ams
    FROM ppp_upp ) S
   WHEN MATCHED THEN UPDATE 
      SET PER_NAM = S.UPP_NAM, PER_FNA = S.UPP_FNA, UPP_LOG = S.UPP_LOG, UPP_PWD = S.UPP_PWD,
          UPP_STA = S.UPP_STA, UPP_INM = S.UPP_INM, UPP_END = S.UPP_END, UPP_MEL = S.UPP_MEL,
          UPP_IPA = S.UPP_IPA, UPP_SST = S.UPP_SST, UPP_PSS = S.UPP_PSS, TIT_KEY = S.TIT_KEY,
          CIV_KEY = S.CIV_KEY, AUD_KEY = S.AUD_KEY, UPP_PPW = S.UPP_PPW, UPP_DPW = S.UPP_DPW,
          UPP_TIC = S.UPP_TIC, UPP_SUD = S.UPP_SUD, UPP_INN = S.UPP_INN, CPS_KEY = S.CPS_KEY,
          MAU_KEY = S.MAU_KEY, UPP_WWI = S.UPP_WWI, UPP_EXT = S.UPP_EXT, UPP_UPD = S.UPP_UPD, 
          UPP_SGN = S.UPP_SGN, UPP_DAD = S.UPP_DAD, UPP_DAF = S.UPP_DAF
      WHERE ( PER_NAM = S.UPP_NAM
        AND PER_FNA  = S.UPP_FNA
        AND UPP_LOG  = S.UPP_LOG )
   WHEN NOT MATCHED THEN INSERT VALUES 
          (
            S.UPP_NAM,S.UPP_FNA,S.UPP_LOG,S.UPP_PWD,S.UPP_STA,S.UPP_INM,S.UPP_END,
            S.UPP_MEL,S.UPP_IPA,S.UPP_SST,S.UPP_PSS,S.TIT_KEY,S.CIV_KEY,S.AUD_KEY,
            S.UPP_PPW,S.UPP_DPW,S.UPP_TIC,S.UPP_SUD,S.UPP_INN,S.CPS_KEY,S.MAU_KEY,
            S.UPP_WWI,S.UPP_EXT,S.UPP_UPD,S.UPP_SGN,S.UPP_DAD,S.UPP_DAF,S.UPP_AMS
          );

A l'erreur de syntaxe près ;)

21/09/2009, 14h47
Jinkas

OUI c l'inverse dsl.

Je vais tester votre code !!
21/09/2009, 14h51
Jinkas

ORA-00969: mot-clé ON absent au niveau de cette ligne WHEN MATCHED THEN UPDATE

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
MERGE INTO ppp_main_transfert D
   USING ( SELECT 
      upp_nam,upp_fna,upp_log,upp_pwd,upp_sta,upp_inm,upp_end,upp_mel,upp_ipa,upp_sst,upp_pss,tit_key,civ_key,aud_key,upp_ppw,
      upp_dpw,upp_tic,upp_sud,upp_inn,cps_key,mau_key,upp_wwi,upp_ext,upp_upd,upp_sgn,upp_dad,upp_daf,upp_ams
    FROM ppp_upp ) S
 ON (PER_NAM = S.UPP_NAM
        AND PER_FNA  = S.UPP_FNA
        AND UPP_LOG  = S.UPP_LOG)
   WHEN MATCHED THEN UPDATE 
      SET PER_NAM = S.UPP_NAM, PER_FNA = S.UPP_FNA, UPP_LOG = S.UPP_LOG, UPP_PWD = S.UPP_PWD,
          UPP_STA = S.UPP_STA, UPP_INM = S.UPP_INM, UPP_END = S.UPP_END, UPP_MEL = S.UPP_MEL,
          UPP_IPA = S.UPP_IPA, UPP_SST = S.UPP_SST, UPP_PSS = S.UPP_PSS, TIT_KEY = S.TIT_KEY,
          CIV_KEY = S.CIV_KEY, AUD_KEY = S.AUD_KEY, UPP_PPW = S.UPP_PPW, UPP_DPW = S.UPP_DPW,
          UPP_TIC = S.UPP_TIC, UPP_SUD = S.UPP_SUD, UPP_INN = S.UPP_INN, CPS_KEY = S.CPS_KEY,
          MAU_KEY = S.MAU_KEY, UPP_WWI = S.UPP_WWI, UPP_EXT = S.UPP_EXT, UPP_UPD = S.UPP_UPD, 
          UPP_SGN = S.UPP_SGN, UPP_DAD = S.UPP_DAD, UPP_DAF = S.UPP_DAF
      WHERE ( PER_NAM = S.UPP_NAM
        AND PER_FNA  = S.UPP_FNA
        AND UPP_LOG  = S.UPP_LOG )
   WHEN NOT MATCHED THEN INSERT VALUES 
          (
            S.UPP_NAM,S.UPP_FNA,S.UPP_LOG,S.UPP_PWD,S.UPP_STA,S.UPP_INM,S.UPP_END,
            S.UPP_MEL,S.UPP_IPA,S.UPP_SST,S.UPP_PSS,S.TIT_KEY,S.CIV_KEY,S.AUD_KEY,
            S.UPP_PPW,S.UPP_DPW,S.UPP_TIC,S.UPP_SUD,S.UPP_INN,S.CPS_KEY,S.MAU_KEY,
            S.UPP_WWI,S.UPP_EXT,S.UPP_UPD,S.UPP_SGN,S.UPP_DAD,S.UPP_DAF,S.UPP_AMS
          );

21/09/2009, 15h01
Jinkas

ORA-00918: définition de colonne ambigu au niveau de la ligne AND UPP_LOG = S.UPP_LOG)
21/09/2009, 15h17
mnitu

Pour l’update : ll n’est pas possible de mettre à jour la clé (les zonnes utilisés dans la clause ON) et nul besoin d’une clause where
21/09/2009, 15h24
Jinkas

Désolé je ne comprends pas ce qe vous dites mais j'ai vu qu'il faut mettre un truc comme RIGHT OUTER JOIN.

Voir 40 message(s) de cette discussion en une page