Re: accessing JDBC database from RPG with embedded SQL

Hi Aaron,

just a Snippet from an article, I'm writing for german NewSolutions:

/free
exec sql connect to DBMYSQL
user :myuser
using :mypwd;
exec sql declare C1 cursor for S1;
prepareString = 'select INTN, CHARN, DECN, NUMERICN, VARCHARN'
+ ' , DATENN, TIMENN from testtyp';
exec sql prepare S1 from :PrepareString;
exec sql open C1;
exec sql fetch next from C1
into :INTN :N1, :CHARN :N2, :DECNN :N3, :NUMERICN :N4
, :VARCHARN :N5, :DATENN, :TIMENN;
exec sql close C1;
exec sql commit;
exec sql disconnect DBMYSQL;
return;
/end-free

In the distribution you will find additional Code with the Sources.
Its normal embedded SQL, as you would use to access the local database and its
compiled as usual. At the moment there are some limitations (no support for
procedure call, no select into, no static declare cursor and you have to
compile with commit, but its not used yet - it will come later)

Besides this you can query and manipulate remote databases over JDBC from
STRSQL (QMQRY as well), even Field selection with F4 for select, update and
insert works.

Dieter