Zwei Tabellen vergleichen und erste Aktualisieren

[Matthias182]

Hallo,

ich brauche mal wieder ein wenig gedankliche Unterstützung.

Ich versuche ein Vorgehen zu entwickeln, um verlässlich Daten von einer Datei in eine andere Datei zu schreiben.

Ich versuche das mal an einem Beispiel zu erklären:

Ich habe zwei Tabellen:

Haupttabelle:
1. Feld 2. Feld 3. Feld 4. Feld
A B C D


Updatetabelle:
1. Feld 2. Feld 3. Feld 4. Feld
A B G H
W X Y Z

Nun erwarte ich folgendes Vorgehen / Ergebnis von meiner Lösung.

Der 2. Datensatz in der Updatetabelle wird in die erste Tabelle geschrieben, also neu angelegt.

Aus dem 1. Datensatz der Updatetabelle werden die Werte in den ersten Datensatz der Haupttabelle geschrieben, die sich unterscheiden.

Die Haupttabelle wird also im Ergebnis der Updatetabelle entsprechen. Dabei kann es jedoch sein, dass die Haupttabelle einige 1000
Datensätze enthält. Der Schlüssel ist für beide Tabellen das 1. Feld.

Am liebsten wäre mir eine Lösung per SQL, aber hier bedarf es wohl noch etwas mehr Aufwand.

Für ein wenig Hilfe wäre ich sehr dankbar.


Gruß

Matthias

[Matthias182]

Vielleicht noch zur Info, ich kann leider nur mit CL und interaktivem SQL umgehen.

QMQRY in CL integrieren schaffe ich auch noch.

[Fuerchau]

Hierfür sind 2 verschiedene SQL's erforderlich, da SQL keinen UpdateInsert kennt.

1.
Update filea a
set a.f2 = (select b.f2 from file b where a.f1=b.f1)
where a.f1 in (select b.f1 from file b)

2.
insert into file a
select f1, ... from file b
where b.f1 not in (select c.f1 from file c)


PS:
Mit meinem SQLCPY geht so was spielend leicht

[Matthias182]

Kannst du mir noch ein paar Infos zu dem SQLCPY geben?

[Fuerchau]

Nunja, in der F1-Hilfe ist eigentlich alles erklärt (nach Installation).

Aber das wesentliche findest du hier:
Software

[Matthias182]

Hallo,

ich versuche meine Lösung noch ein wenig zu erweitern und möchte dazu einen SQL bauen, der das Update auf verschiedene Files machen kann, unabhängig von der Anzahl der Felder. So könnte ich dies als eine Art Modul verwenden und muss es nicht für jede Datei individuell aufbauen.

1.
Update filea a
set a.f2 = (select b.f2 from file b where a.f1=b.f1)
where a.f1 in (select b.f1 from file b)

Der SQl sollte dabei etwas so aussehen, wie schon vorgeschlagen, aber mit mehreren SET statements. Das Problem für mich ist nun aber, ich weiß nie wie viele Felder die Tabelle haben kann. Lediglich das Maximum kann ich benennen.

Hat jemand eine Idee, wie ich das machen könnte?

Vielen Dank.

Matthias

[woki]

ich denke da mußt du mit dynamischen SQL-Statements arbeiten. Weißt du denn an einer stelle des Programms (nicht im SQL-Statement), um welche Felder es sich handelt?

[Matthias182]

Eigentlich ja, wenn ich das Programm aufrufe übergebe ich die entsprechende Datei als Parameter. Dann könnte man die Zahl ja auslesen.

Allerdings, dynamisches SQL ist mir fremd. Das bedeutet ja auch HLL (RPG), eine solche beherrsche ich leider nicht.


Gruß

Matthias

[woki]

Um was für ein Programm handelt es sich denn? Um ein RPG-Programm??

Beispiele für dynamisches SQL findest du hier im Forum:
-Stichwort EXECUTE IMMEDIATE mit SQL Befehl als String in einer Variablen
-Alternativ DECLARE, PREPARE, EXECUTE

[Fuerchau]

Du kannst im QMQRY beliebge Variablen eingeben. Allerdings darf die Länge jeder einzelnen Variable 55 nicht übersteigen.
Du kannst also folgendes tun:

&VAR1&VAR2&VAR3....&VAR10

Zu Laufzeit strickst du deinen SQL im CLP zusammen und übergibst per SETVAR den Inhalt in 55er Blöcken:

dcl &mysql *char 550

chgvar &mysql ('update ....')

strqmqry ...
setvar ((VAR1 %sst(&mysql 1 55) (VAR2 %sst(&mysql 56 55) ... (VAR10 %sst(&mysql 496 55))

[Matthias182]

Hallo,

ich habe jetzt mal einen ersten SQL gebaut, der das Einfügen in Abhängigkeit von einer anderen Tabelle erledigt. Ist noch etwas erweitert zu der obigen Anforderung, aber es tut das, was ich erwarte.

INSERT INTO &RELEASE/&FILE
SELECT * FROM &FILE
WHERE &FILE.&FIELD in (Select &FIELD from CFWRLSSET/&FILE)

Leider erhalte ich nach der für mich scheinbar korrekten Ausführung folgenden Fehler im Joblog:

No query data to SAVE.
SAVE DATA command ended due to error.
STRQMQRY command failed.


Weiß jemand, was da nicht stimmt?

[Fuerchau]

Hast du die ganzen Variablen auch korrekt gefüllt ?