sql >> Database >  >> RDS >> Oracle

Hoe voeg ik twee vergelijkbare database-schema's samen in PL/SQL?

Zoals beloofd om te helpen in mijn commentaar, had ik een dynamische code voorbereid die je kunt proberen om de gegevens merged te krijgen met de bron- en doeltabellen. De logica is als volgt:

Stap1:Haal alle tabelnamen op uit de SOURCE schema. In de onderstaande query kunt u respectievelijk de naam van het schema (eigenaar) vervangen. Voor testdoeleinden had ik slechts 1 tabel genomen, dus verwijder de filterclausule voor tabelnaam wanneer u deze uitvoert.

Stap 2:Haal de namen van de beperkte kolommen voor de tabel op. Dit wordt gebruikt om de ON . voor te bereiden clausule die later zou worden gebruikt voor MERGE verklaring.

Stap 3:Haal de niet-beperkte kolomnamen voor de tabel op. Dit zou worden gebruikt in UPDATE clausule tijdens het gebruik van MERGE .

Stap 4:Bereid de insert voor lijst wanneer de gegevens niet overeenkomen ON voorwaarde van MERGE uitspraak.

Lees mijn inline opmerkingen om elke stap te begrijpen.

CREATE OR REPLACE PROCEDURE COPY_TABLE
AS
Type OBJ_NME is table of varchar2(100) index by pls_integer;

--To hold Table name
v_obj_nm OBJ_NME ;

--To hold Columns of table
v_col_nm OBJ_NME;

v_othr_col_nm OBJ_NME;
on_clause VARCHAR2(2000);
upd_clause VARCHAR2(4000);
cntr number:=0;
v_sql VARCHAR2(4000);

col_list1  VARCHAR2(4000);
col_list2  VARCHAR2(4000);
col_list3  VARCHAR2(4000);
col_list4  varchar2(4000);
col_list5  VARCHAR2(4000);
col_list6  VARCHAR2(4000);
col_list7  VARCHAR2(4000);
col_list8  varchar2(4000);

BEGIN

--Get Source table names
SELECT OBJECT_NAME
BULK COLLECT INTO v_obj_nm
FROM all_objects 
WHERE owner LIKE  'RU%' -- Replace `RU%` with your Source schema name here
AND object_type = 'TABLE'
and object_name ='TEST'; --remove this condition if you want this to run for all tables

FOR I IN 1..v_obj_nm.count
loop
--Columns with Constraints 
  SELECT column_name
  bulk collect into v_col_nm 
  FROM user_cons_columns
  WHERE table_name = v_obj_nm(i);  

--Columns without Constraints remain columns of table
SELECT *
BULK COLLECT INTO v_othr_col_nm
from (
      SELECT column_name 
      FROM user_tab_cols
      WHERE table_name = v_obj_nm(i)
      MINUS
      SELECT column_name  
      FROM user_cons_columns
      WHERE table_name = v_obj_nm(i));

--Prepare Update Clause  
 FOR l IN 1..v_othr_col_nm.count
  loop
   cntr:=cntr+1;
   upd_clause := 't1.'||v_othr_col_nm(l)||' = t2.' ||v_othr_col_nm(l);    
   upd_clause:=upd_clause ||' and ' ;

   col_list1:= 't1.'||v_othr_col_nm(l) ||',';
   col_list2:= col_list2||col_list1;   

   col_list5:= 't2.'||v_othr_col_nm(l) ||',';
   col_list6:= col_list6||col_list5;

   IF (cntr = v_othr_col_nm.count)
   THEN 
    --dbms_output.put_line('YES');
     upd_clause:=rtrim(upd_clause,' and');
     col_list2:=rtrim( col_list2,',');
     col_list6:=rtrim( col_list6,',');
   END IF;
     dbms_output.put_line(col_list2||col_list6); 
   --dbms_output.put_line(upd_clause);
   End loop;
  --Update caluse ends     

   cntr:=0; --Counter reset  

 --Prepare ON clause  
  FOR k IN 1..v_col_nm.count
  loop
   cntr:=cntr+1;
   --dbms_output.put_line(v_col_nm.count || cntr);
   on_clause := 't1.'||v_col_nm(k)||' = t2.' ||v_col_nm(k);    
   on_clause:=on_clause ||' and ' ;

   col_list3:= 't1.'||v_col_nm(k) ||',';
   col_list4:= col_list4||col_list3;    

   col_list7:= 't2.'||v_col_nm(k) ||',';
   col_list8:= col_list8||col_list7;    

   IF (cntr = v_col_nm.count)
   THEN 
    --dbms_output.put_line('YES');
    on_clause:=rtrim(on_clause,' and');
    col_list4:=rtrim( col_list4,',');
    col_list8:=rtrim( col_list8,',');
   end if;

   dbms_output.put_line(col_list4||col_list8);
 -- ON clause ends

 --Prepare merge Statement

    v_sql:= 'MERGE INTO '|| v_obj_nm(i)||' t1--put target schema name before v_obj_nm
              USING (SELECT * FROM '|| v_obj_nm(i)||') t2-- put source schema name befire v_obj_nm here 
              ON ('||on_clause||')
              WHEN MATCHED THEN
              UPDATE
              SET '||upd_clause ||              
              ' WHEN NOT MATCHED THEN
              INSERT  
              ('||col_list2||','
                ||col_list4||
              ')
              VALUES
              ('||col_list6||','
                ||col_list8||          
               ')';

      dbms_output.put_line(v_sql);   
      execute immediate v_sql;
  end loop;    
End loop;
END;
/

Uitvoering:

exec COPY_TABLE

Uitgang:

anonymous block completed

PS:ik heb dit getest met een tabel met 2 kolommen waaruit ik een unieke sleutelbeperking had. De DDL van de tabel is als volgt:

Aan het einde zou ik willen dat je mijn code kon begrijpen (je bent een noob) en iets soortgelijks zou implementeren als het bovenstaande niet voldoet aan je vereisten.

 CREATE TABLE TEST
       (    COL2 NUMBER, 
            COLUMN1 VARCHAR2(20 BYTE), 
            CONSTRAINT TEST_UK1 UNIQUE (COLUMN1)  
       ) ;


  1. Waarschuwing:mysql_fetch_object():opgegeven argument is geen geldige MySQL-resultaatbron

  2. Retourneer alle rijen van een specifieke partitie in SQL Server (T-SQL)

  3. Laravel 5.3 Welsprekende transacties en beperkingen op buitenlandse sleutels

  4. MySQL-datumformaat DD/MM/JJJJ zoekopdracht selecteren?