(Lianja) ETrade List Transactions

Gets transactions for the selected brokerage account.

For more information, see https://apisb.etrade.com/docs/api/account/api-transaction-v1.html

Chilkat Lianja Extension Download Chilkat Lianja Extension

// 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 = loHttp.QuickGetObj(lcSandboxUrl)
if (loHttp.LastMethodSuccess <> .T.) then
    ? loHttp.LastErrorText
    release loHttp
    release loJsonToken
    return
endif

// Make sure a successful response was received.
if (loResp.StatusCode > 200) then
    ? loResp.StatusLine
    ? loResp.Header
    ? loResp.BodyStr
    release loHttp
    release loJsonToken
    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 loXml