[SQL0466] 2 Ergebnisgruppen sind aus Prozedur

[Toschie]

Danke für die Antwort.
Wenn mehr als 5 Datensätze vorhanden sind, werden diese ebenfalls zurückgegeben.

Aktuell habe ich ca. 1000 Datensätze die alle zurückgegeben werden.
Wobei es später definitv weniger sein werden, da nach der Verarbeitung die Tabelle leer gemacht wird.

Das ganze soll eine Schnittstelle zu einem anderem Anbieter sein.
Dieser benötigt von uns Daten und kann NUR ein SQL-Result verarbeiten.
Daher dieser ganze kram.

Du sagtest in diesem Fall ja.
Gibt es noch eine andere Möglichkeit?
Also aus der Verarbeitung heraus ein SQL-Result zu erhalten?

Jeder Rat ist gut =)

[Toschie]

Ok glaub ich habs
wenn ich

C*****/EXEC SQL                                                         
C*****+ SET RESULT SETS FOR RETURN TO CLIENT ARRAY :RESULTS FOR :X ROWS,
C*****+  CURSOR C1                                                      
C*****/END-EXEC

Auskommentieren, dann bekomme i nur ein Result

So wie ich es haben wollte =)

[mk]

Hi,

wenn das RPG nur ein SQL enthält um Daten als Resultset
zu liefern, dann lass doch das RPG weg.

In der SQL Procedure kannst Du den select direkt eintragen.
Gruß
Michael

[Toschie]

@mk: Danke für den Hinweis.
Das RPG macht nachher schon noch mehr Sachen. Ich habe das Programm zum Testen jetzt erstmla recht klein gehalten.

[Fuerchau]

Wenn du nur die Daten des Cursors zurückgeben willst, brauchst du in deinem RPGle eigentlich nichts machen und schon gar nicht den Cursor lesen (Fetch), da sonst der Aufrufer nichts bekommt (Fetch Only).

Veränderst du die Daten um die geänderten Daten des Array's zurückzugeben, so lass das
"CURSOR WITH RETURN TO CLIENT" weg, da du ja das Array zurückgeben willst und mach zum Schluss einen "Close".

Bei wiederholten Aufrufen der Prozedur ist ggf. ein "Close" vor dem "Open" erforderlich da der Cursor noch offen sein kann.

[Toschie]

Ok das sieht super aus =)

Danke für die Unterstützung.

[B.Hauser]

Ok glaub ich habs
wenn ich

C*****/EXEC SQL                                                         
C*****+ SET RESULT SETS FOR RETURN TO CLIENT ARRAY :RESULTS FOR :X ROWS,
C*****+  CURSOR C1                                                      
C*****/END-EXEC

Auskommentieren, dann bekomme i nur ein Result

So wie ich es haben wollte =)

Die Ausgabe über SET RESULT SETS ist bereits seit Release V5R1 nicht mehr erforderlich. Das Result-Set wird allein dadurch ausgegeben, dass der Cursor vor Programm/Prozedur-Ende geöffnet und nicht geschlossen wird.

Birgitta

[Fuerchau]

@Birgitta
Aha, und wie soll dann das Array und nicht der Cursor zurückgegeben werden?

[B.Hauser]

Man kann natürlich weiterhin Arrays über SET RESULT SETS ausgeben und den Cursor vor Programm-Ende schließen. Nur warum sollte man 2 Schritte machen, wenn nur ein einziger notwendig ist?

Außerdem kann ein Array nur eine bestimmte Anzahl an Elementen zurückgeben, während über einen geöffneten Cursor eine unbestimmte Anzahl an Elementen ausgegeben werden kann.

Birgitta

[Fuerchau]

Dann les doch besser mal die Aufgabenstellung:
"Das RPG macht nachher schon noch mehr Sachen"!
Nur mit dem Cursor scheint es da wohl nicht getan.