AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

IBExpert + IBEBlock

Ein Thema von Dumpfbacke · begonnen am 28. Apr 2013 · letzter Beitrag vom 28. Apr 2013
Antwort Antwort
Dumpfbacke
Online

Registriert seit: 10. Mär 2005
Ort: Mitten in Deutschland
329 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#1

IBExpert + IBEBlock

  Alt 28. Apr 2013, 18:24
Datenbank: Firebird • Version: 2,5 • Zugriff über: IBExpert
Hallo Leute,
ich möchte gerne einen Ableich zwischen zwei Tabelle in zwei Datenbanken machen. Hierzu benutze ich diesen Script.
Nun sind jedoch nocht zwei Fragen offen und ich hoffe es kann mir jemand hier helfen.

1.) Kann man das Script so anpassen das es funktioniert ohne das Script in einer Datei zwischenzuspeichern ?
2.) Gibt es eine Möglichkeit so ein Script zu erstellen wenn in der zweiten Tabelle der zweiten Datenbank nicht alle Felder vorhanden sind ?


Delphi-Quellcode:

execute ibeblock
returns (
   TotalTime double precision = 0 comment 'Time spent (seconds)')
 as
begin
   StartTime = ibec_gettickcount();
   create connection MasterDB dbname 'localhost:D:\Database\Master.GDB'
   password 'masterkey' user 'SYSDBA'
   clientlib 'C:\FBDLL\fbclient.dll';

   create connection SubscriberDB dbname '192.168.11.109:Slave'   password 'masterkey' user 'SYSDBA'
   sql_dialect 3
   clientlib 'C:\FBDLL\fbclient.dll';

   cbb = 'execute ibeblock (
RecsProcessed variant)
as
begin
if (ibec_mod(RecsProcessed, 100) = 0) then
ibec_progress(Records compared: || RecsProcessed);
end
';

 ibec_CompareTables(MasterDB, SubscriberDB, 'ATNR', 'ATNR',

 'C:\CompRes.sql','OmitUpdates', cbb);
 ibec_CompareTables(MasterDB, SubscriberDB, 'ATNR', 'ATNR',

 'C:\CompRes.sql','AppendMode; OmitDeletes; OmitInserts; UpdateAllColumns', cbb);

 ibec_ExecSQLScript(SzbscriblerDB, 'C:\CompRes.sql', 'ServerVersion=FB25', null);

   close connection MasterDB;
   close connection SubscriberDB;

   EndTime = ibec_gettickcount();
   TotalTime = (EndTime - StartTime) / 1000;
   suspend;
end
Tanja
  Mit Zitat antworten Zitat
Benutzerbild von IBExpert
IBExpert

Registriert seit: 15. Mär 2005
646 Beiträge
 
FreePascal / Lazarus
 
#2

AW: IBExpert + IBEBlock

  Alt 28. Apr 2013, 20:18
Die Frage ist vielelicht besser auf unserem Forum http://www.firebirdexperts.com aufgehoben
aber hier kurz die Antworten dazu:

1. ibec_CompareTables unterstützt aktuell nur die Ausgabe in eine Datei, daher nein
2. Auch das ist bisher nicht vorgesehen, warum nicht einfach die Felder in beiden Tabellen synchron halten?
Holger Klemt
www.ibexpert.com - IBExpert GmbH
Oldenburger Str 233 - 26203 Wardenburg - Germany
IBExpert and Firebird Power Workshops jederzeit auch als Firmenschulung
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 15:14 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz