concur_connect 0.0.1

data/lib/concur_connect/user.rb

@@ -0,0 +1,17 @@
+require 'concur_connect/expense_report'
+
+module ConcurConnect
+  class User
+    attr_accessor :login_id, :first_name, :last_name, :email,
+      :country_code, :currency_code, :country_sub_code,
+      :session
+
+    def expense_reports(status = 'APPROVED', date = nil)
+      @expense_reports ||= expense_report_finder.find(login_id, status, date)
+    end
+
+    def expense_report_finder
+      @expense_report_finder ||= ExpenseReportFinder.new session
+    end
+  end
+end

data/lib/concur_connect/user_finder.rb

@@ -0,0 +1,28 @@
+require 'concur_connect/user'
+
+module ConcurConnect
+  class UserFinder
+    attr_accessor :session
+
+    def initialize(session)
+      self.session = session
+    end
+
+    def find(id)
+      response = session.get 'user/v1.0/User' do |g|
+        g.headers['X-CompanyDomain'] = session.company_id
+        g.headers['X-UserID'] = id
+      end
+      build_user response.body
+    end
+
+    def build_user(response)
+      user = User.new
+      user.login_id = response['LoginId']
+      user.first_name = response['FirstName']
+      user.last_name = response['LastName']
+      user.session = session
+      user
+    end
+  end
+end

data/lib/concur_connect/version.rb

@@ -0,0 +1,3 @@
+module ConcurConnect
+  VERSION = "0.0.1"
+end

data/spec/concur_connect/expense.rb

@@ -0,0 +1,5 @@
+module ConcurConnect
+  class Expense
+    attr_accessor :type, :amount, :vendor
+  end
+end

data/spec/concur_connect/expense_finder_spec.rb

@@ -0,0 +1,77 @@
+require 'spec_helper'
+
+describe ConcurConnect::ExpenseFinder do
+  let(:session) { 
+    ConcurConnect.session '3dcPjZyTeQziAndLnUALTI', 'ZipGipKjsd4ypFx2qcJ5sCuBY9FYbJlE', 't0026855k9r8'
+  }
+  let(:finder) { ConcurConnect::ExpenseFinder.new session }
+
+  describe '#find' do
+    it 'gets a list of expense reports with a given status' do
+      VCR.use_cassette('expense list', :record => :once) do
+        list = finder.find('nABR4fUZDftz3veYYzMffJR5k3uLU7xQy')
+        list.should_not be_empty
+        list.each { |i| i.should be_a(ConcurConnect::Expense) }
+      end
+    end
+  end
+
+  describe '#build_expenses' do
+    it 'handles an empty list of expenses' do
+      ers = finder.build_expenses({'ExpenseEntriesList' => nil})
+      ers.should be_empty
+    end
+    it 'builds a list of a single expense' do
+      ers = finder.build_expenses({'ExpenseEntriesList' => {
+        'ExpenseEntrySummary' => {
+          'ApprovedAmount' => '678.00000000', 
+          'Expense-Entry-Url' => 'http://www.concursolutions.com/api/expense/expensereport/v1.1/report/iiwEUE87weOisd2sF2hsq/entry/Irusj23j48hks9IIor92746SLL92039jfyd', 
+          'ExpenseName' => 'Advertising', 
+          'LocationName' => 'Redmond, Washington', 
+          'TransactionAmount' => '678.00000000', 
+          'TransactionCrnCode' => 'USD', 
+          'VendorDescription' => nil,
+          'VendorListName' => 'The Daily Herald'
+      }}})
+      ers.should_not be_empty
+      ers.each do |expense|
+        expense.should be_a(ConcurConnect::Expense)
+        expense.type.length.should > 0
+        expense.amount.to_f.should > 0
+        expense.vendor.length.should > 0
+      end
+    end
+    it 'builds a list of new expenses' do
+      ers = finder.build_expenses({'ExpenseEntriesList' => {
+        'ExpenseEntrySummary' => [{
+          'ApprovedAmount' => '678.00000000', 
+          'Expense-Entry-Url' => 'http://www.concursolutions.com/api/expense/expensereport/v1.1/report/iiwEUE87weOisd2sF2hsq/entry/Irusj23j48hks9IIor92746SLL92039jfyd', 
+          'ExpenseName' => 'Advertising', 
+          'LocationName' => 'Redmond, Washington', 
+          'TransactionAmount' => '678.00000000', 
+          'TransactionCrnCode' => 'USD', 
+          'VendorDescription' => nil,
+          'VendorListName' => 'The Daily Herald'
+      },
+      {
+          'ApprovedAmount' => '778.00000000', 
+          'Expense-Entry-Url' => 'http://www.concursolutions.com/api/expense/expensereport/v1.1/report/iiwEUE87weOisd2sF2hsq/entry/Irusj23j48hks9IIor92746SLL92039jfye', 
+          'ExpenseName' => 'Gas', 
+          'LocationName' => 'Tacoma, Washington', 
+          'TransactionAmount' => '778.00000000', 
+          'TransactionCrnCode' => 'USD', 
+          'VendorDescription' => nil,
+          'VendorListName' => 'The Daily Herald'
+      }
+      ]}})
+      ers.should_not be_empty
+      ers.each do |expense|
+        expense.should be_a(ConcurConnect::Expense)
+        expense.type.length.should > 0
+        expense.amount.to_f.should > 0
+        expense.vendor.length.should > 0
+      end
+    end
+  end
+end
+

data/spec/concur_connect/expense_report_finder_spec.rb

@@ -0,0 +1,81 @@
+require 'spec_helper'
+
+describe ConcurConnect::ExpenseReportFinder do
+  let(:session) { 
+    ConcurConnect.session '3dcPjZyTeQziAndLnUALTI', 'ZipGipKjsd4ypFx2qcJ5sCuBY9FYbJlE', 't0026855k9r8'
+  }
+  let(:finder) { ConcurConnect::ExpenseReportFinder.new session }
+
+  describe '#find' do
+    it 'gets a list of expense reports with a given status' do
+      VCR.use_cassette('expense_report list by status', :record => :once) do
+        list = finder.find('derek.kastner@brighterplanet.com', 'APPROVED')
+        list.should_not be_empty
+        list.each { |i| i.should be_a(ConcurConnect::ExpenseReport) }
+      end
+    end
+    it 'gets a list of expense reports with a given status and last modified date' do
+      VCR.use_cassette('expense_report list by date', :record => :once) do
+        list = finder.find(nil, 'APPROVED', Time.now)
+        list.should_not be_empty
+        list.each { |i| i.should be_a(ConcurConnect::ExpenseReport) }
+      end
+    end
+  end
+
+  describe '#build_expense_reports' do
+    it 'handles an empty list of expense reports' do
+      ers = finder.build_expense_reports({'ReportsList' => nil})
+      ers.should be_empty
+    end
+    it 'builds a list of a single expense report' do
+      ers = finder.build_expense_reports({'ReportsList' => {
+        'ReportSummary' => {
+          'ReportName' => 'August Expenses',
+          'ReportTotal' => '245.00000000',
+          'ReportId' => '14B7C9053CAA4864A27F',
+          'ReportDate' => '2010-08-06T00:00:00',
+          'LastComment' => '',
+          'Report-Details-Url' => 'http://www.concursolutions.com/api/expense/expensereport/v1.1/report/ndfsdfseSDFDwaXZesdsfs',
+          'Report-Full-Details-Url' => 'http://www.concursolutions.com/api/expense/expensereport/v1.1/reportfulldetails/ndfsdfseSDFDwaXZesdsfs'
+      }}})
+      ers.should_not be_empty
+      ers.each do |expense_report|
+        expense_report.should be_a(ConcurConnect::ExpenseReport)
+        expense_report.id.should =~ /^[A-F0-9]+$/
+        expense_report.name.should == 'August Expenses'
+        expense_report.date.should =~ /\d{4}-\d\d-\d\d/
+      end
+    end
+    it 'builds a list of new expense reports' do
+      ers = finder.build_expense_reports({'ReportsList' => {
+        'ReportSummary' => [{
+          'ReportName' => 'August Expenses',
+          'ReportTotal' => '245.00000000',
+          'ReportId' => '14B7C9053CAA4864A27F',
+          'ReportDate' => '2010-08-06T00:00:00',
+          'LastComment' => '',
+          'Report-Details-Url' => 'http://www.concursolutions.com/api/expense/expensereport/v1.1/report/ndfsdfseSDFDwaXZesdsfs',
+          'Report-Full-Details-Url' => 'http://www.concursolutions.com/api/expense/expensereport/v1.1/reportfulldetails/ndfsdfseSDFDwaXZesdsfs'
+      },
+      {
+          'ReportName' => 'September Expenses',
+          'ReportTotal' => '345.00000000',
+          'ReportId' => '14B7C9053CAA4864A27F',
+          'ReportDate' => '2011-09-06T00:00:00',
+          'LastComment' => '',
+          'Report-Details-Url' => 'http://www.concursolutions.com/api/expense/expensereport/v1.1/report/ndfsdfseSDFDwaXZesdsfs',
+          'Report-Full-Details-Url' => 'http://www.concursolutions.com/api/expense/expensereport/v1.1/reportfulldetails/ndfsdfseSDFDwaXZesdsfs'
+      }
+      ]}})
+      ers.should_not be_empty
+      ers.each do |expense_report|
+        expense_report.should be_a(ConcurConnect::ExpenseReport)
+        expense_report.id.should =~ /^[A-F0-9]+$/
+        expense_report.name.length.should > 0
+        expense_report.date.should =~ /\d{4}-\d\d-\d\d/
+      end
+    end
+  end
+end
+

data/spec/concur_connect/expense_report_spec.rb

@@ -0,0 +1,5 @@
+require 'spec_helper'
+require 'concur_connect/expense_report'
+
+describe ConcurConnect::ExpenseReport do
+end

data/spec/concur_connect/itinerary_finder_spec.rb

@@ -0,0 +1,43 @@
+require 'spec_helper'
+
+describe ConcurConnect::ItineraryFinder do
+  let(:session) { 
+    ConcurConnect.session '3dcPjZyTeQziAndLnUALTI', 'ZipGipKjsd4ypFx2qcJ5sCuBY9FYbJlE', 't0026855k9r8'
+  }
+  let(:finder) { ConcurConnect::ItineraryFinder.new session }
+
+  describe '#find' do
+    it 'finds and builds a list of itineraries' do
+      VCR.use_cassette('itinerary list', :record => :once) do
+        list = finder.find('derek.kastner@brighterplanet.com')
+        list.should_not be_empty
+        list.each { |i| i.should be_a(ConcurConnect::Itinerary) }
+      end
+    end
+  end
+
+  describe '#build_itineraries' do
+    it 'handles an empty list of itineraries' do
+      is = finder.build_itineraries({'ItineraryInfoList' => nil})
+      is.should be_empty
+    end
+    it 'builds a list of new itineraries' do
+      is = finder.build_itineraries({'ItineraryInfoList' => {
+        'ItineraryInfo' => [{
+          'id' => 'https://www.concursoultions.com/api/travel/trip/v1.0/4294967509',
+          'TripName' => 'My Trip',
+          'StartDateLocal' => '2010-02-15T09:00:00',
+          'EndDateLocal' => '2010-02-15T09:00:00'
+      }]}})
+      is.should_not be_empty
+      is.each do |itinerary|
+        itinerary.should be_a(ConcurConnect::Itinerary)
+        itinerary.concur_id.should =~ /http/
+        itinerary.name.should =~ /\w+/
+        itinerary.start_date.should =~ /\d{4}-\d\d-\d\d/
+        itinerary.end_date.should =~ /\d{4}-\d\d-\d\d/
+      end
+    end
+  end
+end
+

data/spec/concur_connect/user_finder_spec.rb

@@ -0,0 +1,26 @@
+require 'spec_helper'
+
+describe ConcurConnect::UserFinder do
+  let(:session) { 
+    ConcurConnect.session '3dcPjZyTeQziAndLnUALTI', 'ZipGipKjsd4ypFx2qcJ5sCuBY9FYbJlE', 't0026855k9r8'
+  }
+  let(:finder) { ConcurConnect::UserFinder.new session }
+
+  describe '#find' do
+    it 'finds and builds a user' do
+      VCR.use_cassette('user', :record => :once) do
+        user = finder.find('derek.kastner@brighterplanet.com')
+        user.should be_a(ConcurConnect::User)
+      end
+    end
+  end
+
+  describe '#build_user' do
+    it 'builds a new user' do
+      u = finder.build_user({'LoginId' => 'user@example.com'})
+      u.should be_a(ConcurConnect::User)
+      u.login_id.should == 'user@example.com'
+    end
+  end
+end
+

data/spec/concur_connect/user_spec.rb

@@ -0,0 +1,21 @@
+require 'spec_helper'
+require 'concur_connect/user'
+require 'concur_connect/expense_report'
+
+describe ConcurConnect::User do
+  #describe '#itineraries' do
+    #let(:user) { ConcurConnect::User.new }
+    #it 'fetches all itineraries for the user if no date is specified' do
+      #user.itineraries
+    #end
+    #it 'fetches all itineraries for the user after a specified date'
+  #end
+
+  describe '#expense_reports' do
+    it 'fetches all the expense reports for the user' do
+      pending
+      u.expense_reports.should_not be_empty
+      u.expense_reports.each { |er| er.should be_a?(ExpenseReport) }
+    end
+  end
+end

data/spec/concur_connect_spec.rb

@@ -0,0 +1,30 @@
+require 'spec_helper'
+
+describe ConcurConnect do
+  it 'is easy to use' do
+    concur = ConcurConnect.session '3dcPjZyTeQziAndLnUALTI', 'ZipGipKjsd4ypFx2qcJ5sCuBY9FYbJlE', 't0026855k9r8'
+    concur.should be_a(ConcurConnect::Session)
+    user = nil
+    expense_reports = nil
+
+    VCR.use_cassette('session expense reports', :record => :once) do
+      expense_reports = concur.expense_reports Date.new(2011, 9, 1)
+      expense_reports.should_not be_empty
+    end
+
+    VCR.use_cassette('session expenses', :record => :once) do
+      expenses = expense_reports.first.expenses
+      expenses.should_not be_empty
+    end
+
+    VCR.use_cassette('session user', :record => :once) do
+      user = concur.user('derek.kastner@brighterplanet.com')
+      user.should be_a(ConcurConnect::User)
+    end
+
+    #VCR.use_cassette('session user expense reports', :record => :once) do
+      #reports = user.expense_reports
+      #reports.should_not be_empty
+    #end
+  end
+end

data/spec/fixtures/vcr_cassettes/GET_user/v1_0/User.yml

@@ -0,0 +1,40 @@
+---
+- !ruby/struct:VCR::HTTPInteraction
+  request: !ruby/struct:VCR::Request
+    method: :get
+    uri: https://www.concursolutions.com:443/api/user/v1.0/User
+    body: !!null 
+    headers:
+      x-companydomain:
+      - t0026855k9r8
+      x-userid:
+      - derek.kastner@brighterplanet.com
+      authorization:
+      - OAuth oauth_consumer_key="3dcPjZyTeQziAndLnUALTI", oauth_nonce="2256b50d188b97c845313c9b0ef30f32",
+        oauth_signature="7YvuAEg6v35sSPloetgEijy1heE%3D", oauth_signature_method="HMAC-SHA1",
+        oauth_timestamp="1322069185", oauth_version="1.0"
+      accept-encoding:
+      - gzip;q=1.0,deflate;q=0.6,identity;q=0.3
+  response: !ruby/struct:VCR::Response
+    status: !ruby/struct:VCR::ResponseStatus
+      code: 200
+      message: OK
+    headers:
+      cache-control:
+      - private
+      content-type:
+      - application/xml
+      server:
+      - Microsoft-IIS/7.5
+      x-aspnet-version:
+      - 2.0.50727
+      x-powered-by:
+      - ASP.NET
+      webserver:
+      - usseatuicte53
+      date:
+      - Wed, 23 Nov 2011 17:26:25 GMT
+      content-length:
+      - '1007'
+    body: <UserProfile xmlns="http://www.concursolutions.com/api/user/2011/02" xmlns:i="http://www.w3.org/2001/XMLSchema-instance"><Active>Y</Active><CashAdvanceAccountCode/><CrnKey>USD</CrnKey><CtryCode>US</CtryCode><CtrySubCode/><Custom1/><Custom10/><Custom11/><Custom12/><Custom13/><Custom14/><Custom15/><Custom16/><Custom17/><Custom18/><Custom19/><Custom2/><Custom20/><Custom21/><Custom3/><Custom4/><Custom5/><Custom6/><Custom7/><Custom8/><Custom9/><EmailAddress>derek.kastner@brighterplanet.com</EmailAddress><EmpId>derek.kastner@brighterplanet.com</EmpId><ExpenseApprover>Y</ExpenseApprover><ExpenseApproverEmployeeID/><ExpenseUser>Y</ExpenseUser><FirstName>Derek</FirstName><InvoiceApprover>N</InvoiceApprover><InvoiceUser>N</InvoiceUser><IsTestEmp>N</IsTestEmp><LastName>Kastner</LastName><LedgerName>DEFAULT</LedgerName><LocaleName>en_US</LocaleName><LoginId>derek.kastner@brighterplanet.com</LoginId><Mi/><OrgUnit1/><OrgUnit2/><OrgUnit3/><OrgUnit4/><OrgUnit5/><OrgUnit6/><TripUser>N</TripUser></UserProfile>
+    http_version: '1.1'

data/spec/fixtures/vcr_cassettes/expense_list.yml

@@ -0,0 +1,36 @@
+---
+- !ruby/struct:VCR::HTTPInteraction
+  request: !ruby/struct:VCR::Request
+    method: :get
+    uri: https://www.concursolutions.com:443/api/expense/expensereport/v1.1/report/nABR4fUZDftz3veYYzMffJR5k3uLU7xQy/entries
+    body: !!null 
+    headers:
+      authorization:
+      - OAuth oauth_consumer_key="3dcPjZyTeQziAndLnUALTI", oauth_nonce="8fa77459e675b5a1edbe0bb7bfb1696c",
+        oauth_signature="q1beMM3icyK7HaC0jnARXIwoyHo%3D", oauth_signature_method="HMAC-SHA1",
+        oauth_timestamp="1324580513", oauth_version="1.0"
+      accept-encoding:
+      - gzip;q=1.0,deflate;q=0.6,identity;q=0.3
+  response: !ruby/struct:VCR::Response
+    status: !ruby/struct:VCR::ResponseStatus
+      code: 200
+      message: OK
+    headers:
+      cache-control:
+      - private
+      content-type:
+      - application/xml
+      server:
+      - Microsoft-IIS/7.5
+      x-aspnet-version:
+      - 2.0.50727
+      webserver:
+      - usseaeuicte34
+      date:
+      - Thu, 22 Dec 2011 19:01:54 GMT
+      content-length:
+      - '1077'
+    body: <ExpenseEntriesList xmlns="http://www.concursolutions.com/api/expense/expensereport/2011/03"
+      xmlns:i="http://www.w3.org/2001/XMLSchema-instance"><ExpenseEntrySummary><ApprovedAmount>83.22000000</ApprovedAmount><Expense-Entry-Url>https://www.concursolutions.com/api/expense/expensereport/v1.1/report/nABR4fUZDftz3veYYzMffJR5k3uLU7xQy/entry/n7w$pAOZMAeLZLiZZHq6M764nL1AHtcMtQ</Expense-Entry-Url><ExpenseName>Gas</ExpenseName><LocationName/><TransactionAmount>83.22000000</TransactionAmount><TransactionCrnCode>USD</TransactionCrnCode><VendorDescription/><VendorListName/></ExpenseEntrySummary><ExpenseEntrySummary><ApprovedAmount>179.82000000</ApprovedAmount><Expense-Entry-Url>https://www.concursolutions.com/api/expense/expensereport/v1.1/report/nABR4fUZDftz3veYYzMffJR5k3uLU7xQy/entry/n7w$pAOZByd82Y9p6KwXMFISMo1mcNqatX</Expense-Entry-Url><ExpenseName>Personal
+      Car Mileage</ExpenseName><LocationName/><TransactionAmount>179.82000000</TransactionAmount><TransactionCrnCode>USD</TransactionCrnCode><VendorDescription/><VendorListName/></ExpenseEntrySummary></ExpenseEntriesList>
+    http_version: '1.1'

data/spec/fixtures/vcr_cassettes/expense_report_list_by_date.yml

@@ -0,0 +1,35 @@
+---
+- !ruby/struct:VCR::HTTPInteraction
+  request: !ruby/struct:VCR::Request
+    method: :get
+    uri: https://www.concursolutions.com:443/api/expense/expensereport/v1.1/reportslist/APPROVED/LastModified?date=2011-12-22
+    body: !!null 
+    headers:
+      authorization:
+      - OAuth oauth_consumer_key="3dcPjZyTeQziAndLnUALTI", oauth_nonce="5a97820cd02e5126b3b219e81cd11991",
+        oauth_signature="bzj5lx%2BXN9Lr%2BdYMPIGYheyItbQ%3D", oauth_signature_method="HMAC-SHA1",
+        oauth_timestamp="1324566949", oauth_version="1.0"
+      accept-encoding:
+      - gzip;q=1.0,deflate;q=0.6,identity;q=0.3
+  response: !ruby/struct:VCR::Response
+    status: !ruby/struct:VCR::ResponseStatus
+      code: 200
+      message: OK
+    headers:
+      cache-control:
+      - private
+      content-type:
+      - application/xml
+      server:
+      - Microsoft-IIS/7.5
+      x-aspnet-version:
+      - 2.0.50727
+      webserver:
+      - usseatuicte66
+      date:
+      - Thu, 22 Dec 2011 15:15:50 GMT
+      content-length:
+      - '750'
+    body: <ReportsList xmlns="http://www.concursolutions.com/api/expense/expensereport/2011/03"
+      xmlns:i="http://www.w3.org/2001/XMLSchema-instance"><ReportSummary><ReportName>Fuel</ReportName><ReportId>AD63693E22DB4F65BA05</ReportId><ReportTotal>263.04000000</ReportTotal><ReportDate>2011-11-23T00:00:00</ReportDate><LastComment/><Report-Details-Url>https://www.concursolutions.com/api/expense/expensereport/v1.1/report/nABR4fUZDftz3veYYzMffJR5k3uLU7xQy</Report-Details-Url><Report-Full-Details-Url>https://www.concursolutions.com/api/expense/expensereport/v1.1/reportfulldetails/nABR4fUZDftz3veYYzMffJR5k3uLU7xQy</Report-Full-Details-Url><ExpenseUserXUserID>derek.kastner@brighterplanet.com</ExpenseUserXUserID><ApproverXUserID/></ReportSummary></ReportsList>
+    http_version: '1.1'