activenetsuite 0.1.0

data/lib/activenetsuite/core/record_ref.rb

@@ -0,0 +1,35 @@
+module ActiveNetsuite
+
+class RecordRef < BaseRef
+  alias_method :internal_id, :xmlattr_internalId
+  alias_method :internal_id=, :xmlattr_internalId=
+  alias_method :external_id, :xmlattr_externalId
+  alias_method :external_id=, :xmlattr_externalId=
+  alias_method :type, :xmlattr_type
+  alias_method :type=, :xmlattr_type=
+
+  def ==(other)
+    self.type == other.type &&
+      self.internal_id == other.internal_id &&
+      self.external_id == other.external_id
+  end
+
+  def record
+    rec = record_class.new
+    rec.internal_id = internal_id
+    rec.external_id = external_id
+    rec
+  end
+
+  def delete
+    Record.delete([self])
+  end
+
+  private
+
+  def record_class
+    ('::ActiveNetsuite::' + type.camelize).constantize
+  end
+end
+
+end

data/lib/activenetsuite/core/search_record.rb

@@ -0,0 +1,97 @@
+module ActiveNetsuite
+
+class SearchRecord
+  extend Forwardable
+  include Enumerable
+
+  attr_accessor :record_class
+
+  def_delegators :response, :page_index, :page_size, :search_id, :total_pages,
+    :total_records, :has_more?, :next
+
+  def each
+    response.each do |result|
+      yield result if block_given?
+    end
+  end
+
+  def where(*args)
+    dup.send(:add, *args)
+  end
+
+  def find_by(*args)
+    where(*args).first
+  end
+
+  def to_a
+    response.to_a
+  end
+
+  def inactive
+    dup.send(:add, isInactive: true)
+  end
+
+  def active
+    dup.send(:add, isInactive: false)
+  end
+
+  def response
+    @response ||= client.search(self)
+  end
+
+  private
+
+  attr_reader :method, :value, :op
+
+  def client
+    Record.client
+  end
+
+  def add(*args)
+    if args.first.is_a?(Hash)
+      @method, @value = args.first.flatten
+      @op = :is
+    end
+    if args.size == 3
+      @method, @op, @value = args
+    end
+
+    method = record_class.inflected_method(@method)
+    send("#{method}=", search_class.new)
+    unless value == true || value == false
+      send(method).xmlattr_operator = search_operator
+    end
+    send(method).searchValue = value
+
+    self
+  end
+
+  def search_class
+    case value
+    when String
+      SearchStringField
+    when Fixnum
+      SearchLongField
+    when TrueClass, FalseClass
+      SearchBooleanField
+    when Date, DateTime
+      SearchDateField
+    else
+      raise ArgumentError, "Can't find search class for #{value.inspect}"
+    end
+  end
+
+  def search_operator
+    operator_constant_name = op.to_s.camelize
+    operator_class_name = search_class.to_s + "Operator"
+    "#{operator_class_name}::#{operator_constant_name}".constantize
+  end
+
+  def record_class
+    @record_class
+    #"::#{self.class.to_s.gsub(/SearchBasic$/, '')}".constantize
+  end
+end
+
+end
+

data/lib/activenetsuite/core/search_result.rb

@@ -0,0 +1,12 @@
+module ActiveNetsuite
+
+class SearchResult
+  include MethodInflector
+
+  def has_more?
+    page_index < total_pages
+  end
+end
+
+end
+

data/lib/activenetsuite/core/status.rb

@@ -0,0 +1,50 @@
+module ActiveNetsuite
+
+class Status
+  DUP_ITEM = 'DUP_ITEM'
+  DUP_RCRD = 'DUP_RCRD'
+  DUP_ENTITY = 'DUP_ENTITY'
+  DUP_VENDOR_NAME = 'DUP_VENDOR_NAME'
+  RCRD_TYPE_REQD = 'RCRD_TYPE_REQD'
+  USER_ERROR = 'USER_ERROR'
+  MAX_RCRDS_EXCEEDED = 'MAX_RCRDS_EXCEEDED'
+  INVALID_INTERNALID = 'INVALID_INTERNALID'
+  INVALID_FLD_VALUE = 'INVALID_FLD_VALUE'
+
+  def success?
+    xmlattr_isSuccess
+  end
+
+  def failure?
+    !success?
+  end
+
+  def code
+    status_detail.code if status_detail
+  end
+
+  def message
+    status_detail.message if status_detail
+  end
+
+  constants.each do |constant|
+    name = (constant.to_s.underscore + '?').to_sym
+    value = const_get(constant)
+    next unless value.is_a?(String)
+    define_method name do
+      code == value
+    end
+  end
+
+  def duplicate?
+    dup_item? || dup_rcrd? || dup_entity? || dup_vendor_name?
+  end
+
+  private
+
+  def status_detail
+    statusDetail[0] if statusDetail
+  end
+end
+
+end

data/lib/activenetsuite/helpers/client.rb

@@ -0,0 +1,135 @@
+require 'logger'
+require 'net/http'
+require 'net/https'
+require 'soap/header/simplehandler'
+
+module ActiveNetsuite
+
+class Client
+  attr_reader :driver
+
+  class ActiveNetsuiteHeader < SOAP::Header::SimpleHandler
+    def initialize(prefs = {})
+      @prefs = self.class::DefaultPrefs.merge(prefs)
+      super(XSD::QName.new(nil, self.class::Name))
+    end
+
+    def on_simple_outbound
+      @prefs
+    end
+  end
+
+  class SearchPreferencesHeaderHandler < ActiveNetsuiteHeader
+    Name = 'searchPreferences'
+    DefaultPrefs = {:bodyFieldsOnly => false, :pageSize => 25}
+  end
+
+  class PreferencesHeaderHandler < ActiveNetsuiteHeader
+    Name = 'preferences'
+    DefaultPrefs = {:warningAsError => false, :ignoreReadOnlyFields => true}
+  end
+
+  class PassportHeaderHandler < ActiveNetsuiteHeader
+    Name = 'passport'
+    DefaultPrefs = {:account => '', :email => '', :password => ''}
+  end
+
+  def logger
+    @logger ||= Logger.new(STDOUT)
+  end
+
+  def initialize(config = {})
+    @driver = ActiveNetsuitePortType.new(config[:endpoint_url] ||
+                                   ActiveNetsuitePortType::DefaultEndpointUrl)
+
+    if config[:role]
+      role = {:xmlattr_internalId => config[:role]}
+    end
+
+    @driver.headerhandler.add(PassportHeaderHandler.new(
+      email: config[:email],
+      password: config[:password],
+      account: config[:account_id],
+      role: role
+    ))
+    @driver.headerhandler.add(PreferencesHeaderHandler.new)
+    @driver.headerhandler.add(SearchPreferencesHeaderHandler.new)
+  end
+
+  def debug=(debug)
+    @driver.wiredump_dev = ($stderr if debug)
+  end
+
+  # Low level commands
+  def get(ref)
+    @driver.get(GetRequest.new(ref))
+  end
+
+  def get_all(refs)
+    @driver.getList(GetListRequest.new(refs))
+  end
+
+  def get_all_records(record_type)
+    ref = GetAllRecord.new
+    ref.xmlattr_recordType = record_type
+    get_all(ref)
+  end
+
+  def get_all(ref)
+    @driver.getAll(GetAllRequest.new(ref))
+  end
+
+  def add(record)
+    @driver.add(AddRequest.new(record))
+  end
+
+  def add_list(list)
+    @driver.addList(AddListRequest.new(list))
+  end
+
+  def update(record)
+    @driver.update(UpdateRequest.new(record))
+  end
+
+  def update_list(recs)
+    @driver.updateList(UpdateListRequest.new(recs))
+  end
+
+  def upsert(record)
+    @driver.upsert(UpsertRequest.new(record))
+  end
+
+  def upsert_list(refs)
+    @driver.upsertList(UpsertListRequest.new(refs))
+  end
+
+  def delete(ref)
+    @driver.delete(DeleteRequest.new(ref))
+  end
+
+  def delete_list(refs)
+    @driver.deleteList(DeleteListRequest.new(refs))
+  end
+
+  def search(search_record)
+    @driver.search(SearchRequest.new(search_record))
+  end
+
+  def search_next(search_response, page_index = search.page_index + 1)
+    @driver.searchMoreWithId(
+      searchId: search_response.search_id,
+      pageIndex: page_index
+    )
+  end
+
+  def search_all(search_record)
+    search(search_record) +
+      (@res.searchResult.totalPages-1).times.map { |page_index| search_next }
+  end
+
+  def get_deleted(get_deleted_filter)
+    @driver.getDeleted(GetDeletedRequest.new(get_deleted_filter))
+  end
+end
+
+end

data/lib/activenetsuite/helpers/error.rb

@@ -0,0 +1,7 @@
+module ActiveNetsuite
+
+class NotFoundError < StandardError
+end
+
+end
+

data/lib/activenetsuite/helpers/method_inflector.rb

@@ -0,0 +1,78 @@
+module ActiveNetsuite
+
+module MethodInflector
+  def method_missing(method, *args, &block)
+    if self.class.inflected_method_valid?(method)
+      send self.class.inflected_method(method), *args, &block
+    else
+      super
+    end
+  end
+
+  def self.included(base)
+    base.extend(ClassMethods)
+  end
+
+  module ClassMethods
+    def inflected_method(method)
+      @method = method
+
+      case
+      when xmlattr_method?
+        convert_xmlattr_method
+      when special_method?
+        convert_special_method
+      else
+        convert_regular_method
+      end
+      remove_instance_variable(:@method)
+    end
+
+    def inflected_method_valid?(method)
+      instance_methods(false).include?(inflected_method(method))
+    end
+
+    private
+
+    def convert_regular_method
+      @method = 'is_' + @method.to_s[0..-2] if @method.to_s.end_with?('?')
+      @method = @method.to_s.camelize(:lower).to_sym
+    end
+
+    def convert_xmlattr_method
+      @method = ('xmlattr_' + @method.to_s.camelize(:lower)).to_sym
+    end
+
+    def convert_special_method
+      @method = special_methods_map[@method]
+    end
+
+    def special_methods_map
+      {
+        custom_fields: :customFieldList
+      }
+    end
+
+    def special_method?
+      special_methods_map.keys.include?(@method)
+    end
+
+    def xmlattr_method?
+      xmlattr_methods.include?(@method)
+    end
+
+    def xmlattr_methods
+      xmlattr_getters + xmlattr_setters
+    end
+
+    def xmlattr_getters
+      %i(internal_id external_id script_id)
+    end
+
+    def xmlattr_setters
+      xmlattr_getters.map { |getter| (getter.to_s + '=').to_sym }
+    end
+  end
+end
+
+end

data/lib/activenetsuite/helpers/response_methods.rb

@@ -0,0 +1,21 @@
+module ActiveNetsuite
+
+module ResponseMethods
+  extend Forwardable
+
+  def res
+    writeResponse
+  end
+
+  def_delegators :res, :status, :ref
+
+  def_delegators :status,
+    :success?, :failure?, :code, :message, :dup_item?, :dup_rcrd?,
+    :dup_entity?, :dup_vendor_name?, :rcrd_type_reqd?, :user_error?,
+    :duplicate?
+
+  def_delegators :ref, :internal_id, :external_id, :type
+end
+
+end
+