Http_post request to an api at ebay

[alancropp]

The xml code works OK when using eBay's api test tool but two days of frustration using HTTP_POST_PAGE2(), HTTP_POST() and HTTP_FETCH(), and reading a lot, must end while I still have hair. Please can somebody point me in the right direction and give me some sample code for posting to ebay

[Lenny Forziati]

Re: Http_post request to an api at ebay

What code do you have so far and what is the error you are getting?

[alancropp]

Re: Http_post request to an api at ebay

this is the alpha script with AppID and <aBayAuthToken> removed

trace.Clear()
DIM string as c
DIM header as c
DIM outcome[20] as c
string=<<%str%
X-EBAY-API-APP-ID: AppID
X-EBAY-API-SITE-ID: 3

<?xml version="1.0" encoding="utf-8"?>
<GetCategoriesRequest xmlns="urn:ebay:apis:eBLBaseComponents">
<RequesterCredentials>
<eBayAuthToken>---------------------</eBayAuthToken>
</RequesterCredentials>
<Version>657</Version>
<CategorySiteID>3</CategorySiteID>
<DetailLevel>ReturnAll</DetailLevel>
<LevelLimit>1</LevelLimit>
<ViewAllNodes>true</ViewAllNodes>
</GetCategoriesRequest>
%str%
'trace.WriteLn(string)
result=HTTP_POST_PAGE2("https://api.sandbox.ebay.com/ws/api.dll",string,.t.,45000)

outcome[2]=extract_string(result,"<Timestamp>","</Timestamp>",1,.f.,.f.)
trace.WriteLn(outcome[2])
outcome[3]=extract_string(result,"<Ack>","</Ack>",1,.t.,.f.)
trace.WriteLn(outcome[3])


outcome[5]=extract_string(result,"<ShortMessage>","</ShortMessage>",1,.t.,.f.)
trace.WriteLn(outcome[5])
outcome[6]=extract_string(result,"<LongMessage>","</LongMessage>",1,.t.,.f.)
trace.WriteLn(outcome[6])
outcome[7]=extract_string(result,"<ErrorCode>","</ErrorCode>",1,.t.,.f.)
trace.WriteLn(outcome[7])
outcome[8]=extract_string(result,"<SeverityCode>","</SeverityCode>",1,.t.,.f.)
trace.WriteLn(outcome[8])
outcome[9]=extract_string(result,"<ErrorClassification>","</ErrorClassification>",1,.t.,.f.)
trace.WriteLn(outcome[9])
outcome[10]=extract_string(result,"<Build>","</Build>",1,.t.,.f.)
trace.WriteLn(outcome[10])
outcome[11]=substr(result,at("</GeteBay",result,1),30)
trace.WriteLn(outcome[11])

This is from the trace window

2010-03-05 16:18:16
<Ack>Failure</Ack>
<ShortMessage>Unsupported API call.</ShortMessage>
<LongMessage>The API call "GeteBayOfficialTime" is invalid or not supported in this release.</LongMessage>
<ErrorCode>2</ErrorCode>
<SeverityCode>Error</SeverityCode>
<ErrorClassification>RequestError</ErrorClassification>
<Build>10752342</Build>
</GeteBayOfficialTimeResponse>

[alancropp]

Re: Http_post request to an api at ebay

Any thoughts yet Lenny - I am still no further on with this - ground to a halt - frustrated - need help

[alancropp]

Re: Http_post request to an api at ebay

the xml code works in the eBay API test tool so I know that bit is correct

Is the inability of Alpha to connect to eBay 1)an Alpha problem, 2)an eBay problem or 3)my incorrect understanding of HTTP_FETCH()

DEV NAME, APP NAME CERT NAME and TOKEN have been removed


trace.Clear()
DIM headerarray[10] as c
headerarray[1]="X-EBAY-API-COMPATIBILITY-LEVEL: 657"
headerarray[2]="X-EBAY-API-DEV-NAME: DEV NAME"
headerarray[3]="X-EBAY-API-APP-NAME: APP NAME"
headerarray[4]="X-EBAY-API-CERT-NAME: CERT NAME"
headerarray[5]="X-EBAY-API-CALL-NAME: GetCategories"
headerarray[6]="X-EBAY-API-SITEID: 3"
headerarray[7]="Content-Type: text/xml"
headerarray[8]=" "
DIM headerinput as c
headerinput=headerarray.dump()
DIM string as c
string=<<%str%
<?xml version="1.0" encoding="utf-8"?>
<GetCategoriesRequest xmlns="urn:ebay:apis:eBLBaseComponents">
<RequesterCredentials>
<eBayAuthToken>--TOKEN--</eBayAuthToken>
</RequesterCredentials>
<Version>657</Version>
<CategorySiteID>3</CategorySiteID>
<DetailLevel>ReturnAll</DetailLevel>
<LevelLimit>1</LevelLimit>
<ViewAllNodes>true</ViewAllNodes>
</GetCategoriesRequest>
%str%

dim p as P

p.host = "https://api.sandbox.ebay.com"
p.ssl = .t.
p.ssl_ValidateCert = .f.
p.protocol="HTTP/1.1"
p.method = "POST"
p.body = string
p.header = headerinput
p.timeout = 45000
p.SSL_0n = .f.
p.page = "https://api.sandbox.ebay.com/ws/api.dll"
result = http_fetch(p,.t.)
trace.WriteLn(result.error_text)
trace.WriteLn(str(result.error_code))
trace.WriteLn(result.headers)
trace.WriteLn(result.body)
end

trace window shows
WSAHOST_NOT_FOUND - Host not found while getting host name..

Detailed Description:
No such host is known. The name is not an official host name or alias,
or it cannot be found in the database(s) being queried.
This error may also be returned for protocol and service queries,
and means that the specified name could not be found in the relevant database.

16037

[Lenny Forziati]

Re: Http_post request to an api at ebay

I am not familiar with the eBay API, so I can't comment on your use of it, but I see several problems with your use of http_fetch()

p.host needs to be a hostname, not a URL. This is the cause of the error you are currently getting.

p.host = "api.sandbox.ebay.com"

p.page should be a page, not a URL. Servers should support the syntax you are using, but not all do, so it is safer not to depend on it.

p.page = "/ws/api.dll"

You have a typo in turning on SSL. I don't know if it is in your actual code, or just in your post here, but you have ssl_<zero>n. Additionally, you are setting it to false, when you seem to want to enable SSL. It should be:

p.SSL_on = .t.

[alancropp]

Re: Http_post request to an api at ebay

I am still getting an error message but you have moved me to a new level - communication is getting nearer

[alancropp]

Re: Http_post request to an api at ebay

Isn't it simple when you know the answer - it now communicates and sends back the information I want - thank you - the next task is to parse an xml file - ps and thanks to Steve for his interest