SQL Update

[Fuerchau]

Nun ja, das "exists" ist schon erforderlich, wenn der Key in Datei1 mal nicht vorhanden ist.

Aber ansonsten ist das schon korrekt, wenn du in der Datei 2 die Felder Jahr/Monat/Tag in 3 Feldern hast, benötigst du auch 3 Subselects.
Dies kannst du aber auch in 1 Befehl machen:

update myfile set
F1 = (Select ...)
,F2 = (select ...)
:
where ...

Ab V5R4 gilt wohl auch fogende Syntax:

Update myfile set
(F1, F2, ...) =
(select X1, X2, X3 from ... where ...)
where ...

[Robi]

Ohne exists geht es nicht, Null Fehler

Die V5R4 Syntax war mir auch grade wieder eingefallen
Nur läuft das bei 490.000 zu ändernden Sätzen bei 2 Mio in der Datei2 (es sind 4 Key Felder) > 3 Stunden

da ist RPG schneller

Danke
Robi

[Fuerchau]

Da würde ich mir mal ansehen, ob es für die Keyfelder auch Indexe ohne Select/Omit gibt bzw. die Key-Definitionen identisch sind !.
3 Stunden ist definitiv zu lang.

[Robi]

Gibt es .
die 'üblichen' Beschleuniger hab ich alle durch.
Daher die Frage nach was anderem ...
Danke
Robi

[andreaspr@aon.at]

sind das sql-tabellen?
wenn nein, glaub ich sofort, dass es mit rpg schneller ist, da in dem fall die alte classic quere engine verwendet wird.

werden von sql auch die indices wirklich verwendet? entweder mittelds debug oder visual explain (im iseries navigator) nachschauen, was sql da wirklich macht bzw. wo da der flaschenhals ist.

[Fuerchau]

Ich könnte da noch mein SQLCPY anbieten.
Dieses bietet auch Update-Funktionen.

[Robi]

werden von sql auch die indices wirklich verwendet? entweder mittelds debug oder visual explain (im iseries navigator) nachschauen, was sql da wirklich macht bzw. wo da der flaschenhals ist.

Danke, das läuft bei mir unter den 'üblichen' Beschleunigern
Das ist alles im grünen Bereich

Und da das RPG pgm mittlereile auch schon durch ist ...

Danke sehr
Robi

[AS400.lehrling]

Werfe mal Cobol in die Runde

Gruß AS400.lehrling

[andreaspr@aon.at]

nur der neugier halber, sind das sql-tabellen gewesen?

[Robi]

nein, ganz 'normale' DDS PF und LF

[andreaspr@aon.at]

ok danke, dann ist eh alles klar.
wenns sql-tabellen wären würde es nämlich auch schneller laufen.

[Fuerchau]

Dem kann ich nicht zustimmen.
Mit PF's und LF's läuft es fast immer genauso schnell wie mit SQL-Tabellen.
Wichtig sind einzig und allein vorhandene Indexe und ob sie identische Definitionen haben.
Identisch heißt hier wirklich identisch. Packed und Zoned ist dem RPG nämlich egal, der schiebt dann Umwandlungen ein, SQL aber nicht.

Manchmal ist es hilfreich, den Key auf der linken Seite per cast anzupassen, also
decimal(a.Key, n, y) = b.key
oder
zoned(a.key, n, y) = b.key

Das funktioniert auch mit ungleich langen Zeichenfeldern:
cast(a.key as char(nn)) = b.key

Und zu guter letzt:
LF's mit Select/Omit werden komplett ignoriert!
In früheren Releases führte allein die Existenz einer solchen LF zur Verwendung der CQE.