module IntacctRB
  class Invoice < IntacctRB::Base
    attr_accessor :customer_data
    define_hook :custom_invoice_fields

    def get_list *fields
      # return false unless object.intacct_system_id.present?

      fields = [
        :customerid,
        :name,
        :termname
      ] if fields.empty?

      send_xml('get_list') do |xml|
        xml.function(controlid: "f4") {
          xml.get_list(object: "invoice", maxitems: "10", showprivate:"false") {
            # xml.fields {
            #   fields.each do |field|
            #     xml.field field.to_s
            #   end
            # }
          }
        }
      end

      if successful?
        @data = []
        @response.xpath('//invoice').each do |invoice|
          @data << Invoice.new({
             id: invoice.at("//customerid").content,
             total: invoice.at("//totalamount").content,
             total_paid: invoice.at("//totalpaid").content,
             termname: invoice.at("//termname").content
           })
        end
        @data
      else
        false
      end
    end

    def create
      return false if object.invoice.intacct_system_id.present?

      # Need to create the customer if one doesn't exist
      intacct_customer = Intacct::Customer.new object.customer
      unless object.customer.intacct_system_id.present?
        unless intacct_customer.create
          raise 'Could not create customer'
        end
      end

      if intacct_customer.get
        object.customer = intacct_customer.object
        @customer_data = intacct_customer.data
      else
        raise 'Could not grab Intacct customer data'
      end

      # Create vendor if we have one and not in Intacct
      if object.vendor and object.vendor.intacct_system_id.blank?
        intacct_vendor = Intacct::Vendor.new object.vendor
        if intacct_vendor.create
          object.vendor = intacct_vendor.object
        else
          raise 'Could not create vendor'
        end
      end

      send_xml('create') do |xml|
        xml.function(controlid: "f1") {
          xml.create_invoice {
            invoice_xml xml
          }
        }
      end

      successful?
    end

    def delete
      return false unless object.invoice.intacct_system_id.present?

      send_xml('delete') do |xml|
        xml.function(controlid: "1") {
          xml.delete_invoice(externalkey: "false", key: object.invoice.intacct_key)
        }
      end

      successful?
    end

    def intacct_object_id
      "#{intacct_invoice_prefix}#{object.invoice.id}"
    end

    def invoice_xml xml
      xml.customerid "#{object.customer.intacct_system_id}"
      xml.datecreated {
        xml.year object.invoice.created_at.strftime("%Y")
        xml.month object.invoice.created_at.strftime("%m")
        xml.day object.invoice.created_at.strftime("%d")
      }

      termname = customer_data.termname
      xml.termname termname.present?? termname : "Net 30"

      xml.invoiceno intacct_object_id
      run_hook :custom_invoice_fields, xml
    end

    def set_intacct_system_id
      object.invoice.intacct_system_id = intacct_object_id
    end

    def delete_intacct_system_id
      object.invoice.intacct_system_id = nil
    end

    def delete_intacct_key
      object.invoice.intacct_key = nil
    end

    def set_date_time type
      if %w(create update delete).include? type
        if object.invoice.respond_to? :"intacct_#{type}d_at"
          object.invoice.send("intacct_#{type}d_at=", DateTime.now)
        end
      end
    end
  end
end