Hi Alan,
STRSQL does not support these enhancements.
You need to run it from either ACS Run SQL Script or from Client Access IBM
i Navigator - Run an SQL Script.
I just copied the SQL Statement into the Client Access Run an SQL Script and
run it on our 7.1 Machine without any problems.
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
?Train people well enough so they can leave, treat them well enough so they
don't want to.? (Richard Branson)
-----Ursprüngliche Nachricht-----
Von: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im Auftrag von Alan
Shore
Gesendet: Tuesday, 25.10 2016 13:48
An: RPG programming on the IBM i (AS/400 and iSeries)
Betreff: RE: RPGLE to consume a webservice
Hi Birgitta
I saved this e-mail (see below) until I could get a couple of minutes to
really look at it and test it Before I forget - we are on V7r1 (less than a
month ago)
However, when I run this command in STRSQL, I receive the following messages
JVM properties were loaded from a properties file.
The java.version property was detected as input. This property is used as
output only and has no effect on JVM initialization.
Open attributes not valid in a multithreaded job.
Error(s) occurred during running of QsnInzSsnD API.
Open attributes not valid in a multithreaded job.
Error(s) occurred during running of API.
Error(s) occurred during running of QsnCrtEnv API.
Java Virtual Machine is IBM Technology for Java. PID(3840035)
JVM properties were loaded from a properties file.
User-defined function error on member QSQPTABL.
Cancel reply received for message CPF503E.
Are you able to see anything from these messages as to the reason why this
failed?
Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill
-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Birgitta
Hauser
Sent: Monday, October 03, 2016 4:25 AM
To: 'RPG programming on the IBM i (AS/400 and iSeries)'
<rpg400-l@xxxxxxxxxxxx>
Subject: AW: RPGLE to consume a webservice
What about using embedded SQL for accessing web-services?
The following SQL Statement accesses a Web-Service form the European Central
Bank (Exchange Ranges).
Just embed an appropriate SQL-Statements in an Cursor, loop through this
cursor an voila you access a Web-Service with RPG (and embedded SQL)
Select *
From XMLTable(
XMLNamespaces(DEFAULT
'
http://www.ecb.int/vocabulary/2002-08-01/eurofxref',
'
http://www.gesmes.org/xml/2002-08-01' AS
"gesmes"),
'gesmes:Envelope/Cube/Cube/Cube'
Passing XMLParse(DOCUMENT
SysTools.HTTPGetCLOB(
'
http://www.ecb.europa.eu/stats/eurofxref/eurofxref-daily.xml',
''))
Columns Subject VarChar(30) Path '../../../gesmes:subject',
Sender VarChar(30) Path
'../../../gesmes:Sender/gesmes:name',
ExchangeDate Date Path '../@time',
Currency Char(3) Path '@currency',
ExchangeRate Dec(10, 4) Path '@rate' ) a
Here is another example where this technique is used in composition with RPG
and embedded SQL:
RPG Talks To Watson
http://www.itjungle.com/fhg/fhg092716-story01.html
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok) "What is
worse than training your staff and losing them? Not training them and
keeping them!"
"Train people well enough so they can leave, treat them well enough so they
don't want to." (Richard Branson)
-----Ursprüngliche Nachricht-----
Von: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im Auftrag von Sean
Courtney
Gesendet: Saturday, 01.10 2016 13:56
An: rpg400-l@xxxxxxxxxxxx
Betreff: RPGLE to consume a webservice
Wichtigkeit: Hoch
Hello all,
Has anybody used RPGLE to consume a web service using the HTTPAPI (or other
technologies).
I need to send a parameter to the web service and receive a reply in my rpg
program.
If anybody has either a working example or good links for more information
on this theme then please pass it on to me.
Thanks in advance for the help.
Mit freundlichen Grüßen / Kind regards / Bien à vous,
Seán Courtney
Eiresoft
--
This is the RPG programming on the IBM i (AS/400 and 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.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
--
This is the RPG programming on the IBM i (AS/400 and 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.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
--
This is the RPG programming on the IBM i (AS/400 and 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.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
As an Amazon Associate we earn from qualifying purchases.