PowerBuilder
PowerBuilder
ETrade v1 List Transactions
See more HTTP Misc Examples
Get information about the transactions in an ETrade brokerage account.Chilkat PowerBuilder Downloads
integer li_rc
integer li_Success
oleobject loo_Http
oleobject loo_Json
string ls_RespStr
integer li_StatusCode
oleobject loo_Xml
integer i
integer li_Count_i
string ls_TagPath
string ls_TransactionId
integer li_AccountId
string ls_TransactionDate
string ls_PostDate
integer li_Amount
string ls_Description
integer li_Description2
string ls_TransactionType
string ls_ImageFlag
string ls_InstType
integer li_Quantity
integer li_Price
string ls_SettlementCurrency
string ls_PaymentCurrency
integer li_Fee
string ls_SettlementDate
string ls_DetailsURI
string ls_PageMarkers
string ls_MoreTransactions
integer li_TransactionCount
integer li_TotalCount
li_Success = 0
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
loo_Http = create oleobject
li_rc = loo_Http.ConnectToNewObject("Chilkat.Http")
if li_rc < 0 then
destroy loo_Http
MessageBox("Error","Connecting to COM object failed")
return
end if
loo_Http.OAuth1 = 1
loo_Http.OAuthVerifier = ""
loo_Http.OAuthConsumerKey = "ETRADE_CONSUMER_KEY"
loo_Http.OAuthConsumerSecret = "ETRADE_CONSUMER_SECRET"
// Load the access token previously obtained via the OAuth1 3-Legged Authorization examples Step1 and Step2.
loo_Json = create oleobject
li_rc = loo_Json.ConnectToNewObject("Chilkat.JsonObject")
li_Success = loo_Json.LoadFile("qa_data/tokens/etrade.json")
if li_Success <> 1 then
Write-Debug "Failed to load OAuth1 token"
destroy loo_Http
destroy loo_Json
return
end if
loo_Http.OAuthToken = loo_Json.StringOf("oauth_token")
loo_Http.OAuthTokenSecret = loo_Json.StringOf("oauth_token_secret")
// See the ETrade v1 API documentation HERE.
loo_Http.SetUrlVar("accountIdKey","vsnhtF7d9jXxBy6HyaAC4vQ")
ls_RespStr = loo_Http.QuickGetStr("https://apisb.etrade.com/v1/accounts/{$accountIdKey}/transactions")
if loo_Http.LastMethodSuccess <> 1 then
Write-Debug loo_Http.LastErrorText
destroy loo_Http
destroy loo_Json
return
end if
// A 200 status code indicates success.
li_StatusCode = loo_Http.LastStatus
Write-Debug "statusCode = " + string(li_StatusCode)
// Use the following online tool to generate parsing code from sample XML:
// Generate Parsing Code from XML
// A sample XML response is shown below...
loo_Xml = create oleobject
li_rc = loo_Xml.ConnectToNewObject("Chilkat.Xml")
loo_Xml.LoadXml(ls_RespStr)
i = 0
li_Count_i = loo_Xml.NumChildrenHavingTag("Transaction")
do while i < li_Count_i
loo_Xml.I = i
ls_TransactionId = loo_Xml.GetChildContent("Transaction[i]|transactionId")
li_AccountId = loo_Xml.GetChildIntValue("Transaction[i]|accountId")
ls_TransactionDate = loo_Xml.GetChildContent("Transaction[i]|transactionDate")
ls_PostDate = loo_Xml.GetChildContent("Transaction[i]|postDate")
li_Amount = loo_Xml.GetChildIntValue("Transaction[i]|amount")
ls_Description = loo_Xml.GetChildContent("Transaction[i]|description")
li_Description2 = loo_Xml.GetChildIntValue("Transaction[i]|description2")
ls_TransactionType = loo_Xml.GetChildContent("Transaction[i]|transactionType")
ls_ImageFlag = loo_Xml.GetChildContent("Transaction[i]|imageFlag")
ls_InstType = loo_Xml.GetChildContent("Transaction[i]|instType")
li_Quantity = loo_Xml.GetChildIntValue("Transaction[i]|brokerage|quantity")
li_Price = loo_Xml.GetChildIntValue("Transaction[i]|brokerage|price")
ls_SettlementCurrency = loo_Xml.GetChildContent("Transaction[i]|brokerage|settlementCurrency")
ls_PaymentCurrency = loo_Xml.GetChildContent("Transaction[i]|brokerage|paymentCurrency")
li_Fee = loo_Xml.GetChildIntValue("Transaction[i]|brokerage|fee")
ls_SettlementDate = loo_Xml.GetChildContent("Transaction[i]|brokerage|settlementDate")
ls_DetailsURI = loo_Xml.GetChildContent("Transaction[i]|detailsURI")
i = i + 1
loop
ls_PageMarkers = loo_Xml.GetChildContent("pageMarkers")
ls_MoreTransactions = loo_Xml.GetChildContent("moreTransactions")
li_TransactionCount = loo_Xml.GetChildIntValue("transactionCount")
li_TotalCount = loo_Xml.GetChildIntValue("totalCount")
// <?xml version="1.0" encoding="UTF-8"?>
// <TransactionListResponse>
// <Transaction>
// <transactionId>18165100001766</transactionId>
// <accountId>83564979</accountId>
// <transactionDate>1528948800000</transactionDate>
// <postDate>1528948800000</postDate>
// <amount>-2</amount>
// <description>ACH WITHDRAWL REFID:109187276;</description>
// <description2>109187276</description2>
// <transactionType>Transfer</transactionType>
// <memo />
// <imageFlag>false</imageFlag>
// <instType>BROKERAGE</instType>
// <brokerage>
// <product />
// <quantity>0</quantity>
// <price>0</price>
// <settlementCurrency>USD</settlementCurrency>
// <paymentCurrency>USD</paymentCurrency>
// <fee>0</fee>
// <settlementDate>1528948800000</settlementDate>
// </brokerage>
// <detailsURI>https://api.etrade.com/v1/accounts/yIFaUoJ81qyAhgxLWRQ42g/transactions/18165100001766</detailsURI>
// </Transaction>
// <Transaction>
// <transactionId>18158100000983</transactionId>
// <accountId>83564979</accountId>
// <transactionDate>1528344000000</transactionDate>
// <postDate>1528344000000</postDate>
// <amount>-2</amount>
// <description>ACH WITHDRAWL REFID:98655276;</description>
// <description2>98655276</description2>
// <transactionType>Transfer</transactionType>
// <memo />
// <imageFlag>false</imageFlag>
// <instType>BROKERAGE</instType>
// <brokerage>
// <product />
// <quantity>0</quantity>
// <price>0</price>
// <settlementCurrency>USD</settlementCurrency>
// <paymentCurrency>USD</paymentCurrency>
// <fee>0</fee>
// <settlementDate>1528344000000</settlementDate>
// </brokerage>
// <detailsURI>https://api.etrade.com/v1/accounts/yIFaUoJ81qyAhgxLWRQ42g/transactions/18158100000983</detailsURI>
// </Transaction>
// <pageMarkers>eNpTsAlITE91zi%2FNK%2FHMc04syi8tTs2xM7TRxybMpWATkl%2BSmBOUmpxflAKWtTO10ccQg6mDmwEyEE0EqAbE8SvNTUotCk4tLE3NS061M9Ax0DEEYgOIA9BkuRQgmjxTfDKLQUYoQAV8E4uyU4vsDC0MzUwNDYDA0NzMrKamBmIKVJYLphpiKsyTUB7IbH1kwwFa7F0D</pageMarkers>
// <moreTransactions>false</moreTransactions>
// <transactionCount>5</transactionCount>
// <totalCount>5</totalCount>
// </TransactionListResponse
destroy loo_Http
destroy loo_Json
destroy loo_Xml