× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Ok, by specifying RDB(*LOCAL) on the CRTSQLRPGI command, that appears to
make it a "Distributed SQL program."
With that, I can now connect to the PC Websphere database.
But, whenever I run a statement, I get:
SQL0805 - "SQL package TESTMSQL 0 in KANDERSON not found at DRDA
Server." 

With this new error code I found some questions about it in the
archives, but no answer in regard to connecting to a PC database.  (The
only answers out there seem to be to create the SQL package on the
remote iSeries.)  Any ideas?  How come interactive SQL from the iSeries
is connecting and performing fine but embedded isn't?

Kurt Anderson
Application Developer
Highsmith Inc

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Kurt Anderson
Sent: Tuesday, April 25, 2006 11:54 AM
To: RPG programming on the AS400 / iSeries
Subject: RPG Embedded SQL connect to PC Websphere db

When I'm in interactive SQL (strsql), I can connect to the PC Websphere
db by doing:
       connect to webdev user username using 'password'
(I then see it change data refresh from *always to *forward, commit from
*none to *cs, allow copy data from *yes to *optimize, naming from *sys
to *sql, datfmt from *mdy to *usa, and timfmt from *hms to *jis.)
>From there I can then interact with the database.
 
But in RPG, I'm having issues connecting.
I'm attempting to emulate the parenthetical above (the allow copy data
is the compile default, and I don't know how to change the refresh to
*forward).
C/EXEC SQL

C+ Set Option COMMIT =*CS, NAMING =*SQL, DATFMT =*USA, TIMFMT =*JIS

C/END-EXEC
 
I issue the connect (the host variables are all defined as 10a):
C/EXEC SQL
C+ Connect To :rdb User :userid Using :pw
C/END-EXEC
I then get SQL0862
"Local program attempted to connect to a remote relational database."
The recovery says to use the RDB parameter on the compile.  I'd rather
not because the relational database I'm connecting to is different
depending on what box this program is running on.
 
v5r2
 
Thanks for any help, and feel free to ask me about any information I
forgot to mention.
 
Kurt Anderson
Application Developer
Highsmith Inc.
W5527 State Road 106, P.O. Box 800
Fort Atkinson, WI 53538-0800
TEL (920) 563-9571  FAX (920) 563-7395
EMAIL kjanderson@xxxxxxxxxxxxx
 
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.



As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.