This project is read-only.
BranchInfo - U.S. Bank Branch Locations, History & Performance Database

Category:
TypeProviders.AzureMarketPlace
Description: BranchInfo™ 2011 is a historical database of every bank branch location in the U.S. containing information matched by institution and site, across a five-year timeframe. For more information, please goto https://datamarket.azure.com/dataset/36c385f2-5903-4335-af09-294e3043839f
Code:
type BankInfo = Microsoft.FSharp.Data.TypeProviders.ODataService < ServiceUri = @"https://api.datamarket.azure.com/RpmConsulting/BranchInfo" >

let BranchInfo() =
let bank = BankInfo.GetDataContext()
//To sign up for a Windows Azure Marketplace account, please go to https://datamarket.azure.com/account/info
bank.Credentials<- NetworkCredential (Utils.ADM_USER_ID, Utils.ADM_ACCOUNT_ID)

query {
for b in bank.BranchInfo2011 do
where (b.BranchState = "WA")
where (b.BranchZip = "98052")
select b
} |> Seq.iter(fun i -> printfn "%A - %A" i.BranchName i.BranchDeposits)

// sample output
// "Washington Federal S & L Association " - 1000788M
// "Redmond Branch " - 1000788M
// "Overlake Safeway Branch " - 925095M
// "Overlake Park Branch " - 883017M
// "Redmond Branch " - 1000788M
// "North Redmond Branch " - 965031M
// "Bel-Red Branch " - 987997M
// ...


Execution Result:
"Washington Federal S & L Association    " - 1000788M
"Washington Federal S & L Association " - 1000788M
"Redmond Branch " - 1000788M
"Overlake Safeway Branch " - 925095M
"Overlake Park Branch " - 883017M
"Redmond Branch " - 1000788M
"North Redmond Branch " - 965031M
"Bel-Red Branch " - 987997M
"Bear Creek Branch " - 1000788M
"Redmond Branch " - 965031M
"Overlake Park Branch " - 925095M
"Redmond Branch " - 987102M
"Redmond Branch " - 987102M
"Redmond " - 965031M
"Redmond Branch " - 987102M
"Avondale Branch " - 754616M
"Redmond " - 883017M
"Redmond Branch " - 987102M
"Redmond Branch " - 546681M
"Redmond Branch " - 965031M

Last edited Mar 1, 2012 at 8:05 PM by ttliu2000, version 5

Comments

No comments yet.