netsuite 0.0.23 → 0.0.25

data/Rakefile

@@ -12,7 +12,6 @@ end
 
 desc 'Generate code coverage'
 RSpec::Core::RakeTask.new(:coverage) do |t|
-  t.pattern = "./spec/**/*_spec.rb" # don't need this, it's default.
   t.rcov = true
-  t.rcov_opts = ['--exclude', 'spec']
+  t.rcov_opts = ['--exclude', '/gems/,spec']
 end

data/lib/netsuite.rb

@@ -2,6 +2,7 @@ require 'set'
 
 require 'netsuite/version'
 require 'netsuite/errors'
+require 'netsuite/xml_logger'
 
 module NetSuite
   autoload :Configuration, 'netsuite/configuration'
@@ -19,6 +20,7 @@ module NetSuite
   end
 
   module Support
+    autoload :Actions,    'netsuite/support/actions'
     autoload :Attributes, 'netsuite/support/attributes'
     autoload :Fields,     'netsuite/support/fields'
     autoload :RecordRefs, 'netsuite/support/record_refs'
@@ -34,37 +36,45 @@ module NetSuite
   end
 
   module Records
-    autoload :Account,                 'netsuite/records/account'
-    autoload :BillAddress,             'netsuite/records/bill_address'
-    autoload :Classification,          'netsuite/records/classification'
-    autoload :CreditMemo,              'netsuite/records/credit_memo'
-    autoload :CustomField,             'netsuite/records/custom_field'
-    autoload :CustomFieldList,         'netsuite/records/custom_field_list'
-    autoload :CustomRecord,            'netsuite/records/custom_record'
-    autoload :CustomRecordRef,         'netsuite/records/custom_record_ref'
-    autoload :CustomRecordType,        'netsuite/records/custom_record_type'
-    autoload :Customer,                'netsuite/records/customer'
-    autoload :CustomerAddressbook,     'netsuite/records/customer_addressbook'
-    autoload :CustomerAddressbookList, 'netsuite/records/customer_addressbook_list'
-    autoload :CustomerPayment,         'netsuite/records/customer_payment'
-    autoload :Duration,                'netsuite/records/duration'
-    autoload :InventoryItem,           'netsuite/records/inventory_item'
-    autoload :Invoice,                 'netsuite/records/invoice'
-    autoload :InvoiceItem,             'netsuite/records/invoice_item'
-    autoload :InvoiceItemList,         'netsuite/records/invoice_item_list'
-    autoload :Job,                     'netsuite/records/job'
-    autoload :JournalEntry,            'netsuite/records/journal_entry'
-    autoload :JournalEntryLine,        'netsuite/records/journal_entry_line'
-    autoload :JournalEntryLineList,    'netsuite/records/journal_entry_line_list'
-    autoload :Location,                'netsuite/records/location'
-    autoload :NonInventorySaleItem,    'netsuite/records/non_inventory_sale_item'
-    autoload :PaymentMethod,           'netsuite/records/payment_method'
+    autoload :Account,                   'netsuite/records/account'
+    autoload :BillAddress,               'netsuite/records/bill_address'
+    autoload :Classification,            'netsuite/records/classification'
+    autoload :CreditMemo,                'netsuite/records/credit_memo'
+    autoload :CustomField,               'netsuite/records/custom_field'
+    autoload :CustomFieldList,           'netsuite/records/custom_field_list'
+    autoload :CustomRecord,              'netsuite/records/custom_record'
+    autoload :CustomRecordRef,           'netsuite/records/custom_record_ref'
+    autoload :CustomRecordType,          'netsuite/records/custom_record_type'
+    autoload :Customer,                  'netsuite/records/customer'
+    autoload :CustomerAddressbook,       'netsuite/records/customer_addressbook'
+    autoload :CustomerAddressbookList,   'netsuite/records/customer_addressbook_list'
+    autoload :CustomerPayment,           'netsuite/records/customer_payment'
+    autoload :CustomerRefund,            'netsuite/records/customer_refund'
+    autoload :CustomerRefundApply,       'netsuite/records/customer_refund_apply'
+    autoload :CustomerRefundApplyList,   'netsuite/records/customer_refund_apply_list'
+    autoload :CustomerRefundDeposit,     'netsuite/records/customer_refund_deposit'
+    autoload :CustomerRefundDepositList, 'netsuite/records/customer_refund_deposit_list'
+    autoload :Duration,                  'netsuite/records/duration'
+    autoload :InventoryItem,             'netsuite/records/inventory_item'
+    autoload :Invoice,                   'netsuite/records/invoice'
+    autoload :InvoiceItem,               'netsuite/records/invoice_item'
+    autoload :InvoiceItemList,           'netsuite/records/invoice_item_list'
+    autoload :Job,                       'netsuite/records/job'
+    autoload :JournalEntry,              'netsuite/records/journal_entry'
+    autoload :JournalEntryLine,          'netsuite/records/journal_entry_line'
+    autoload :JournalEntryLineList,      'netsuite/records/journal_entry_line_list'
+    autoload :Location,                  'netsuite/records/location'
+    autoload :NonInventorySaleItem,      'netsuite/records/non_inventory_sale_item'
+    autoload :PaymentMethod,             'netsuite/records/payment_method'
     autoload :RecordRef,               'netsuite/records/record_ref'
     autoload :ShipAddress,             'netsuite/records/ship_address'
   end
 
   def self.configure(&block)
     NetSuite::Configuration.instance_eval(&block)
+    Savon.configure do |config|
+      config.logger = NetSuite::XmlLogger.new(STDOUT)
+    end
   end
 
 end

data/lib/netsuite/records/account.rb

@@ -3,6 +3,9 @@ module NetSuite
     class Account
       include Support::Fields
       include Support::RecordRefs
+      include Support::Actions
+
+      actions :get
 
       fields :acct_name, :acct_number, :acct_type, :cash_flow_rate, :cur_doc_num, :description, :eliminate, :exchange_rate,
         :general_rate, :include_children, :inventory, :is_inactive, :opening_balance, :revalue, :tran_date
@@ -18,15 +21,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
     end
   end
 end

data/lib/netsuite/records/classification.rb

@@ -2,6 +2,9 @@ module NetSuite
   module Records
     class Classification
       include Support::Fields
+      include Support::Actions
+
+      actions :get
 
       fields :name, :include_children, :is_inactive, :class_translation_list, :subsidiary_list, :custom_field_list
 
@@ -14,15 +17,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
     end
   end
 end

data/lib/netsuite/records/credit_memo.rb

@@ -4,8 +4,11 @@ module NetSuite
       include Support::Fields
       include Support::RecordRefs
       include Support::Records
+      include Support::Actions
       include Namespaces::TranCust
 
+      actions :get, :add, :initialize
+
       fields :alt_handling_cost, :alt_shipping_cost, :amount_paid, :amount_remaining, :auto_apply, :balance,
         :bill_address, :contrib_pct, :created_date, :currency_name, :deferred_revenue, :discount_rate, :email,
         :est_gross_profit, :est_gross_profit_percent, :exchange_rate, :exclude_commission, :fax, :gift_cert_applied,
@@ -31,29 +34,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
-      def self.initialize(object)
-        response = Actions::Initialize.call(self, object)
-        if response.success?
-          new(response.body)
-        else
-          raise InitializationError, "#{self}.initialize with #{object} failed."
-        end
-      end
-
-      def add
-        response = Actions::Add.call(self)
-        response.success?
-      end
-
     end
   end
 end

data/lib/netsuite/records/custom_record.rb

@@ -4,8 +4,11 @@ module NetSuite
       include Support::Fields
       include Support::RecordRefs
       include Support::Records
+      include Support::Actions
       include Namespaces::SetupCustom
 
+      actions :get, :add
+
       fields :allow_attachments, :allow_inline_editing, :allow_numbering_override, :allow_quick_search, :created,
         :custom_record_id, :description, :disclaimer, :enabl_email_merge, :enable_numbering, :include_name,
         :is_available_offline, :is_inactive, :is_numbering_updateable, :is_ordered, :last_modified, :name,
@@ -28,17 +31,8 @@ module NetSuite
 
       def self.get(options = {})
         options.merge!(:type_id => type_id) unless options[:type_id]
-        response = Actions::Get.call(self, options.merge!(:custom => true))
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
-      def add
-        response = Actions::Add.call(self)
-        response.success?
+        options.merge!(:custom => true)
+        super(options)
       end
 
       def self.type_id(id = nil)

data/lib/netsuite/records/custom_record_type.rb

@@ -3,6 +3,9 @@ module NetSuite
     class CustomRecordType
       include Support::Fields
       include Support::RecordRefs
+      include Support::Actions
+
+      actions :get
 
       fields :allow_attachments, :allow_inline_editing, :allow_numbering_override, :allow_quick_search, :description,
         :disclaimer, :enable_mail_merge, :enable_numbering, :include_name, :is_available_offline, :is_inactive,
@@ -22,15 +25,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
     end
   end
 end

data/lib/netsuite/records/customer.rb

@@ -4,8 +4,11 @@ module NetSuite
       include Support::Fields
       include Support::RecordRefs
       include Support::Records
+      include Support::Actions
       include Namespaces::ListRel
 
+      actions :get, :add
+
       fields :access_role, :account_number, :aging, :alt_email, :alt_name, :alt_phone, :bill_pay,
         :buying_reason, :buying_time_frame, :campaign_category, :category, :click_stream, :comments, :company_name,
         :consol_aging, :consol_days_overdue, :contact_roles_list, :contrib_pct, :credit_cards_list, :credit_hold_override,
@@ -38,20 +41,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
-      def add
-        response = Actions::Add.call(self)
-        response.success?
-      end
-
     end
   end
 end

data/lib/netsuite/records/customer_payment.rb

@@ -4,9 +4,12 @@ module NetSuite
       include Support::Fields
       include Support::RecordRefs
       include Support::Records
+      include Support::Actions
       include Namespaces::TranCust
 
-      fields :auth_code, :auto_apply, :balance, :cc_approved, :cc_avs_street_match, :cc_avs_zip_match,
+      actions :get, :initialize, :add
+
+      fields :auth_code, :auto_apply, :cc_approved, :cc_avs_street_match, :cc_avs_zip_match,
         :cc_expire_date, :cc_name, :cc_number, :cc_security_code, :cc_security_code_match, :cc_street, :cc_zip_code,
         :charge_it, :check_num, :created_date, :currency_name, :debit_card_issue_no, :exchange_rate, :ignore_avs,
         :last_modified_date, :memo, :payment, :pending, :pn_ref_num, :status, :three_d_status_code, :tran_date,
@@ -14,38 +17,20 @@ module NetSuite
 
       field :custom_field_list, CustomFieldList
 
-      read_only_fields :applied, :total, :unapplied
+      read_only_fields :applied, :balance, :total, :unapplied
 
       record_refs :account, :ar_acct, :credit_card, :credit_card_processor, :custom_form, :customer, :department, :klass,
         :location, :payment_method, :posting_period, :subsidiary
 
+      attr_reader   :internal_id
+      attr_accessor :external_id
+
       def initialize(attributes = {})
+        @internal_id = attributes.delete(:internal_id) || attributes.delete(:@internal_id)
+        @external_id = attributes.delete(:external_id) || attributes.delete(:@external_id)
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
-      def self.initialize(object)
-        response = Actions::Initialize.call(self, object)
-        if response.success?
-          new(response.body)
-        else
-          raise InitializationError, "#{self}.initialize with #{object} failed."
-        end
-      end
-
-      def add
-        response = Actions::Add.call(self)
-        response.success?
-      end
-
     end
   end
 end

data/lib/netsuite/records/customer_refund.rb

@@ -0,0 +1,31 @@
+module NetSuite
+  module Records
+    class CustomerRefund
+      include Support::Fields
+      include Support::RecordRefs
+      include Support::Records
+      include Support::Actions
+      include Namespaces::TranCust
+
+      actions :get, :initialize, :add
+
+      fields :address, :balance, :cc_approved, :cc_expire_date, :cc_name, :cc_number, :cc_street, :cc_zip_code, :charge_it,
+        :created_date, :currency_name, :debit_card_issue_no, :exchange_rate, :last_modified_date, :memo, :pn_ref_num, :status,
+        :to_be_printed, :tran_date, :tran_id, :valid_from
+
+      field :custom_field_list, CustomFieldList
+      field :apply_list,        CustomerRefundApplyList
+      field :deposit_list,      CustomerRefundDepositList
+
+      read_only_fields :total
+
+      record_refs :account, :ar_acct, :credit_card, :credit_card_processor, :custom_form, :customer, :department, :klass,
+        :location, :payment_method, :posting_period, :subsidiary, :void_journal
+
+      def initialize(attributes = {})
+        initialize_from_attributes_hash(attributes)
+      end
+
+    end
+  end
+end

data/lib/netsuite/records/customer_refund_apply.rb

@@ -0,0 +1,16 @@
+module NetSuite
+  module Records
+    class CustomerRefundApply
+      include Support::Fields
+      include Support::Records
+      include Namespaces::TranCust
+
+      fields :amount, :apply, :apply_date, :currency, :doc, :due, :line, :ref_num, :total, :type
+
+      def initialize(attributes = {})
+        initialize_from_attributes_hash(attributes)
+      end
+
+    end
+  end
+end

data/lib/netsuite/records/customer_refund_apply_list.rb

@@ -0,0 +1,27 @@
+module NetSuite
+  module Records
+    class CustomerRefundApplyList
+      include Namespaces::TranCust
+
+      def initialize(attributes = {})
+        case attributes[:apply]
+        when Hash
+          applies << CustomerRefundApply.new(attributes[:apply])
+        when Array
+          attributes[:apply].each { |apply| applies << CustomerRefundApply.new(apply) }
+        end
+      end
+
+      def applies
+        @applies ||= []
+      end
+
+      def to_record
+        applies.map do |apply|
+          { "#{record_namespace}:apply" => apply.to_record }
+        end
+      end
+
+    end
+  end
+end

data/lib/netsuite/records/customer_refund_deposit.rb

@@ -0,0 +1,16 @@
+module NetSuite
+  module Records
+    class CustomerRefundDeposit
+      include Support::Fields
+      include Support::Records
+      include Namespaces::TranCust
+
+      fields :amount, :apply, :currency, :deposit_date, :doc, :line, :ref_num, :remaining, :total
+
+      def initialize(attributes = {})
+        initialize_from_attributes_hash(attributes)
+      end
+
+    end
+  end
+end

data/lib/netsuite/records/customer_refund_deposit_list.rb

@@ -0,0 +1,28 @@
+module NetSuite
+  module Records
+    class CustomerRefundDepositList
+      include Support::Records
+      include Namespaces::TranCust
+
+      def initialize(attributes = {})
+        case attributes[:customer_refund_deposit]
+        when Hash
+          deposits << CustomerRefundDeposit.new(attributes[:customer_refund_deposit])
+        when Array
+          attributes[:customer_refund_deposit].each { |deposit| deposits << CustomerRefundDeposit.new(deposit) }
+        end
+      end
+
+      def deposits
+        @deposits ||= []
+      end
+
+      def to_record
+        deposits.map do |deposit|
+          { "#{record_namespace}:customerRefundDeposit" => deposit.to_record }
+        end
+      end
+
+    end
+  end
+end

data/lib/netsuite/records/inventory_item.rb

@@ -4,8 +4,11 @@ module NetSuite
       include Support::Fields
       include Support::RecordRefs
       include Support::Records
+      include Support::Actions
       include Namespaces::ListAcct
 
+      actions :get, :add
+
       fields :auto_lead_time, :auto_preferred_stock_level, :auto_reorder_point, :available_to_partners, :average_cost,
         :copy_description, :cost, :cost_estimate, :cost_estimate_type, :cost_estimate_units, :cost_units, :costing_method,
         :costing_method_display, :country_of_manufacture, :created_date, :currency, :date_converted_to_inv,
@@ -46,20 +49,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
-      def add
-        response = Actions::Add.call(self)
-        response.success?
-      end
-
     end
   end
 end

data/lib/netsuite/records/invoice.rb

@@ -4,8 +4,11 @@ module NetSuite
       include Support::Fields
       include Support::RecordRefs
       include Support::Records
+      include Support::Actions
       include Namespaces::TranSales
 
+      actions :get, :initialize, :add
+
       fields :alt_handling_cost, :alt_shipping_cost, :balance, :bill_address,
         :billing_schedule, :contrib_pct, :created_date, :created_from, :currency_name, :custom_field_list,
         :deferred_revenue, :department, :discount_amount, :discount_date, :discount_item, :discount_rate,
@@ -45,29 +48,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
-      def self.initialize(object)
-        response = Actions::Initialize.call(self, object)
-        if response.success?
-          new(response.body)
-        else
-          raise InitializationError, "#{self}.initialize with #{object} failed."
-        end
-      end
-
-      def add
-        response = Actions::Add.call(self)
-        response.success?
-      end
-
     end
   end
 end

data/lib/netsuite/records/job.rb

@@ -4,8 +4,11 @@ module NetSuite
       include Support::Fields
       include Support::RecordRefs
       include Support::Records
+      include Support::Actions
       include Namespaces::ListRel
 
+      actions :get, :add
+
       fields :account_number, :allocate_payroll_expenses, :allow_all_resources_for_tasks, :allow_expenses, :allow_time,
         :alt_name, :alt_phone, :bill_pay, :calculated_end_date, :calculated_end_date_baseline, :comments, :company_name,
         :date_created, :default_address, :email, :email_preference, :end_date, :entity_id, :estimated_cost,
@@ -32,20 +35,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
-      def add
-        response = Actions::Add.call(self)
-        response.success?
-      end
-
     end
   end
 end

data/lib/netsuite/records/journal_entry.rb

@@ -4,8 +4,11 @@ module NetSuite
       include Support::Fields
       include Support::RecordRefs
       include Support::Records
+      include Support::Actions
       include Namespaces::TranGeneral
 
+      actions :get, :add
+
       fields :approved, :created_date, :exchange_rate, :last_modified_date, :reversal_date, :reversal_defer, :reversal_entry,
         :tran_date, :tran_id
 
@@ -19,20 +22,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
-      def add
-        response = Actions::Add.call(self)
-        response.success?
-      end
-
     end
   end
 end

data/lib/netsuite/records/location.rb

@@ -3,6 +3,9 @@ module NetSuite
     class Location
       include Support::Fields
       include Support::RecordRefs
+      include Support::Actions
+
+      actions :get
 
       fields :addr1, :addr2, :addr3, :addr_phone, :addr_text, :addressee, :attention, :city, :country, :include_children,
         :is_inactive, :make_inventory_available, :make_inventory_available_store, :name, :override, :state, :tran_prefix, :zip
@@ -18,15 +21,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
     end
   end
 end

data/lib/netsuite/records/non_inventory_sale_item.rb

@@ -4,8 +4,11 @@ module NetSuite
       include Support::Fields
       include Support::RecordRefs
       include Support::Records
+      include Support::Actions
       include Namespaces::ListAcct
 
+      actions :get
+
       fields :available_to_partners, :cost_estimate, :cost_estimate_type, :cost_estimate_units, :country_of_manufacture,
         :created_date, :custom_field_list, :display_name, :dont_show_price, :enforce_min_qty_internally, :exclude_from_sitemap,
         :featured_description, :handling_cost, :handling_cost_units, :include_children, :is_donation_item, :is_fulfillable,
@@ -36,15 +39,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
     end
   end
 end

data/lib/netsuite/records/payment_method.rb

@@ -3,6 +3,9 @@ module NetSuite
     class PaymentMethod
       include Support::Fields
       include Support::RecordRefs
+      include Support::Actions
+
+      actions :get
 
       fields :credit_card, :express_checkout_arrangement, :is_debit_card, :is_inactive, :is_online, :name,
         :pay_pal_email_address, :undep_funds, :use_express_checkout
@@ -18,15 +21,6 @@ module NetSuite
         initialize_from_attributes_hash(attributes)
       end
 
-      def self.get(options = {})
-        response = Actions::Get.call(self, options)
-        if response.success?
-          new(response.body)
-        else
-          raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
-        end
-      end
-
     end
   end
 end

data/lib/netsuite/support/actions.rb

@@ -0,0 +1,80 @@
+module NetSuite
+  module Support
+    module Actions
+
+      def self.included(base)
+        base.send(:extend, ClassMethods)
+      end
+
+      module ClassMethods
+
+        def actions(*args)
+          instance_module = Module.new
+          class_module    = Module.new
+          args.each do |action|
+            define_action(instance_module, class_module, action)
+          end
+          self.send(:include, instance_module)
+          self.send(:extend, class_module)
+        end
+
+        def define_action(instance_module, class_module, action)
+          case action
+          when :get
+            define_get(class_module)
+          when :add
+            define_add(instance_module)
+          when :initialize
+            define_initialize(class_module)
+          else
+            raise "Unknown action: #{action.inspect}"
+          end
+        end
+
+        def define_get(class_module)
+          class_module.module_eval do
+            define_method :get do |*args|
+              options, *ignored = *args
+              response = NetSuite::Actions::Get.call(self, options)
+              if response.success?
+               new(response.body)
+              else
+               raise RecordNotFound, "#{self} with OPTIONS=#{options.inspect} could not be found"
+              end
+            end
+          end
+        end
+
+        def define_add(instance_module)
+          instance_module.module_eval do
+            define_method :add do
+              response = NetSuite::Actions::Add.call(self)
+              response.success?
+            end
+          end
+        end
+
+        def define_initialize(class_module)
+          (class << self; self; end).instance_eval do
+            define_method :initialize do |*args|
+              super(*args)
+            end
+          end
+
+          class_module.module_eval do
+            define_method :initialize do |object|
+              response = NetSuite::Actions::Initialize.call(self, object)
+              if response.success?
+                new(response.body)
+              else
+                raise InitializationError, "#{self}.initialize with #{object} failed."
+              end
+            end
+          end
+        end
+
+      end
+
+    end
+  end
+end

data/lib/netsuite/version.rb

@@ -1,3 +1,3 @@
 module Netsuite
-  VERSION = '0.0.23'
+  VERSION = '0.0.25'
 end

data/lib/netsuite/xml_logger.rb

@@ -0,0 +1,31 @@
+module NetSuite
+  require 'logger'
+  class XmlLogger < ::Logger
+    def format_message(severity, timestamp, progname, msg)
+      if msg.match('<?xml') && !(msg.match('SOAPAction'))
+        xp(msg)
+      else
+        "#{msg}\n"
+      end
+    end
+
+    def xp(xml_text)
+      xsl = <<XSL
+        <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
+        <xsl:output method="xml" encoding="UTF-8" indent="yes"/>
+        <xsl:strip-space elements="*"/>
+        <xsl:template match="/">
+          <xsl:copy-of select="."/>
+        </xsl:template>
+        </xsl:stylesheet>
+XSL
+
+      doc  = Nokogiri::XML(xml_text)
+      xslt = Nokogiri::XSLT(xsl)
+      out  = xslt.transform(doc)
+
+      puts out.to_xml
+    end
+
+  end
+end

data/netsuite.gemspec

@@ -16,6 +16,7 @@ Gem::Specification.new do |gem|
   gem.version       = Netsuite::VERSION
 
   gem.add_dependency 'savon', '0.9.7'
+  gem.add_dependency 'nokogiri'
 
   gem.add_development_dependency 'rspec',               '2.8.0'
   gem.add_development_dependency 'autotest-standalone', '4.5.9'

data/spec/netsuite/records/customer_refund_apply_list_spec.rb

@@ -0,0 +1,27 @@
+require 'spec_helper'
+
+describe NetSuite::Records::CustomerRefundApplyList do
+  let(:list) { NetSuite::Records::CustomerRefundApplyList.new }
+
+  it 'has a applies attribute' do
+    list.applies.should be_kind_of(Array)
+  end
+
+  describe '#to_record' do
+    before do
+      list.applies << NetSuite::Records::CustomerRefundApply.new(:amount => 10)
+    end
+
+    it 'can represent itself as a SOAP record' do
+      record = [
+        {
+          'tranCust:apply' => {
+            'tranCust:amount' => 10
+          }
+        }
+      ]
+      list.to_record.should eql(record)
+    end
+  end
+
+end

data/spec/netsuite/records/customer_refund_apply_spec.rb

@@ -0,0 +1,14 @@
+require 'spec_helper'
+
+describe NetSuite::Records::CustomerRefundApply do
+  let(:apply) { NetSuite::Records::CustomerRefundApply.new }
+
+  it 'has all the right fields' do
+    [
+      :amount, :apply, :apply_date, :currency, :doc, :due, :line, :ref_num, :total, :type
+    ].each do |field|
+      apply.should have_field(field)
+    end
+  end
+
+end

data/spec/netsuite/records/customer_refund_deposit_list_spec.rb

@@ -0,0 +1,27 @@
+require 'spec_helper'
+
+describe NetSuite::Records::CustomerRefundDepositList do
+  let(:list) { NetSuite::Records::CustomerRefundDepositList.new }
+
+  it 'has a deposits attribute' do
+    list.deposits.should be_kind_of(Array)
+  end
+
+  describe '#to_record' do
+    before do
+      list.deposits << NetSuite::Records::CustomerRefundDeposit.new(:apply => false)
+    end
+
+    it 'can represent itself as a SOAP record' do
+      record = [
+        {
+          'tranCust:customerRefundDeposit' => {
+            'tranCust:apply' => false
+          }
+        }
+      ]
+      list.to_record.should eql(record)
+    end
+  end
+
+end

data/spec/netsuite/records/customer_refund_deposit_spec.rb

@@ -0,0 +1,14 @@
+require 'spec_helper'
+
+describe NetSuite::Records::CustomerRefundDeposit do
+  let(:deposit) { NetSuite::Records::CustomerRefundDeposit.new }
+
+  it 'has all the right fields' do
+    [
+      :amount, :apply, :currency, :deposit_date, :doc, :line, :ref_num, :remaining, :total
+    ].each do |field|
+      deposit.should have_field(field)
+    end
+  end
+
+end

data/spec/netsuite/records/customer_refund_spec.rb

@@ -0,0 +1,172 @@
+require 'spec_helper'
+
+describe NetSuite::Records::CustomerRefund do
+  let(:refund) { NetSuite::Records::CustomerRefund.new }
+  let(:memo) { NetSuite::Records::CreditMemo.new }
+  let(:response) { NetSuite::Response.new(:success => true, :body => { :internal_id => '1' }) }
+
+  # <element name="depositList" type="tranCust:CustomerRefundDepositList" minOccurs="0"/>
+
+  it 'has all the right fields' do
+    [
+      :address, :balance, :cc_approved, :cc_expire_date, :cc_name, :cc_number, :cc_street, :cc_zip_code, :charge_it,
+      :created_date, :currency_name, :debit_card_issue_no, :exchange_rate, :last_modified_date, :memo, :pn_ref_num, :status,
+      :to_be_printed, :total, :tran_date, :tran_id, :valid_from
+    ].each do |field|
+      refund.should have_field(field)
+    end
+  end
+
+  it 'has all the right record refs' do
+    [
+      :account, :ar_acct, :credit_card, :credit_card_processor, :custom_form, :customer, :department, :klass, :location,
+      :payment_method, :posting_period, :subsidiary, :void_journal
+    ].each do |record_ref|
+      refund.should have_record_ref(record_ref)
+    end
+  end
+
+  describe '#custom_field_list' do
+    it 'can be set from attributes' do
+      attributes = {
+        :custom_field => {
+          :amount => 10
+        }
+      }
+      refund.custom_field_list = attributes
+      refund.custom_field_list.should be_kind_of(NetSuite::Records::CustomFieldList)
+      refund.custom_field_list.custom_fields.length.should eql(1)
+    end
+
+    it 'can be set from a CustomFieldList object' do
+      custom_field_list = NetSuite::Records::CustomFieldList.new
+      refund.custom_field_list = custom_field_list
+      refund.custom_field_list.should eql(custom_field_list)
+    end
+  end
+
+  describe '#apply_list' do
+    it 'can be set from attributes' do
+      attributes = {
+        :apply => {
+          :amount => 10
+        }
+      }
+      refund.apply_list = attributes
+      refund.apply_list.should be_kind_of(NetSuite::Records::CustomerRefundApplyList)
+      refund.apply_list.applies.length.should eql(1)
+    end
+
+    it 'can be set from a CustomerRefundApplyList object' do
+      apply_list = NetSuite::Records::CustomerRefundApplyList.new
+      refund.apply_list = apply_list
+      refund.apply_list.should eql(apply_list)
+    end
+  end
+
+  describe '#deposit_list' do
+    it 'can be set from attributes' do
+      attributes = {
+        :customer_refund_deposit => {
+          :apply => false
+        }
+      }
+      refund.deposit_list = attributes
+      refund.deposit_list.should be_kind_of(NetSuite::Records::CustomerRefundDepositList)
+      refund.deposit_list.deposits.length.should eql(1)
+    end
+
+    it 'can be set from a CustomerRefundDepositList object' do
+      deposit_list = NetSuite::Records::CustomerRefundDepositList.new
+      refund.deposit_list = deposit_list
+      refund.deposit_list.should eql(deposit_list)
+    end
+  end
+
+  describe '.get' do
+    context 'when the response is successful' do
+      let(:response) { NetSuite::Response.new(:success => true, :body => { :is_person => true }) }
+
+      it 'returns an CustomerRefund instance populated with the data from the response object' do
+        NetSuite::Actions::Get.should_receive(:call).with(NetSuite::Records::CustomerRefund, :external_id => 10).and_return(response)
+        refund = NetSuite::Records::CustomerRefund.get(:external_id => 10)
+        refund.should be_kind_of(NetSuite::Records::CustomerRefund)
+      end
+    end
+
+    context 'when the response is unsuccessful' do
+      let(:response) { NetSuite::Response.new(:success => false, :body => {}) }
+
+      it 'raises a RecordNotFound exception' do
+        NetSuite::Actions::Get.should_receive(:call).with(NetSuite::Records::CustomerRefund, :external_id => 10).and_return(response)
+        lambda {
+          NetSuite::Records::CustomerRefund.get(:external_id => 10)
+        }.should raise_error(NetSuite::RecordNotFound,
+          /NetSuite::Records::CustomerRefund with OPTIONS=(.*) could not be found/)
+      end
+    end
+  end
+
+  describe '.initialize' do
+    context 'when the request is successful' do
+      it 'returns an initialized invoice from the customer entity' do
+        NetSuite::Actions::Initialize.should_receive(:call).with(NetSuite::Records::CustomerRefund, memo).and_return(response)
+        refund = NetSuite::Records::CustomerRefund.initialize(memo)
+        refund.should be_kind_of(NetSuite::Records::CustomerRefund)
+      end
+    end
+
+    context 'when the response is unsuccessful' do
+      pending
+    end
+  end
+
+  describe '#add' do
+    let(:test_data) { { :memo => 'This is a memo', :balance => 100 } }
+
+    context 'when the response is successful' do
+      let(:response) { NetSuite::Response.new(:success => true, :body => { :internal_id => '1' }) }
+
+      it 'returns true' do
+        refund = NetSuite::Records::CustomerRefund.new(test_data)
+        NetSuite::Actions::Add.should_receive(:call).
+            with(refund).
+            and_return(response)
+        refund.add.should be_true
+      end
+    end
+
+    context 'when the response is unsuccessful' do
+      let(:response) { NetSuite::Response.new(:success => false, :body => {}) }
+
+      it 'returns false' do
+        refund = NetSuite::Records::Invoice.new(test_data)
+        NetSuite::Actions::Add.should_receive(:call).
+            with(refund).
+            and_return(response)
+        refund.add.should be_false
+      end
+    end
+  end
+
+  describe '#to_record' do
+    before do
+      refund.memo    = 'This is a memo'
+      refund.balance = 100
+    end
+    it 'can represent itself as a SOAP record' do
+      record = {
+        'tranCust:memo'    => 'This is a memo',
+        'tranCust:balance' => 100
+      }
+      refund.to_record.should eql(record)
+    end
+  end
+
+  describe '#record_type' do
+    it 'returns a string representation of the SOAP type' do
+      refund.record_type.should eql('tranCust:CustomerRefund')
+    end
+  end
+
+end

data/spec/netsuite/support/actions_spec.rb

@@ -0,0 +1,5 @@
+require 'spec_helper'
+
+describe NetSuite::Support::Actions do
+  pending
+end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: netsuite
 version: !ruby/object:Gem::Version 
-  hash: 49
+  hash: 45
   prerelease: 
   segments: 
   - 0
   - 0
-  - 23
-  version: 0.0.23
+  - 25
+  version: 0.0.25
 platform: ruby
 authors: 
 - Ryan Moran
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2012-01-20 00:00:00 Z
+date: 2012-01-23 00:00:00 Z
 dependencies: 
 - !ruby/object:Gem::Dependency 
   name: savon
@@ -34,9 +34,23 @@ dependencies:
   type: :runtime
   version_requirements: *id001
 - !ruby/object:Gem::Dependency 
-  name: rspec
+  name: nokogiri
   prerelease: false
   requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id002
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  prerelease: false
+  requirement: &id003 !ruby/object:Gem::Requirement 
     none: false
     requirements: 
     - - "="
@@ -48,11 +62,11 @@ dependencies:
         - 0
         version: 2.8.0
   type: :development
-  version_requirements: *id002
+  version_requirements: *id003
 - !ruby/object:Gem::Dependency 
   name: autotest-standalone
   prerelease: false
-  requirement: &id003 !ruby/object:Gem::Requirement 
+  requirement: &id004 !ruby/object:Gem::Requirement 
     none: false
     requirements: 
     - - "="
@@ -64,11 +78,11 @@ dependencies:
         - 9
         version: 4.5.9
   type: :development
-  version_requirements: *id003
+  version_requirements: *id004
 - !ruby/object:Gem::Dependency 
   name: savon_spec
   prerelease: false
-  requirement: &id004 !ruby/object:Gem::Requirement 
+  requirement: &id005 !ruby/object:Gem::Requirement 
     none: false
     requirements: 
     - - "="
@@ -80,7 +94,7 @@ dependencies:
         - 6
         version: 0.1.6
   type: :development
-  version_requirements: *id004
+  version_requirements: *id005
 description: NetSuite SuiteTalk API Wrapper
 email: 
 - ryan.moran@gmail.com
@@ -127,6 +141,11 @@ files:
 - lib/netsuite/records/customer_addressbook.rb
 - lib/netsuite/records/customer_addressbook_list.rb
 - lib/netsuite/records/customer_payment.rb
+- lib/netsuite/records/customer_refund.rb
+- lib/netsuite/records/customer_refund_apply.rb
+- lib/netsuite/records/customer_refund_apply_list.rb
+- lib/netsuite/records/customer_refund_deposit.rb
+- lib/netsuite/records/customer_refund_deposit_list.rb
 - lib/netsuite/records/duration.rb
 - lib/netsuite/records/inventory_item.rb
 - lib/netsuite/records/invoice.rb
@@ -142,12 +161,14 @@ files:
 - lib/netsuite/records/record_ref.rb
 - lib/netsuite/records/ship_address.rb
 - lib/netsuite/response.rb
+- lib/netsuite/support/actions.rb
 - lib/netsuite/support/attributes.rb
 - lib/netsuite/support/fields.rb
 - lib/netsuite/support/record_refs.rb
 - lib/netsuite/support/records.rb
 - lib/netsuite/support/requests.rb
 - lib/netsuite/version.rb
+- lib/netsuite/xml_logger.rb
 - netsuite.gemspec
 - spec/netsuite/actions/add_spec.rb
 - spec/netsuite/actions/get_spec.rb
@@ -166,6 +187,11 @@ files:
 - spec/netsuite/records/customer_addressbook_list_spec.rb
 - spec/netsuite/records/customer_addressbook_spec.rb
 - spec/netsuite/records/customer_payment_spec.rb
+- spec/netsuite/records/customer_refund_apply_list_spec.rb
+- spec/netsuite/records/customer_refund_apply_spec.rb
+- spec/netsuite/records/customer_refund_deposit_list_spec.rb
+- spec/netsuite/records/customer_refund_deposit_spec.rb
+- spec/netsuite/records/customer_refund_spec.rb
 - spec/netsuite/records/customer_spec.rb
 - spec/netsuite/records/duration_spec.rb
 - spec/netsuite/records/inventory_item_spec.rb
@@ -182,6 +208,7 @@ files:
 - spec/netsuite/records/record_ref_spec.rb
 - spec/netsuite/records/ship_address_spec.rb
 - spec/netsuite/response_spec.rb
+- spec/netsuite/support/actions_spec.rb
 - spec/netsuite/support/attributes_spec.rb
 - spec/netsuite/support/fields_spec.rb
 - spec/netsuite/support/record_refs_spec.rb
@@ -253,6 +280,11 @@ test_files:
 - spec/netsuite/records/customer_addressbook_list_spec.rb
 - spec/netsuite/records/customer_addressbook_spec.rb
 - spec/netsuite/records/customer_payment_spec.rb
+- spec/netsuite/records/customer_refund_apply_list_spec.rb
+- spec/netsuite/records/customer_refund_apply_spec.rb
+- spec/netsuite/records/customer_refund_deposit_list_spec.rb
+- spec/netsuite/records/customer_refund_deposit_spec.rb
+- spec/netsuite/records/customer_refund_spec.rb
 - spec/netsuite/records/customer_spec.rb
 - spec/netsuite/records/duration_spec.rb
 - spec/netsuite/records/inventory_item_spec.rb
@@ -269,6 +301,7 @@ test_files:
 - spec/netsuite/records/record_ref_spec.rb
 - spec/netsuite/records/ship_address_spec.rb
 - spec/netsuite/response_spec.rb
+- spec/netsuite/support/actions_spec.rb
 - spec/netsuite/support/attributes_spec.rb
 - spec/netsuite/support/fields_spec.rb
 - spec/netsuite/support/record_refs_spec.rb