Unicode C

ETrade List Accounts

See more ETrade Examples

Returns a list of E*TRADE accounts for the current user. Unicode C

#include <C_CkHttpW.h>
#include <C_CkJsonObjectW.h>
#include <C_CkHttpResponseW.h>
#include <C_CkXmlW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkHttpW http;
    HCkJsonObjectW jsonToken;
    const wchar_t *sandboxUrl;
    const wchar_t *liveUrl;
    HCkHttpResponseW resp;
    HCkXmlW xml;
    int accountId;
    const wchar_t *accountIdKey;
    const wchar_t *accountMode;
    const wchar_t *accountDesc;
    const wchar_t *accountName;
    const wchar_t *accountType;
    const wchar_t *institutionType;
    const wchar_t *accountStatus;
    int closedDate;
    int i;
    int count_i;

    success = FALSE;

    // This requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    http = CkHttpW_Create();

    CkHttpW_putOAuth1(http,TRUE);
    CkHttpW_putOAuthVerifier(http,L"");
    CkHttpW_putOAuthConsumerKey(http,L"ETRADE_CONSUMER_KEY");
    CkHttpW_putOAuthConsumerSecret(http,L"ETRADE_CONSUMER_SECRET");

    // Load the access token previously obtained via the OAuth1 Authorization
    jsonToken = CkJsonObjectW_Create();
    success = CkJsonObjectW_LoadFile(jsonToken,L"qa_data/tokens/etrade.json");
    if (success != TRUE) {
        wprintf(L"Failed to load OAuth1 token\n");
        CkHttpW_Dispose(http);
        CkJsonObjectW_Dispose(jsonToken);
        return;
    }

    CkHttpW_putOAuthToken(http,CkJsonObjectW_stringOf(jsonToken,L"oauth_token"));
    CkHttpW_putOAuthTokenSecret(http,CkJsonObjectW_stringOf(jsonToken,L"oauth_token_secret"));

    sandboxUrl = L"https://apisb.etrade.com/v1/accounts/list";
    liveUrl = L"https://api.etrade.com/v1/accounts/list";

    resp = CkHttpResponseW_Create();
    success = CkHttpW_HttpNoBody(http,L"GET",sandboxUrl,resp);
    if (success == FALSE) {
        wprintf(L"%s\n",CkHttpW_lastErrorText(http));
        CkHttpW_Dispose(http);
        CkJsonObjectW_Dispose(jsonToken);
        CkHttpResponseW_Dispose(resp);
        return;
    }

    // Make sure a successful response was received.
    if (CkHttpResponseW_getStatusCode(resp) >= 300) {
        wprintf(L"%s\n",CkHttpResponseW_statusLine(resp));
        wprintf(L"%s\n",CkHttpResponseW_header(resp));
        wprintf(L"%s\n",CkHttpResponseW_bodyStr(resp));
        CkHttpW_Dispose(http);
        CkJsonObjectW_Dispose(jsonToken);
        CkHttpResponseW_Dispose(resp);
        return;
    }

    if (CkHttpResponseW_getStatusCode(resp) == 204) {
        wprintf(L"No records available.\n");
        CkHttpW_Dispose(http);
        CkJsonObjectW_Dispose(jsonToken);
        CkHttpResponseW_Dispose(resp);
        return;
    }

    // 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"?>
    // <AccountListResponse>
    //     <Accounts>
    //         <Account>
    //             <accountId>82314598</accountId>
    //             <accountIdKey>dBZOKt9xDrtRSAOl4MSiiA</accountIdKey>
    //             <accountMode>IRA</accountMode>
    //             <accountDesc>Brokerage</accountDesc>
    //             <accountName>NickName-1</accountName>
    //             <accountType>MARGIN</accountType>
    //             <institutionType>BROKERAGE</institutionType>
    //             <accountStatus>ACTIVE</accountStatus>
    //             <closedDate>0</closedDate>
    //         </Account>
    //         <Account>
    //             <accountId>58315636</accountId>
    //             <accountIdKey>vQMsebA1H5WltUfDkJP48g</accountIdKey>
    //             <accountMode>BROKERAGE</accountMode>
    //             <accountDesc>Complete Savings</accountDesc>
    //             <accountName>NickName-2</accountName>
    //             <accountType>INDIVIDUAL</accountType>
    //             <institutionType>BROKERAGE</institutionType>
    //             <accountStatus>ACTIVE</accountStatus>
    //             <closedDate>0</closedDate>
    //         </Account>
    //         <Account>
    //             <accountId>70700418</accountId>
    //             <accountIdKey>6_Dpy0rmuQ9cu9IbTfvF2A</accountIdKey>
    //             <accountMode>CASH</accountMode>
    //             <accountDesc>INDIVIDUAL</accountDesc>
    //             <accountName>NickName-3</accountName>
    //             <accountType>INDIVIDUAL</accountType>
    //             <institutionType>BROKERAGE</institutionType>
    //             <accountStatus>ACTIVE</accountStatus>
    //             <closedDate>0</closedDate>
    //         </Account>
    //         <Account>
    //             <accountId>83515143</accountId>
    //             <accountIdKey>xj1Dc18FTqWPqkEEVUr5rw</accountIdKey>
    //             <accountMode>CASH</accountMode>
    //             <accountDesc>INDIVIDUAL</accountDesc>
    //             <accountName/>
    //             <accountType>CASH</accountType>
    //             <institutionType>BROKERAGE</institutionType>
    //             <accountStatus>CLOSED</accountStatus>
    //             <closedDate>1521027780</closedDate>
    // 
    //         </Account>
    //     </Accounts>
    // </AccountListResponse>

    xml = CkXmlW_Create();
    CkXmlW_LoadXml(xml,CkHttpResponseW_bodyStr(resp));
    wprintf(L"%s\n",CkXmlW_getXml(xml));

    i = 0;
    count_i = CkXmlW_NumChildrenHavingTag(xml,L"Accounts|Account");
    while (i < count_i) {
        CkXmlW_putI(xml,i);
        accountId = CkXmlW_GetChildIntValue(xml,L"Accounts|Account[i]|accountId");
        accountIdKey = CkXmlW_getChildContent(xml,L"Accounts|Account[i]|accountIdKey");
        accountMode = CkXmlW_getChildContent(xml,L"Accounts|Account[i]|accountMode");
        accountDesc = CkXmlW_getChildContent(xml,L"Accounts|Account[i]|accountDesc");
        accountName = CkXmlW_getChildContent(xml,L"Accounts|Account[i]|accountName");
        accountType = CkXmlW_getChildContent(xml,L"Accounts|Account[i]|accountType");
        institutionType = CkXmlW_getChildContent(xml,L"Accounts|Account[i]|institutionType");
        accountStatus = CkXmlW_getChildContent(xml,L"Accounts|Account[i]|accountStatus");
        closedDate = CkXmlW_GetChildIntValue(xml,L"Accounts|Account[i]|closedDate");
        i = i + 1;
    }

    wprintf(L"Success.\n");


    CkHttpW_Dispose(http);
    CkJsonObjectW_Dispose(jsonToken);
    CkHttpResponseW_Dispose(resp);
    CkXmlW_Dispose(xml);

    }