SQLRPGLE ResultSet in großes Feld

[Malte]

Das mit dem dsppdm wäre eigentlich perfekt weil mit substr in sql könnte ich da ja raus filtern.

hier habe ich was mit dspfd

http://newsolutions.de/forum-systemi...und-array.html

aber mit dsppfm geht das nicht oder geibt es da auch eine ähnlich möglichkeit

[Fuerchau]

Dann kommen wir doch mal zur eigentlichen Aufgabe zurück.
Was soll das Programm denn leisten?
Wenn alle Dateien die gleichen Schlüssel haben, warum habe sie dann unterschiedliche Felder?

Mit Native SQL kann man per DESCRIBE TABLE ebenso alle Felder einer Tabelle auslesen um sie dann per Concat zu lesen.
Ich frage mich aber, wass denn mit den Daten danach passieren soll.
Hast du erst mal alles in der Struktur musst du ja doch Feldlängen o.ä. kennen.

Es gibt ja auch einen Umweg :
CPYFRMIMPF: Kopieren ins IFS
CPYFRMSTMF: Kopieren aus IFS in Datei mit genau 1 Feld.

[Malte]

Die Schlüsel sind gleich weil es eine Gruppe von Datein ist die alle ähnlich funktionieren und mit den gleichen Informationen angesprochen werden können aber verschiedene Ergebnise liefern.

Das Programm soll die im Input Parameter des Programms geforderte Datei lesen und desen Inhalt so zurück geben das dieser auf der vom aufrufenden Programm in eine DS geschoben werden kann die extern durch die Datei defieniert wurde.

Deshalb wäre es perfekt für mich wenn ich die Daten so in mein Feld bekommen kann wie sie bei dsppfm angezeigt werden.

So langsam zweifel ich aber ob das so möglich ist wie ich mir das vorstelle.

[malzusrex]

Dann nur über einen Umweg.
Erstelle dir eine Zwischendatei
Crtpf qtemp/help rcdlen(5000)
cpyf Myfile qtemp/help mbropt(*replace) fmtopt(*nochk)

In der HELP hast du jetzt ein Feld

Eventuell ist das ja ein Ansatz für dich

Fruß
Ronald

[Malte]

so hab mit der temporären Hilfsdatei hab ich es gelöst das klappt auch sehr gut und ist dauert auch nicht zulange.

Vielen Dank an alle

[Robi]

Wenn das wie dsppfm reicht, kannst du doch alle Dateien im Pgm als E DS definiern und eine String drüber legen.
Allerdings must du in die richtige e ds fetchen.
Robi

sehe grade, du willst nicht alle Felder der Datei, dann geht das nicht.

[Fuerchau]

Das ist aber RLA und nicht SQL und geht dann als "interne" DISK-Datei.
Dabei wird dann halt der gesamte Satz als 1 Feld in die DS übertragen.

[Malte]

Das mit dem DS hatte ich als Notlösung aber dann wäre es ja nicht mehr so flexibel und jedesmal wenn eine neue Datei dazukommt muss das Programm bearbeitet werden.

Die Lösung mit der Hilfsdatei klappt echt gut nur habe ich das Problem das sich immer ein Lock aufbaut denn ich nicht weg kriege.

ich habe schon CLOF versucht der sagt mir Datei nicht offen, ich versuchen ein CLRPFM sagt Datei im zugriff.

MfG Malte

[Fuerchau]

Dann ist dein SQL-Cursor noch offen!
WRKOBJLCK sagt dir, wer die Sperre hält.

[Malte]

oh man an den Cousor hab ich nicht mehr gedacht und ich dachte ich hätte was bei den System-Befehlen falsch gemacht.

vielen Dank