SQl-Server 2005 Funktion mit RPG starten

[LindnerSpezial]

Kann ich bei diesem Beispielcode (unten nicht als Submitjob) einen String mitgeben, und ein Resultset zurückbekommen?

PGM
DCL &CMD *CHAR (256)
CHGVAR &CMD ( +
'java -classpath ' !! +
/* Beispiel Applikationsverzeichnis */+
'/home/bender/java:' !! +
/* hier ist meist der native Treiber */+
'/QIBM/ProdData/OS400/java400/ext/db2_classes.jar:' !! +
/* hier ist meist der Toolbox Treiber */+
'/QIBM/ProdData/HTTP/Public/jt400/lib/jt400.jar' !! +
/* qualifizierter Name der main Klasse */+
/* de/bender_dv/transfer/TransferData,class */+
/* muss im Classpath liegen */+
' de.bender_dv.transfer.TransferData ' !! +
/* properties als Parameter */+
'ConnectFrom ConnectTo' +
)
SBMJOB CMD( +
QSH CMD( +
&CMD +
) +
) +
JOB(TRANSFER)
ENDPGM

[Fuerchau]

Per SBMJOB funktioniert das ganze überhaupt nicht da du quer über Jobs nichts zurückgeben kannst.
Was du benötigst ist tatsächlich ein Batchjob, der dir z.B. über eine DTAQ die Daten übergibt. Mit QTEMP geht das so auch leider nicht.

TransferData von Dieter hat noch den Nachteil, dass immer erst die Verbindung aufgebaut, die Daten kopiert und die Verbindung wieder getrennt wird.
Antwortzeiten kannst du da vergessen.

Versuch das Application-Server-Projekt (dazu kann ich allerdings nichts sagen, ggf. kann Dieter dir weiterhelfen).

[LindnerSpezial]

Die "Arbeit" macht ja der SQL-Server!
Es kommen so ca. 20 000 Sätze von der Prozedur zurück.
Das Java Programm, welches die Prozedur aufruft und die Daten in einem Recordset zurückbekommt funktioniert ja auch so weit auf meiner PC Entwicklungsumgebung.
Das Problem ist nur, das ich das Programm mit dem SQL String als Parameter von RPG aufrufen müsste und das Recordset ins RPG zurückbekommen will, um in die QTEMP zu schreiben.

Gruß
Henning

[Fuerchau]

Dann ruf das Java direkt auf, erstelle die Tabelle vorher in deiner QTEMP.
Wenn der Transfer dann durch ist, müsstest du die Datein in deiner QTEMP haben und mit RPG direkt auslesen können.