Lianja
Lianja
ETrade List Transactions
See more ETrade Examples
Gets transactions for the selected brokerage account.Chilkat Lianja Downloads
llSuccess = .F.
// This requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
loHttp = createobject("CkHttp")
loHttp.OAuth1 = .T.
loHttp.OAuthVerifier = ""
loHttp.OAuthConsumerKey = "ETRADE_CONSUMER_KEY"
loHttp.OAuthConsumerSecret = "ETRADE_CONSUMER_SECRET"
// Load the access token previously obtained via the OAuth1 Authorization
loJsonToken = createobject("CkJsonObject")
llSuccess = loJsonToken.LoadFile("qa_data/tokens/etrade.json")
if (llSuccess <> .T.) then
? "Failed to load OAuth1 token"
release loHttp
release loJsonToken
return
endif
loHttp.OAuthToken = loJsonToken.StringOf("oauth_token")
loHttp.OAuthTokenSecret = loJsonToken.StringOf("oauth_token_secret")
lcSandboxUrl = "https://apisb.etrade.com/v1/accounts/{$accountIdKey}/transactions"
lcLiveUrl = "https://api.etrade.com/v1/accounts/{$accountIdKey}/transactions"
loHttp.SetUrlVar("accountIdKey","6_Dpy0rmuQ9cu9IbTfvF2A")
loResp = createobject("CkHttpResponse")
llSuccess = loHttp.HttpNoBody("GET",lcSandboxUrl,loResp)
if (llSuccess = .F.) then
? loHttp.LastErrorText
release loHttp
release loJsonToken
release loResp
return
endif
// Make sure a successful response was received.
if (loResp.StatusCode > 200) then
? loResp.StatusLine
? loResp.Header
? loResp.BodyStr
release loHttp
release loJsonToken
release loResp
return
endif
// Sample XML response:
// Use this online tool to generate parsing code from sample XML:
// Generate Parsing Code from XML
// <?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>
loXml = createobject("CkXml")
loXml.LoadXml(loResp.BodyStr)
? loXml.GetXml()
i = 0
lnCount_i = loXml.NumChildrenHavingTag("Transaction")
do while i < lnCount_i
loXml.I = i
lcTransactionId = loXml.GetChildContent("Transaction[i]|transactionId")
lnAccountId = loXml.GetChildIntValue("Transaction[i]|accountId")
lcTransactionDate = loXml.GetChildContent("Transaction[i]|transactionDate")
lcPostDate = loXml.GetChildContent("Transaction[i]|postDate")
lnAmount = loXml.GetChildIntValue("Transaction[i]|amount")
lcDescription = loXml.GetChildContent("Transaction[i]|description")
lnDescription2 = loXml.GetChildIntValue("Transaction[i]|description2")
lcTransactionType = loXml.GetChildContent("Transaction[i]|transactionType")
lcImageFlag = loXml.GetChildContent("Transaction[i]|imageFlag")
lcInstType = loXml.GetChildContent("Transaction[i]|instType")
lnQuantity = loXml.GetChildIntValue("Transaction[i]|brokerage|quantity")
lnPrice = loXml.GetChildIntValue("Transaction[i]|brokerage|price")
lcSettlementCurrency = loXml.GetChildContent("Transaction[i]|brokerage|settlementCurrency")
lcPaymentCurrency = loXml.GetChildContent("Transaction[i]|brokerage|paymentCurrency")
lnFee = loXml.GetChildIntValue("Transaction[i]|brokerage|fee")
lcSettlementDate = loXml.GetChildContent("Transaction[i]|brokerage|settlementDate")
lcDetailsURI = loXml.GetChildContent("Transaction[i]|detailsURI")
i = i + 1
enddo
lcPageMarkers = loXml.GetChildContent("pageMarkers")
lcMoreTransactions = loXml.GetChildContent("moreTransactions")
lnTransactionCount = loXml.GetChildIntValue("transactionCount")
lnTotalCount = loXml.GetChildIntValue("totalCount")
? "Success."
release loHttp
release loJsonToken
release loResp
release loXml