I have been using Scott's HTTPAPI for many years now very successfully
but only using XML.
I have built my own front end for building XML HTTP Requests as there
hasn't been anything out there on the market and I use Scott's HTTPAPI
to send the requests and response to the request.
This is in production with 5 separate suppliers using multiple requests
per supplier and works awesome and means that we can basically build
requests and respond to them via XML tags in under 1 day for any type
of request and response thanks to Scott and my methodology. (If anyone
wants my front end XML builder they are welcome to all the source code
and objects and powerpoint presentation explaining how it works ). It
is screen and file driven meaning that you have to enter in the XML
tags and sequence and define the type and in each request program call
the BUILDREQUEST procedure and uses call back same as Scott's HTTPAPI.
It takes away the pain of XML begin and end TAG building and is very
flexible and easy to amend.
We are stuck on the IBMi at V5R4.
To this end I now need to do the same but using JSON. As I have seen
there are JSON libraries out there YAJL that perform the building and
parsing of JSON data but no standard methodology to Build / Send/
Respond. So I am in the process of building that methodology using
Scott's HTTPAPI. So what I am trying to achieve? Well I know that
Scott's software which is a black box solution will do all the
Communications for me this means that you pass in a URL and the request
data and it is clever enough to basically take all the information we
provide and will strip it down to the lowest level and take care of all
the Sockets programming removing the need for us to worry about it. It
will then transmit the data over the internet and return the response.
In Scott's methodology for Posting XML data he uses a procedure
INCOMING to process the response that come back in 8192 chunks of data.
Now there isn't any POSTJSON equivalent so I have to build one.
1 - Build the JSON Request data (fields and data I will use the
procedures in YAJL)
2 - Post the request to the 3rd party supplier (I will use
Scott's http_url_post)
3- Deal with the response. (I will use a combination of Scott's return
data in the IFS and YAJL)
Now I am struggling with my POC as I have written a very simple RPG
program (not using YAJL yet) but Scott's http_url_post is failing with
the request data it is transmitting. Now I believe that when Scott
sends the actual data it has been translated from EBCDIC to ASCII I
think using BASE64. When I post using XML then when it writes the debug
data to /tmp/httpapi_debug.txt this is readable on the IBMi so i think
this is pre-translated. But when I do the same for JSON data in
the /tmp/httpapi_debug.txt it is NOT readable on the IBMi so I am
guessing that it has been translated prior to writing
to /tmp/httpapi_debug.txt. Now this is strange because it doesn't
matter if it's XML or JSON as it is just data and these are just data
formats to make it more human readable.
So does anyone have any idea why JSON data that is posted
gives HTTP/1.1 400 Bad Request. I know that the data is ok because I do
the same on google POSTMAN and it works fine.
I would appreciate some help from someone that has already got JSON
data sent ok using Scott's HTTPAPI procedures, and if possible some
working RPG source code.
My RPG
d GlobalError s n
d rc s 10I 0
d wwErrorNo s 10I 0
d wwHttpErr c const('HTTP Comms')
d tmpfile s 50a varying
d Service s 256a
d ClientID s 100a
d AuthCode s 256a
d Password s 50a
d jsonAddr s 65535A varying
d jsonSize s 10I 0
// Setup HTTP Logging of requests going out and in
HTTP_debug(*on);
HTTP_SetCCSIDs(1208:1208);
HTTP_SetFileCCSID(1208);
service = 'https://115.112.132.136/KuoniService/api/appointment/save';
clientid = 'xxxxx';
password = 'xxxxxxx';
http_setauth(HTTP_AUTH_BASIC:%trim(clientid):%trim(password));
// Create a Temporary file in the IFS to contain Response
tmpfile = http_tempfile();
jsonSize = %Size(jsonAddr);
// Build up the JSON Object
jsonAddr = '{' +
' "firstname": "Zorro",'
+ ' "lastname": "Gutierrez", '
+ ' "email": "rgutierrez@xxxxxxxxxxxxx", '
+ ' "telephone": "66-(361)753-8689", '
+ ' "storeid": 6, '
+ ' "PTEId": null, '
+ ' "travelInfo": "Nulla temptus.", '
+ ' "type": "by phone", '
+ ' "requestDate": "2016-09-22 10:58:05", '
+ ' "date": "2016-09-01", '
+ ' "time": "19:20" '
+ '}';
// Perform HTTP request and response
rc = http_url_post( Service
: %addr(jsonAddr)
: %len(jsonAddr)
: tmpfile
: HTTP_TIMEOUT
: HTTP_USERAGENT
: 'application/json');
The error
Host: 115.112.132.136
User-Agent: http-api/1.24
Content-Type: application/json
Content-Length: 299
Authorization: Basic (removed as this can be translated from BASE64
back to char easily hence showing the user and password)
senddoc(): entered
+�@@ ¢£ z@ é k@@ ¢£ z@ �¤£ © k@@@
z@ ¤£ ©| ¢£K k@@@@ £ z@
öö`Móöñ]÷õó`øöøù k@@@@
recvresp(): entered
HTTP/1.1 400 Bad Request
Cache-Control: no-cache
Pragma: no-cache
Content-Type: application/json; charset=utf-8
Expires: -1
Server: Microsoft-IIS/7.5
X-AspNet-Version: 4.0.30319
Barry Giles
Barry Giles email - barrygiles_uk@xxxxxxxxxxx
-----------------------------------------------------------------------
This is the FTPAPI mailing list. To unsubscribe, please go to:
http://www.scottklement.com/mailman/listinfo/ftpapi
-----------------------------------------------------------------------