Are you using PB 2019?  Are you using the new RESTClient object?

Yes, I am using PB 2019. I am using RestClient object.

You have to look at the API itself if you want to use something like the RESTClient, although based on your url looks like it's local on your machine or at least inside your own firewall probably.  Is the API published anywhere? 

One thing you can do is capture the HTTP request using a tool like Fiddler or Wireshark.  Capture the successful request and duplicate it using the HTTPClient object.  There's plenty of examples in the Appeon Community.  You can also take a look at my using DropBox REST API from PowerBuilder video with code attached.  There are many other samples as well if you search the site.  It's obviously not specific to your API, but you should get the general idea. 

https://www.appeon.com/developers/library/videos/using-dropbox-rest-api-powerbuilder.html

It doesn't look like it uses any oauth tokens, so you won't need the OAUTHClient.

It works from PostMan with the following parameters

Hi Juan,

1. Can you change the key "Content-Type" to value "application/json;charset=UTF-8" and using raw --> JSON as the body setting format then test it again in the Postman ( see attachment) ?  We need to confirm whether the Rest API provider supports JSON format or not.

2. You can refer to the following links to see if they can resolve your problem.

https://docs.appeon.com/appeon_online_help/pb2019r2/application_techniques/ch18s02.html#d0e13932

https://docs.appeon.com/appeon_online_help/pb2019r2/powerscript_reference/ch10s678.html

https://docs.appeon.com/appeon_online_help/pb2019r2/powerscript_reference/ch10s680.html

Regards，

Juan,

post the PB script that you have so far, and from there we can perhaps see what you are missing.

Finally this code worked!

Thank you Mike!

Blob lblob_file,&
lblob_data
Integer li_FileNum,li_rtc
String ls_url = 'http://10.0.0.10:5005/subir',&
ls_uuid,&
ls_boundary,&
ls_token='mlk41kALGOKzdls',&
ls_bucket='ordenes'
httpclient lhc_httpclient

li_FileNum = FileOpen('c:\homero.jpg',StreamMode!)

IF li_FileNum = -1 THEN Return -1

li_rtc = FileReadEx(li_FileNum, lblob_file)

IF li_rtc = -1 THEN Return -2

FileClose(li_FileNum)

lhc_httpclient = create httpclient

ls_boundary = '----WebKitFormBoundary7MA4YWxkTrZu0gW'

lhc_httpclient.SetRequestHeader("Content-Type", "multipart/form-data; boundary="+"~r~n"+ls_boundary)

//Data
lblob_data = blob ("--" + ls_boundary + "~r~n" + &
'Content-Disposition: form-data; name="token"' + &
"~r~n~r~n" + ls_token + "~r~n", EncodingUTF8!)

lblob_data += blob ("--" + ls_boundary + "~r~n" + &
'Content-Disposition: form-data; name="bucket"' + &
"~r~n~r~n" + ls_bucket + "~r~n", EncodingUTF8!)

lblob_data += blob ("--" + ls_boundary + "~r~n" + &
'Content-Disposition: form-data; name="file"; filename="homero.jpg"' + &
"~r~n" + "Content-Type:image/jpeg" + "~r~n~r~n", EncodingUTF8!) +&
lblob_file + Blob("~r~n--"+ls_boundary+"--" + "~r~n", EncodingUTF8!)

lhc_httpclient.SetRequestHeader("Content-Length", String(len(lblob_data)))

li_rtc = lhc_httpclient.SendRequest( 'POST', ls_url, lblob_data)

IF li_rtc <> 1 THEN Return -3

li_rtc = lhc_httpclient.GetResponseStatusCode()

MessageBox("",li_rtc)

IF li_rtc <> 200 THEN Return li_rtc

lhc_httpclient.GetResponseBody(ls_uuid)

MessageBox("Uuid!",ls_uuid)

Return 1