|
Chilkat • HOME • .NET Core C# • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi ActiveX • Delphi DLL • Go • Java • Lianja • Mono C# • Node.js • Objective-C • PHP ActiveX • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Xojo Plugin) ETrade View PortfolioGets portfolio information for the selected brokerage account. For more information, see https://apisb.etrade.com/docs/api/account/api-portfolio-v1.html
// This requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. Dim http As New Chilkat.Http http.OAuth1 = True http.OAuthVerifier = "" http.OAuthConsumerKey = "ETRADE_CONSUMER_KEY" http.OAuthConsumerSecret = "ETRADE_CONSUMER_SECRET" // Load the access token previously obtained via the OAuth1 Authorization Dim jsonToken As New Chilkat.JsonObject Dim success As Boolean success = jsonToken.LoadFile("qa_data/tokens/etrade.json") If (success <> True) Then System.DebugLog("Failed to load OAuth1 token") Return End If http.OAuthToken = jsonToken.StringOf("oauth_token") http.OAuthTokenSecret = jsonToken.StringOf("oauth_token_secret") Dim sandboxUrl As String sandboxUrl = "https://apisb.etrade.com/v1/accounts/{$accountIdKey}/portfolio" Dim liveUrl As String liveUrl = "https://api.etrade.com/v1/accounts/{$accountIdKey}/portfolio" success = http.SetUrlVar("accountIdKey","6_Dpy0rmuQ9cu9IbTfvF2A") Dim resp As Chilkat.HttpResponse resp = http.QuickGetObj(sandboxUrl) If (http.LastMethodSuccess <> True) Then System.DebugLog(http.LastErrorText) Return End If // Make sure a successful response was received. If (resp.StatusCode > 200) Then System.DebugLog(resp.StatusLine) System.DebugLog(resp.Header) System.DebugLog(resp.BodyStr) Return End If // 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> // Dim xml As New Chilkat.Xml success = xml.LoadXml(resp.BodyStr) System.DebugLog(xml.GetXml()) Dim accountId As Int32 Dim positionId As Int32 Dim expiryDay As Int32 Dim expiryMonth As Int32 Dim expiryYear As Int32 Dim securityType As String Dim strikePrice As Int32 Dim symbol As String Dim symbolDescription As String Dim dateAcquired As String Dim pricePaid As String Dim commissions As String Dim otherFees As String Dim quantity As Int32 Dim positionIndicator As String Dim positionType As String Dim daysGain As String Dim daysGainPct As String Dim marketValue As String Dim totalCost As String Dim totalGain As String Dim totalGainPct As String Dim pctOfPortfolio As String Dim costPerShare As String Dim todayCommissions As Int32 Dim todayFees As Int32 Dim todayPricePaid As Int32 Dim todayQuantity As Int32 Dim change As String Dim changePct As String Dim lastTrade As String Dim lastTradeTime As Int32 Dim volume As Int32 Dim lotsDetails As String Dim quoteDetails As String Dim totalPages As Int32 accountId = xml.GetChildIntValue("AccountPortfolio|accountId") Dim i As Int32 i = 0 Dim count_i As Int32 count_i = xml.NumChildrenHavingTag("AccountPortfolio|Position") While i < count_i xml.I = i positionId = xml.GetChildIntValue("AccountPortfolio|Position[i]|positionId") expiryDay = xml.GetChildIntValue("AccountPortfolio|Position[i]|Product|expiryDay") expiryMonth = xml.GetChildIntValue("AccountPortfolio|Position[i]|Product|expiryMonth") expiryYear = xml.GetChildIntValue("AccountPortfolio|Position[i]|Product|expiryYear") securityType = xml.GetChildContent("AccountPortfolio|Position[i]|Product|securityType") strikePrice = xml.GetChildIntValue("AccountPortfolio|Position[i]|Product|strikePrice") symbol = xml.GetChildContent("AccountPortfolio|Position[i]|Product|symbol") symbolDescription = xml.GetChildContent("AccountPortfolio|Position[i]|symbolDescription") dateAcquired = xml.GetChildContent("AccountPortfolio|Position[i]|dateAcquired") pricePaid = xml.GetChildContent("AccountPortfolio|Position[i]|pricePaid") commissions = xml.GetChildContent("AccountPortfolio|Position[i]|commissions") otherFees = xml.GetChildContent("AccountPortfolio|Position[i]|otherFees") quantity = xml.GetChildIntValue("AccountPortfolio|Position[i]|quantity") positionIndicator = xml.GetChildContent("AccountPortfolio|Position[i]|positionIndicator") positionType = xml.GetChildContent("AccountPortfolio|Position[i]|positionType") daysGain = xml.GetChildContent("AccountPortfolio|Position[i]|daysGain") daysGainPct = xml.GetChildContent("AccountPortfolio|Position[i]|daysGainPct") marketValue = xml.GetChildContent("AccountPortfolio|Position[i]|marketValue") totalCost = xml.GetChildContent("AccountPortfolio|Position[i]|totalCost") totalGain = xml.GetChildContent("AccountPortfolio|Position[i]|totalGain") totalGainPct = xml.GetChildContent("AccountPortfolio|Position[i]|totalGainPct") pctOfPortfolio = xml.GetChildContent("AccountPortfolio|Position[i]|pctOfPortfolio") costPerShare = xml.GetChildContent("AccountPortfolio|Position[i]|costPerShare") todayCommissions = xml.GetChildIntValue("AccountPortfolio|Position[i]|todayCommissions") todayFees = xml.GetChildIntValue("AccountPortfolio|Position[i]|todayFees") todayPricePaid = xml.GetChildIntValue("AccountPortfolio|Position[i]|todayPricePaid") todayQuantity = xml.GetChildIntValue("AccountPortfolio|Position[i]|todayQuantity") change = xml.GetChildContent("AccountPortfolio|Position[i]|Quick|change") changePct = xml.GetChildContent("AccountPortfolio|Position[i]|Quick|changePct") lastTrade = xml.GetChildContent("AccountPortfolio|Position[i]|Quick|lastTrade") lastTradeTime = xml.GetChildIntValue("AccountPortfolio|Position[i]|Quick|lastTradeTime") volume = xml.GetChildIntValue("AccountPortfolio|Position[i]|Quick|volume") lotsDetails = xml.GetChildContent("AccountPortfolio|Position[i]|lotsDetails") quoteDetails = xml.GetChildContent("AccountPortfolio|Position[i]|quoteDetails") i = i + 1 Wend totalPages = xml.GetChildIntValue("AccountPortfolio|totalPages") System.DebugLog("Success.") |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.