Re: simple web service

Hello Sean

I think you can do it with a simple SQL these days:

https://www.ibm.com/docs/en/i/7.3?topic=functions-http-post

Like this from RPG:

exec SQL
values qsys2.http_post (
url=> 'http://systemB',
request_message => '{"somejson":"json is cool"}
-- HTTPS only: options =>
'{"sslCertificateStoreFile":"/home/javaTrustStore/fromJava.KDB"}'
) into :res;

Or if you don't have the latest TR then you can still use

https://www.ibm.com/docs/en/i/7.3?topic=overview-httppostblob-httppostclob-scalar-functions
exec SQL
values qsys2.httppostclob (
url=> 'http://systemB',
reqmsg => '{"somejson":"json is cool"}
) int :res;

perhaps you need to set the content type if system B is testing for that

Otherwise you can also use the IceBreak community edition if you want to do
it for free: https://www.system-method.com/page/icebreak-ce



On Tue, Dec 21, 2021 at 10:56 AM Sean Courtney <scourtney@xxxxxxxxxxx>
wrote:

Hello Maria and all other replies,

thank you all for you suggestions but the B-System admins do not allow any
direct access to the DB and the way to go has been defined as a web service
....

So glad for any other solutions or examples ...

Mit freundlichen Grüßen / Kind regards / Bien à vous,



Email : scourtney@xxxxxxxxxxx
Web : www.eiresoft.de
Telefon : 0049 (0) 8271-814 229 Mobil : 0049 (0) 172-8560663


-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf Of
Maria Lucia Stoppa
Sent: Montag, 20. Dezember 2021 11:01
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: simple web service

Hi Sean,
We had a similar situation, meaning our system A (DB2 on POWER9) needs to
check some rows state on our system B (SQL Server running a document
management system).
Instead of having a web service running on system B, which implies some
coding on system B, and being both systems on the same internal net, we
resolved to implement ARDGATE software: on system A a relational DB entry
is defined and it points to the SQL Server instance on system B, and when
it's the case system A performs an SQL select statement to check row' state
on system B.

If you think it may be of help I can share other details.

Il giorno lun 20 dic 2021 alle ore 10:23 Sean Courtney <
scourtney@xxxxxxxxxxx> ha scritto:

Hello all,



I have two systems hosting order data. When a user want to make a

change

to an order on system A he/she must first verify the order state on
system B.



We want to implement a web service to achieve the above so when the
user accesses an order on System A and a request is automatically sent
to system B and the current order state is returned.



System A is an AS400 (DB2) and System B is Windows Box running MS
SQL Server.



Has anybody go a simple example for doing the above ??



Mit freundlichen Grüßen / Kind regards / Bien à vous,



Sean Courtney



Email : <mailto:scourtney@xxxxxxxxxxx

?subject=Bitte%20kontaktieren>

scourtney@xxxxxxxxxxx





--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription
related questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com

--

Maria Lucia Stoppa
mlstoppa@xxxxxxxxx
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or
change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com

--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com