Moin Zusammen,
wir haben nun endlich mal JVAGATE aktiviert.
Umgebung:
MySQL DB

Der Zugriff funktioniert, leider wird beim Verlassen des Programmes bzw. Ende des Jobs ein Fehler protokolliert, weil pending commits offen sind. Dieses Phänomen hatte ich auch schon beim STRSQL.
Das RPG macht nichts anderes wie auf dem mysql eine Tabelle zu duplizieren. Später gibt es andere RPG Programme, die sich Daten aus mysql ziehen und auch entsprechend updaten.

RPG Auszug:
c/exec sql
c+ set option commit=*CHG
c/end-exec
c/exec sql
c+ connect to asap user :W_User using :W_Pw
c/end-exec
c/exec sql
c+ drop table centralno_test
c/end-exec
c/exec sql
c+ create table centralno_test like centralno
c/end-exec
c/exec sql
c+ insert into centralno_test select * from centralno
c/end-exec
c/exec sql
c+ release asap
c/end-exec
c/exec sql
c+ commit
c/end-exec
c/exec sql
c+ connect reset
c/end-exec

Fehlerbeschreibung Joblog
CPC2191 Completion 00 17/01/23 00:10:56,194444 QLIDLOBJ QSYS 06E6 Q
To module . . . . . . . . . : QC2SYS
To procedure . . . . . . . : system
Statement . . . . . . . . . : 13
Message . . . . : Object R830874 in JVAGATE type *DTAQ deleted.
CPI8351 Information 10 17/01/23 00:10:56,195598 QTNEND QSYS 1C16 Q
Message . . . . : 1 pending changes being rolled back.
CPF9801 Escape 40 17/01/23 00:10:56,196824 QCLRDTAQ QSYS 0269 J
To module . . . . . . . . . : JVAGATE
To procedure . . . . . . . : CLEARRETURNQ
Statement . . . . . . . . . : 476
Message . . . . : Object R830874 in library JVAGATE not found.
From module . . . . . . . . : QLEDEH
From procedure . . . . . . : Q LE leDefaultEh
Statement . . . . . . . . . : 179
To module . . . . . . . . . : CCEXIT
To procedure . . . . . . . : WORK
Statement . . . . . . . . . : 226
Message . . . . : Application error. CPF9801 unmonitored by JVAGATE at
statement 0000000476, instruction X'0000'.
*NONE Completion 17/01/23 00:10:56,200321 CCEXIT JVAGATE *STMT QTNROLLB
From module . . . . . . . . : CCEXIT
From procedure . . . . . . : JOBLOGOUT
Statement . . . . . . . . . : 257
Message . . . . : JDBCGATE: CCEXIT fired 2
CPF8356 Diagnostic 30 17/01/23 00:10:56,204489 QTNEND QSYS 1C16 QWTPITP2
Message . . . . : Commitment control ended with 1 local changes not
committed.
CPF1164 Completion 00 17/01/23 00:10:56,205512 QWTMCEOJ QSYS 0161 *EXT
Message . . . . : Job 830874/MARB/ASAPCOPY ended on 17/01/23 at 00:10:56;
0,013 seconds used; end code 0 .


Die SQL's wurden alle ausgeführt.
Im Dump von JVAGATE kann ich nichts erkennen. Da sieht alles gut aus. Die Frage ist woher der offene commit kommt. Eventuell AS/400 Umgebung spezifisch.

Vlt. hatte jemand ähnliche Probleme.

Danke.
Klaus