Xbase++
Xbase++
ETrade View Portfolio
See more ETrade Examples
Gets portfolio information for the selected brokerage account.Chilkat Xbase++ Downloads
LOCAL nSuccess
LOCAL oHttp
LOCAL oJsonToken
LOCAL cSandboxUrl
LOCAL cLiveUrl
LOCAL oResp
LOCAL oXml
LOCAL nAccountId
LOCAL nPositionId
LOCAL nExpiryDay
LOCAL nExpiryMonth
LOCAL nExpiryYear
LOCAL cSecurityType
LOCAL nStrikePrice
LOCAL cSymbol
LOCAL cSymbolDescription
LOCAL cDateAcquired
LOCAL cPricePaid
LOCAL cCommissions
LOCAL cOtherFees
LOCAL nQuantity
LOCAL cPositionIndicator
LOCAL cPositionType
LOCAL cDaysGain
LOCAL cDaysGainPct
LOCAL cMarketValue
LOCAL cTotalCost
LOCAL cTotalGain
LOCAL cTotalGainPct
LOCAL cPctOfPortfolio
LOCAL cCostPerShare
LOCAL nTodayCommissions
LOCAL nTodayFees
LOCAL nTodayPricePaid
LOCAL nTodayQuantity
LOCAL cChange
LOCAL cChangePct
LOCAL cLastTrade
LOCAL nLastTradeTime
LOCAL nVolume
LOCAL cLotsDetails
LOCAL cQuoteDetails
LOCAL nTotalPages
LOCAL i
LOCAL nCount_i
nSuccess := 0
// This requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
oHttp := CreateObject("Chilkat.Http")
oHttp:OAuth1 := 1
oHttp:OAuthVerifier := ""
oHttp:OAuthConsumerKey := "ETRADE_CONSUMER_KEY"
oHttp:OAuthConsumerSecret := "ETRADE_CONSUMER_SECRET"
// Load the access token previously obtained via the OAuth1 Authorization
oJsonToken := CreateObject("Chilkat.JsonObject")
nSuccess := oJsonToken:LoadFile("qa_data/tokens/etrade.json")
IF (nSuccess != 1)
? "Failed to load OAuth1 token"
oHttp:destroy()
oJsonToken:destroy()
RETURN
ENDIF
oHttp:OAuthToken := oJsonToken:StringOf("oauth_token")
oHttp:OAuthTokenSecret := oJsonToken:StringOf("oauth_token_secret")
cSandboxUrl := "https://apisb.etrade.com/v1/accounts/{$accountIdKey}/portfolio"
cLiveUrl := "https://api.etrade.com/v1/accounts/{$accountIdKey}/portfolio"
oHttp:SetUrlVar("accountIdKey", "6_Dpy0rmuQ9cu9IbTfvF2A")
oResp := CreateObject("Chilkat.HttpResponse")
nSuccess := oHttp:HttpNoBody("GET", cSandboxUrl, oResp)
IF (nSuccess == 0)
? oHttp:LastErrorText
oHttp:destroy()
oJsonToken:destroy()
oResp:destroy()
RETURN
ENDIF
// Make sure a successful response was received.
IF (oResp:StatusCode > 200)
? oResp:StatusLine
? oResp:Header
? oResp:BodyStr
oHttp:destroy()
oJsonToken:destroy()
oResp:destroy()
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" standalone="yes"?>
// <PortfolioResponse>
// <AccountPortfolio>
// <accountId>83359700</accountId>
// <Position>
// <positionId>27005131</positionId>
// <Product>
// <expiryDay>0</expiryDay>
// <expiryMonth>0</expiryMonth>
// <expiryYear>0</expiryYear>
// <securityType>EQ</securityType>
// <strikePrice>0</strikePrice>
// <symbol>BR</symbol>
// </Product>
// <symbolDescription>BR</symbolDescription>
// <dateAcquired>-57600000</dateAcquired>
// <pricePaid>0</pricePaid>
// <commissions>0</commissions>
// <otherFees>0</otherFees>
// <quantity>10</quantity>
// <positionIndicator>TYPE2</positionIndicator>
// <positionType>LONG</positionType>
// <daysGain>-2.7999</daysGain>
// <daysGainPct>-1.3346</daysGainPct>
// <marketValue>207</marketValue>
// <totalCost>0</totalCost>
// <totalGain>207</totalGain>
// <totalGainPct>0</totalGainPct>
// <pctOfPortfolio>0.0018</pctOfPortfolio>
// <costPerShare>0</costPerShare>
// <todayCommissions>0</todayCommissions>
// <todayFees>0</todayFees>
// <todayPricePaid>0</todayPricePaid>
// <todayQuantity>0</todayQuantity>
// <Quick>
// <change>-0.28</change>
// <changePct>-1.3346</changePct>
// <lastTrade>20.70</lastTrade>
// <lastTradeTime>1343160240</lastTradeTime>
// <volume>431591</volume>
// </Quick>
// <lotsDetails>https://apisb.etrade.com/v1/accounts/E5Nd4LJBsEi_UyHm4Vio9g/portfolio/27005131</lotsDetails>
// <quoteDetails>https://apisb.etrade.com/v1/market/quote/BR</quoteDetails>
// </Position>
// <Position>
// <positionId>4709131</positionId>
// <Product>
// <expiryDay>0</expiryDay>
// <expiryMonth>0</expiryMonth>
// <expiryYear>0</expiryYear>
// <securityType>EQ</securityType>
// <strikePrice>0</strikePrice>
// <symbol>GLD</symbol>
// </Product>
// <symbolDescription>GLD</symbolDescription>
// <dateAcquired>1335250800000</dateAcquired>
// <pricePaid>1</pricePaid>
// <commissions>5</commissions>
// <otherFees>0</otherFees>
// <quantity>2</quantity>
// <positionIndicator>TYPE1</positionIndicator>
// <positionType>LONG</positionType>
// <daysGain>0.9799</daysGain>
// <daysGainPct>0.3201</daysGainPct>
// <marketValue>307.04</marketValue>
// <totalCost>7</totalCost>
// <totalGain>300.04</totalGain>
// <totalGainPct>4286.2857</totalGainPct>
// <pctOfPortfolio>0.0028</pctOfPortfolio>
// <costPerShare>3.5</costPerShare>
// <todayCommissions>0</todayCommissions>
// <todayFees>0</todayFees>
// <todayPricePaid>0</todayPricePaid>
// <todayQuantity>0</todayQuantity>
// <Quick>
// <change>0.49</change>
// <changePct>0.3201</changePct>
// <lastTrade>153.52</lastTrade>
// <lastTradeTime>1343160000</lastTradeTime>
// <volume>6510878</volume>
// </Quick>
// <lotsDetails>https://apisb.etrade.com/v1/accounts/E5Nd4LJBsEi_UyHm4Vio9g/portfolio/4709131</lotsDetails>
// <quoteDetails>https://apisb.etrade.com/v1/market/quote/GLD</quoteDetails>
// </Position>
// <Position>
// <positionId>4729131</positionId>
// <Product>
// <expiryDay>0</expiryDay>
// <expiryMonth>0</expiryMonth>
// <expiryYear>0</expiryYear>
// <securityType>EQ</securityType>
// <strikePrice>0</strikePrice>
// <symbol>MSFT</symbol>
// </Product>
// <symbolDescription>MSFT</symbolDescription>
// <dateAcquired>1335250800000</dateAcquired>
// <pricePaid>1</pricePaid>
// <commissions>5</commissions>
// <otherFees>0</otherFees>
// <quantity>1</quantity>
// <positionIndicator>TYPE2</positionIndicator>
// <positionType>LONG</positionType>
// <daysGain>-0.13</daysGain>
// <daysGainPct>-0.4439</daysGainPct>
// <marketValue>29.1499</marketValue>
// <totalCost>6</totalCost>
// <totalGain>23.1499</totalGain>
// <totalGainPct>385.8333</totalGainPct>
// <pctOfPortfolio>0.0002</pctOfPortfolio>
// <costPerShare>6</costPerShare>
// <todayCommissions>0</todayCommissions>
// <todayFees>0</todayFees>
// <todayPricePaid>0</todayPricePaid>
// <todayQuantity>0</todayQuantity>
// <Quick>
// <change>-0.13</change>
// <changePct>-0.4439</changePct>
// <lastTrade>29.15</lastTrade>
// <lastTradeTime>1343160000</lastTradeTime>
// <volume>47711254</volume>
// </Quick>
// <lotsDetails>https://apisb.etrade.com/v1/accounts/E5Nd4LJBsEi_UyHm4Vio9g/portfolio/4729131</lotsDetails>
// <quoteDetails>https://apisb.etrade.com/v1/market/quote/MSFT</quoteDetails>
// </Position>
// <Position>
// <positionId>23971131</positionId>
// <Product>
// <expiryDay>0</expiryDay>
// <expiryMonth>0</expiryMonth>
// <expiryYear>0</expiryYear>
// <securityType>EQ</securityType>
// <strikePrice>0</strikePrice>
// <symbol>MSFT</symbol>
// </Product>
// <symbolDescription>MSFT</symbolDescription>
// <dateAcquired>-57600000</dateAcquired>
// <pricePaid>0</pricePaid>
// <commissions>0</commissions>
// <otherFees>0</otherFees>
// <quantity>-10</quantity>
// <positionIndicator>TYPE5</positionIndicator>
// <positionType>SHORT</positionType>
// <daysGain>1.30</daysGain>
// <daysGainPct>-0.4439</daysGainPct>
// <marketValue>-291.5</marketValue>
// <totalCost>0</totalCost>
// <totalGain>-291.5</totalGain>
// <totalGainPct>0</totalGainPct>
// <pctOfPortfolio>-0.0026</pctOfPortfolio>
// <costPerShare>0</costPerShare>
// <todayCommissions>0</todayCommissions>
// <todayFees>0</todayFees>
// <todayPricePaid>0</todayPricePaid>
// <todayQuantity>0</todayQuantity>
// <Quick>
// <change>-0.13</change>
// <changePct>-0.4439</changePct>
// <lastTrade>29.15</lastTrade>
// <lastTradeTime>1343160000</lastTradeTime>
// <volume>47711254</volume>
// </Quick>
// <lotsDetails>https://apisb.etrade.com/v1/accounts/E5Nd4LJBsEi_UyHm4Vio9g/portfolio/23971131</lotsDetails>
// <quoteDetails>https://apisb.etrade.com/v1/market/quote/MSFT</quoteDetails>
// </Position>
// <Position>
// <positionId>4725131</positionId>
// <Product>
// <expiryDay>0</expiryDay>
// <expiryMonth>0</expiryMonth>
// <expiryYear>0</expiryYear>
// <securityType>EQ</securityType>
// <strikePrice>0</strikePrice>
// <symbol>RBL</symbol>
// </Product>
// <symbolDescription>RBL</symbolDescription>
// <dateAcquired>1335250800000</dateAcquired>
// <pricePaid>1</pricePaid>
// <commissions>5</commissions>
// <otherFees>0</otherFees>
// <quantity>2</quantity>
// <positionIndicator>TYPE2</positionIndicator>
// <positionType>LONG</positionType>
// <daysGain>-0.52</daysGain>
// <daysGainPct>-1.0252</daysGainPct>
// <marketValue>50.20</marketValue>
// <totalCost>7</totalCost>
// <totalGain>43.20</totalGain>
// <totalGainPct>617.1428</totalGainPct>
// <pctOfPortfolio>0.0004</pctOfPortfolio>
// <costPerShare>3.5</costPerShare>
// <todayCommissions>0</todayCommissions>
// <todayFees>0</todayFees>
// <todayPricePaid>0</todayPricePaid>
// <todayQuantity>0</todayQuantity>
// <Quick>
// <change>-0.26</change>
// <changePct>-1.0252</changePct>
// <lastTrade>25.10</lastTrade>
// <lastTradeTime>1343159760</lastTradeTime>
// <volume>11827</volume>
// </Quick>
// <lotsDetails>https://apisb.etrade.com/v1/accounts/E5Nd4LJBsEi_UyHm4Vio9g/portfolio/4725131</lotsDetails>
// <quoteDetails>https://apisb.etrade.com/v1/market/quote/RBL</quoteDetails>
// </Position>
// <Position>
// <positionId>20841131</positionId>
// <Product>
// <expiryDay>0</expiryDay>
// <expiryMonth>0</expiryMonth>
// <expiryYear>0</expiryYear>
// <securityType>EQ</securityType>
// <strikePrice>0</strikePrice>
// <symbol>RPI</symbol>
// </Product>
// <symbolDescription>RPI</symbolDescription>
// <dateAcquired>1335250800000</dateAcquired>
// <pricePaid>7.5599</pricePaid>
// <commissions>5</commissions>
// <otherFees>45</otherFees>
// <quantity>2</quantity>
// <positionIndicator>TYPE2</positionIndicator>
// <positionType>LONG</positionType>
// <daysGain>0</daysGain>
// <daysGainPct>0</daysGainPct>
// <marketValue>2.8599</marketValue>
// <totalCost>65.12</totalCost>
// <totalGain>-62.2599</totalGain>
// <totalGainPct>-95.6081</totalGainPct>
// <pctOfPortfolio>0.00</pctOfPortfolio>
// <costPerShare>32.56</costPerShare>
// <todayCommissions>0</todayCommissions>
// <todayFees>0</todayFees>
// <todayPricePaid>0</todayPricePaid>
// <todayQuantity>0</todayQuantity>
// <Quick>
// <change>0</change>
// <changePct>0</changePct>
// <lastTrade>1.43</lastTrade>
// <lastTradeTime>1343150700</lastTradeTime>
// <volume>1803</volume>
// </Quick>
// <lotsDetails>https://apisb.etrade.com/v1/accounts/E5Nd4LJBsEi_UyHm4Vio9g/portfolio/20841131</lotsDetails>
// <quoteDetails>https://apisb.etrade.com/v1/market/quote/RPI</quoteDetails>
// </Position>
// <Position>
// <positionId>4732131</positionId>
// <Product>
// <expiryDay>0</expiryDay>
// <expiryMonth>0</expiryMonth>
// <expiryYear>0</expiryYear>
// <securityType>EQ</securityType>
// <strikePrice>0</strikePrice>
// <symbol>RXD</symbol>
// </Product>
// <symbolDescription>RXD</symbolDescription>
// <dateAcquired>1335250800000</dateAcquired>
// <pricePaid>1</pricePaid>
// <commissions>2.99</commissions>
// <otherFees>0.0099</otherFees>
// <quantity>-3</quantity>
// <positionIndicator>TYPE5</positionIndicator>
// <positionType>SHORT</positionType>
// <daysGain>-1.296</daysGain>
// <daysGainPct>2.6799</daysGainPct>
// <marketValue>-49.6559</marketValue>
// <totalCost>0</totalCost>
// <totalGain>-49.6559</totalGain>
// <totalGainPct>-827.60</totalGainPct>
// <pctOfPortfolio>-0.0004</pctOfPortfolio>
// <costPerShare>0</costPerShare>
// <todayCommissions>0</todayCommissions>
// <todayFees>0</todayFees>
// <todayPricePaid>0</todayPricePaid>
// <todayQuantity>0</todayQuantity>
// <Quick>
// <change>0.432</change>
// <changePct>2.6799</changePct>
// <lastTrade>16.552</lastTrade>
// <lastTradeTime>1343157480</lastTradeTime>
// <volume>2200</volume>
// </Quick>
// <lotsDetails>https://apisb.etrade.com/v1/accounts/E5Nd4LJBsEi_UyHm4Vio9g/portfolio/4732131</lotsDetails>
// <quoteDetails>https://apisb.etrade.com/v1/market/quote/RXD</quoteDetails>
// </Position>
// <totalPages>1</totalPages>
// </AccountPortfolio>
// </PortfolioResponse>
//
oXml := CreateObject("Chilkat.Xml")
oXml:LoadXml(oResp:BodyStr)
? oXml:GetXml()
nAccountId := oXml:GetChildIntValue("AccountPortfolio|accountId")
i := 0
nCount_i := oXml:NumChildrenHavingTag("AccountPortfolio|Position")
DO WHILE i < nCount_i
oXml:I := i
nPositionId := oXml:GetChildIntValue("AccountPortfolio|Position[i]|positionId")
nExpiryDay := oXml:GetChildIntValue("AccountPortfolio|Position[i]|Product|expiryDay")
nExpiryMonth := oXml:GetChildIntValue("AccountPortfolio|Position[i]|Product|expiryMonth")
nExpiryYear := oXml:GetChildIntValue("AccountPortfolio|Position[i]|Product|expiryYear")
cSecurityType := oXml:GetChildContent("AccountPortfolio|Position[i]|Product|securityType")
nStrikePrice := oXml:GetChildIntValue("AccountPortfolio|Position[i]|Product|strikePrice")
cSymbol := oXml:GetChildContent("AccountPortfolio|Position[i]|Product|symbol")
cSymbolDescription := oXml:GetChildContent("AccountPortfolio|Position[i]|symbolDescription")
cDateAcquired := oXml:GetChildContent("AccountPortfolio|Position[i]|dateAcquired")
cPricePaid := oXml:GetChildContent("AccountPortfolio|Position[i]|pricePaid")
cCommissions := oXml:GetChildContent("AccountPortfolio|Position[i]|commissions")
cOtherFees := oXml:GetChildContent("AccountPortfolio|Position[i]|otherFees")
nQuantity := oXml:GetChildIntValue("AccountPortfolio|Position[i]|quantity")
cPositionIndicator := oXml:GetChildContent("AccountPortfolio|Position[i]|positionIndicator")
cPositionType := oXml:GetChildContent("AccountPortfolio|Position[i]|positionType")
cDaysGain := oXml:GetChildContent("AccountPortfolio|Position[i]|daysGain")
cDaysGainPct := oXml:GetChildContent("AccountPortfolio|Position[i]|daysGainPct")
cMarketValue := oXml:GetChildContent("AccountPortfolio|Position[i]|marketValue")
cTotalCost := oXml:GetChildContent("AccountPortfolio|Position[i]|totalCost")
cTotalGain := oXml:GetChildContent("AccountPortfolio|Position[i]|totalGain")
cTotalGainPct := oXml:GetChildContent("AccountPortfolio|Position[i]|totalGainPct")
cPctOfPortfolio := oXml:GetChildContent("AccountPortfolio|Position[i]|pctOfPortfolio")
cCostPerShare := oXml:GetChildContent("AccountPortfolio|Position[i]|costPerShare")
nTodayCommissions := oXml:GetChildIntValue("AccountPortfolio|Position[i]|todayCommissions")
nTodayFees := oXml:GetChildIntValue("AccountPortfolio|Position[i]|todayFees")
nTodayPricePaid := oXml:GetChildIntValue("AccountPortfolio|Position[i]|todayPricePaid")
nTodayQuantity := oXml:GetChildIntValue("AccountPortfolio|Position[i]|todayQuantity")
cChange := oXml:GetChildContent("AccountPortfolio|Position[i]|Quick|change")
cChangePct := oXml:GetChildContent("AccountPortfolio|Position[i]|Quick|changePct")
cLastTrade := oXml:GetChildContent("AccountPortfolio|Position[i]|Quick|lastTrade")
nLastTradeTime := oXml:GetChildIntValue("AccountPortfolio|Position[i]|Quick|lastTradeTime")
nVolume := oXml:GetChildIntValue("AccountPortfolio|Position[i]|Quick|volume")
cLotsDetails := oXml:GetChildContent("AccountPortfolio|Position[i]|lotsDetails")
cQuoteDetails := oXml:GetChildContent("AccountPortfolio|Position[i]|quoteDetails")
i := i + 1
ENDDO
nTotalPages := oXml:GetChildIntValue("AccountPortfolio|totalPages")
? "Success."
oHttp:destroy()
oJsonToken:destroy()
oResp:destroy()
oXml:destroy()