Generierung Select Statement aus Excel Daten
15.10.2013 09:22:15
Tom
Ich steh momentan vor einem echten Problem.
Und zwar möchte ich anahnd der Daten im Excel mir einen Select draus basteln.
Beispiel Select aus den ersten beiden Zeilen:
SET CURRENT SCHEMA = 'R017N50G';
SELECT
CASE
WHEN D.ART = 'STAN'
AND D.PRODUKT = 'ABFE'
AND D.GEBUEHRENGRUPPE = 'SON1'
AND D.FREIE_GLIEDERUNG = 'KOMM'
THEN
CHAR(DIGITS(DECIMAL(D.NUMMER,11,0))) !!
SUBSTR(';',1,1) !!
SUBSTR(D.PRODUKT,1,4) !!
SUBSTR(';',1,1) !!
SUBSTR('ABFE',1,4) !!
SUBSTR(';',1,1) !!
SUBSTR(D.GEBUEHRENGRUPPE,1,4) !!
SUBSTR(';',1,1) !!
SUBSTR('SON4',1,4) !!
SUBSTR(';',1,1) !!
SUBSTR(D.FREIE_GLIEDERUNG,1,4) !!
SUBSTR(';',1,1) !!
SUBSTR('STAN',1,4)
WHEN D.ART = 'STAN'
AND D.PRODUKT = 'ABFE'
AND D.GEBUEHRENGRUPPE = 'SON1'
AND D.FREIE_GLIEDERUNG = 'STAN'
THEN
CHAR(DIGITS(DECIMAL(D.NUMMER,11,0))) !!
SUBSTR(';',1,1) !!
SUBSTR(D.PRODUKT,1,4) !!
SUBSTR(';',1,1) !!
SUBSTR('ABFE',1,4) !!
SUBSTR(';',1,1) !!
SUBSTR(D.GEBUEHRENGRUPPE,1,4) !!
SUBSTR(';',1,1) !!
SUBSTR('SON4',1,4) !!
SUBSTR(';',1,1) !!
SUBSTR(D.FREIE_GLIEDERUNG,1,4) !!
SUBSTR(';',1,1) !!
SUBSTR('STAN',1,4)
.....WHEN... usw
Es ist immer die Spalte Depotart, Produkt NEU, Gebührengruppe NEU, Freie Gliederung NEU zu berückstichtigen.
Im Excel gibt es weitere Zeilen, welche u.A. noch Folgende Depotarten enthalten:
NOST (Nostrodepot); HASI (Hausinterne) und ANGE (Angestelltedepot)
Ich kenn mich in VBA leider gar nicht gut aus und wäre sehr mit Dank verbunden, wenn mir da wer weiterhelfen könnte so einen Output zu basteln.
Der Output (der Select) sollte in ein neues Tabellenblatt geschrieben werden.
(Wenn möglich nach max. 80 Zeichen in die nächste Spalte zu schreiben?)
Danke
lg