-
Was enthält dann deine KUNDENP?
Ich dachte, das Feld KDNNR aus der KUNDENP sind die zu ermittelnden Kunden?
Die KUNDENP sollte über das Feld KDNNR einen Index erhalten!!!
Dann baust du dir deine SQL's zusammen.
SQLFill = 'INSERT INTO FILE2P ' +
'SELECT char(' + FELDNAME + '), min(''' + TEILDATEI + '''), min(''' + FELDNAME + '''), count(*) from ' + TEILDATEI + ' A ';
IF %SCAN('A':FELDLAENGE) = *ZEROS;
SQLFill +=
' WHERE exists (select * from KUNDENP P where dec(A.' + FELDNAME + ', 7, 0) = P.KDNNR + ')';
ELSE;
SQLFill +=
' WHERE exists (select * from KUNDENP P where A.' + FELDNAME + ' = P.KDNNR + ')';
ENDIF;
SQLFill += ' group by char(' + FELDNAME + ')';
exec sql execute :SQLFill;
Einen eigenen Fetch/Write brauchst du da nicht.
-
Morgen,
das Statement ist so was von genial, das einzige war wir unklar ist warum wurde im 1. Select ein Min('TEILDATEI') angegeben?
Danke noch mal
-
Der Grund ist der "group by".
Ein Feld ohne Aggregat-Funktion muss in der Liste der Group-By aufgeführt werden.
Hierbei ist auch ein Ausdruck möglich:
group by ..., 'TEILDATEI', ...
Da du aber eine Konstante verwendest, liefert ja MIN immer den richtigen Wert so dass man sich Group By eben sparen kann.
PS:
Für meine Genialität werde ich an sonsten bezahlt   .
-
 Zitat von Fuerchau
PS:
Für meine Genialität werde ich an sonsten bezahlt    .
-
so, jetzt habe ich ein schlechtes Gewissen.
Bin aber jedem den Geldhaufen vergönnt.
-
Peanuts 
Similar Threads
-
By AS400-Anfänger in forum NEWSboard Programmierung
Antworten: 6
Letzter Beitrag: 27-06-06, 13:18
-
By behmer in forum IBM i Hauptforum
Antworten: 1
Letzter Beitrag: 29-05-06, 12:52
-
By steven_r in forum NEWSboard Programmierung
Antworten: 3
Letzter Beitrag: 17-05-06, 15:49
-
By cbe in forum NEWSboard Programmierung
Antworten: 2
Letzter Beitrag: 08-06-05, 16:21
-
By juergenkemeter in forum NEWSboard Programmierung
Antworten: 5
Letzter Beitrag: 17-11-04, 14:32
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- You may not post attachments
- You may not edit your posts
-
Foren-Regeln
|
Erweiterte Foren Suche
Google Foren Suche
Forum & Artikel Update eMail
AS/400 / IBM i
Server Expert Gruppen
Unternehmens IT
|
Kategorien online Artikel
- Big Data, Analytics, BI, MIS
- Cloud, Social Media, Devices
- DMS, Archivierung, Druck
- ERP + Add-ons, Business Software
- Hochverfügbarkeit
- Human Resources, Personal
- IBM Announcements
- IT-Karikaturen
- Leitartikel
- Load`n`go
- Messen, Veranstaltungen
- NEWSolutions Dossiers
- Programmierung
- Security
- Software Development + Change Mgmt.
- Solutions & Provider
- Speicher – Storage
- Strategische Berichte
- Systemmanagement
- Tools, Hot-Tips
Auf dem Laufenden bleiben
|
Bookmarks