medivo 0.0.1

data/app/assets/javascripts/medivo/map.coffee

@@ -0,0 +1,59 @@
+class window.MapView
+  constructor: (@collection, @center_point)->
+    throw "you need a collection to make a MapView" unless @collection
+
+  el: $('#map_canvas')
+  center_point: null
+  center_marker: null
+  view: null
+  markerBounds: new google.maps.LatLngBounds()
+  markerBoundsZoomOut: 0.1
+
+  options: {
+    mapTypeId: google.maps.MapTypeId.ROADMAP
+    mapTypeControl: false
+  }
+
+  prepareMap: ->
+    if !this.view
+      this.view = new google.maps.Map(document.getElementById("map_canvas"), this.options)
+
+  createCenterMarker: ->
+    if this.center_point
+      point = new google.maps.LatLng(this.center_point.lat, this.center_point.lng)
+      this.center_marker = new google.maps.Marker({
+        position: point,
+        map: this.view,
+        title: this.center_point.title
+        icon: "/assets/medivo/arrow.png"
+      })
+    this.markerBounds.extend(this.center_marker.position) if this.markerBounds and this.center_marker
+
+  setMarkers: (map, markerBounds) ->
+    $.each( @collection.labs, (index, model)-> model.setMarker(map, markerBounds) )
+
+  clear: ->
+    this.collection.clearMarkers()
+    if this.center_marker
+      this.center_marker.setMap(null)
+      this.center_marker = null
+    this.markerBounds = new google.maps.LatLngBounds()
+
+  render: ->
+    this.clear()
+    this.prepareMap()
+    this.createCenterMarker()
+    this.setMarkers(this.view, this.markerBounds)
+
+    # extend the bounds if its too small
+    if (this.markerBounds.getNorthEast().equals(this.markerBounds.getSouthWest()))
+      extendPoint = new google.maps.LatLng(
+        this.markerBounds.getNorthEast().lat() + this.markerBoundsZoomOut,
+        this.markerBounds.getNorthEast().lng() + this.markerBoundsZoomOut
+      )
+      this.markerBounds.extend(extendPoint)
+    this.view.fitBounds(this.markerBounds)
+
+
+
+

data/app/assets/javascripts/medivo/models.coffee

@@ -0,0 +1,37 @@
+class window.Lab
+  constructor: (@data)->
+  marker: null
+  map_tooltip_template: Handlebars.compile("{{name}}\n{{address}}\n{{city}},{{state}} ")
+
+  clearMarker: ->
+    if this.marker
+      this.marker.setMap(null)
+      this.marker = null
+
+  setMarker: (map, markerBounds)->
+    this.point = new google.maps.LatLng(@data.lat, @data.lng)
+    this.marker = this.makeMarker(map)
+    if markerBounds
+      markerBounds.extend(this.point)
+
+  makeMarker: (map)->
+    new google.maps.Marker({
+      position: this.point
+      map: map
+      title: this.map_tooltip_template(@data)
+      icon: this.makeIcon()
+    })
+
+  makeIcon: ->
+    new google.maps.MarkerImage("/assets/medivo/lab.png")
+
+
+class window.LabList
+
+  constructor: (@data)->
+    labs = @labs = []
+    $.each( @data, (index, lab_data)->
+      labs.push(new Lab(lab_data))
+    )
+
+  clearMarkers: -> $.each( @labs, (index, lab)-> lab.clearMarker() )

data/app/assets/javascripts/medivo/show_labs.coffee

@@ -0,0 +1,10 @@
+$(document).ready ->
+  data = $('#lab_list_container').data('labs')
+  if data
+    lab_list = new window.LabList( data.labs )
+    map_view = new window.MapView( lab_list, data.zip_location )
+    map_view.render()
+  else
+   console.log('no data')
+#    zip_code = $('input#zip_code').val()
+#    Labs.find(zip_code)

data/app/assets/stylesheets/medivo/application.css

@@ -0,0 +1,7 @@
+/*
+ * This is a manifest file that'll automatically include all the stylesheets available in this directory
+ * and any sub-directories. You're free to add application-wide styles to this file and they'll appear at
+ * the top of the compiled file, but it's generally better to create a new file per style scope.
+ *= require_self
+ *= require_tree . 
+*/

data/app/controllers/medivo/application_controller.rb

@@ -0,0 +1,4 @@
+module Medivo
+  class ApplicationController < ActionController::Base
+  end
+end

data/app/controllers/medivo/labs_controller.rb

@@ -0,0 +1,8 @@
+module Medivo
+  class LabsController < ActionController::Base
+    def data
+      lab_data = Medivo::Lab.data_for_zip(params[:zip_code])
+      render :json=> lab_data, :layout => nil
+    end
+  end
+end

data/app/models/medivo/insurance_order.rb

@@ -0,0 +1,39 @@
+require_relative 'resource'
+
+module Medivo
+
+  class PrimaryInsurance
+    include ActiveModel::Validations
+
+    validates_presence_of :relationship, :company_name, :policy_number, :group_number
+
+    def initialize(attributes = {})
+      @attributes = attributes
+    end
+
+    def read_attribute_for_validation(key)
+      @attributes[key]
+    end
+
+    def validate(record)
+      primary_insurance = record.attributes[:primary_insurance]
+      record.errors.add(:primary_insurance, "primary_insurance field must be present") and return unless primary_insurance
+      record.errors.add(:primary_insurance, "primary_insurance field must be of PrimaryInsurance class") unless primary_insurance.is_a? PrimaryInsurance
+      primary_insurance.valid?
+      record.errors.add(:'primary_insurance.relationship', "primary_insurance relationship field must be the value 1") unless primary_insurance.read_attribute_for_validation(:relationship) == 1
+      for field in %w(company_name policy_number group_number)
+        record.errors.add(:"primary_insurance.#{field}", "primary_insurance #{field} must be present") unless primary_insurance.read_attribute_for_validation(field)
+      end
+    end
+  end
+
+  class InsuranceOrder < Order
+    validates_with Medivo::ArrayValidator, :fields => [:diagnosis_code]
+    validates_with PrimaryInsurance
+
+    # when getting the insurance info from medivo labs
+    def insurance
+      @insurance ||= try(:insurance_information).try(:primary_insurance_info)
+    end
+  end
+end

data/app/models/medivo/lab.rb

@@ -0,0 +1,33 @@
+require_relative 'resource'
+
+module Medivo
+  class Lab < Resource
+    LAB_CORP_ID = 129
+    QUEST_ID = 119
+    LAB_CORP_NAME = :lab_corp
+    QUEST_NAME = :quest
+    LAB_ID_TO_NAME = {LAB_CORP_ID => LAB_CORP_NAME, QUEST_ID => QUEST_NAME}
+    LAB_ID_TO_SHORT_NAME = {LAB_CORP_ID => 'LC', QUEST_ID => 'QD'}
+    LAB_ID_TO_PRETTY_NAME = {LAB_CORP_ID => 'Lab Corp', QUEST_ID => 'Quest Diagnostics'}
+
+    def self.findLabs(zip_code, radius = 15)
+      find(:all, :from => "/find_psc/#{zip_code}", :params=>{:radius=>radius}).sort_by(&:distance)
+    end
+
+    def self.data_for_zip(zip='')
+      zip = zip.to_s.match(/(\d{5})/) ? $1 : nil
+      return {} unless zip and zip_info = ZipCode.find_by_zip_code(zip)
+      labs = findLabs(zip)[0..1]
+      {:labs => labs, :zip_location => zip_info.center_info}
+    end
+
+    def lab_name
+      LAB_ID_TO_PRETTY_NAME[lab_id]
+    end
+
+
+    def as_json(options={})
+      attributes.merge(:lab_name => self.lab_name)
+    end
+  end
+end

data/app/models/medivo/order.rb

@@ -0,0 +1,61 @@
+require_relative 'resource'
+
+module Medivo
+  class Order < Resource
+    set_element_name 'customer'
+    set_collection_name 'customers'
+
+    validates_presence_of :email, :address, :zip, :dob, :home_phone, :psc,
+                          :test_types, :gender, :account_number
+    validates_inclusion_of :gender, :in => %w(Male Female)
+    validates_with Medivo::DateValidator, :fields=>[:dob]
+    validates_with Medivo::ArrayValidator, :fields=>[:test_types]
+
+    def read_attribute_for_validation(key)
+       @attributes[key]
+    end
+
+    def initialize(attributes = {}, persisted = false)
+      super(attributes, persisted)
+      self.draw_location = 'PSC'
+      self.take_tests_same_day = true
+    end
+
+    def to_param
+      requisition_id
+    end
+
+    def requisition_id
+      requisition_number
+    end
+
+    def self.get_order(requsition_id)
+      find(requsition_id)
+    end
+
+    #  medivo_order = create(values)
+    #  unless medivo_order.valid?
+    #    Rails.logger.error("Error creating Medivo Lab order")
+    #    Rails.logger.error(medivo_order.inspect)
+    #    raise "Errors in Medivo Lab order #{medivo_order.errors.messages}"
+    #  end
+    #  medivo_order
+    #end
+
+    def results
+      @results ||= Array.wrap(try(:reconciled_results).try(:result))
+    end
+
+    def simulate_result(lab_prefix, type='normal')
+      raise "Incorrect Result Type" unless %w(normal false_positive positive).include?(type) and %w(qd lc).include?(lab_prefix)
+      body = case type
+        when 'normal' then
+          "<mock><simulate>result</simulate><result kind='#{type}' complete='complete'></result></mock>"
+        when 'false_positive', 'positive' then
+          "<mock><simulate>result</simulate><result><hl7>#{Base64.encode64(File.read("lib/pdfs/#{lab_prefix}_#{type}.hl7"))}</hl7></result></mock>"
+      end
+
+      post(:mock_order, {}, body)
+    end
+  end
+end

data/app/models/medivo/resource.rb

@@ -0,0 +1,24 @@
+require 'yaml'
+require 'ostruct'
+require 'active_resource'
+
+module Medivo
+  class Locator
+    def self.find
+      return @location if @location
+      config_file = File.join(Rails.root.join('config', 'medivo.yml'))
+      config = YAML.load_file(config_file)
+      @location = OpenStruct.new config[Rails.env]
+    end
+  end
+
+  class Resource < ActiveResource::Base
+    location = Locator.find
+    self.include_root_in_json = false
+    self.site = location.href
+    self.user = location.user
+    self.password = location.password
+    self.format = :xml
+  end
+end
+

data/app/models/medivo/zip_code.rb

@@ -0,0 +1,10 @@
+module Medivo
+  class ZipCode < ActiveRecord::Base
+    ActiveRecord::Base.establish_connection({:adapter=>'sqlite3', :database=>"#{Medivo::Engine.config.root}/db/zip_codes.sqlite3"})
+    self.table_name = :zip_codes
+
+    def center_info
+      {:title=> "#{city}, #{state_short}, #{zip_code}", :lat=>lat, lng: lng}
+    end
+  end
+end

data/app/views/layouts/medivo/application.html.erb

@@ -0,0 +1,14 @@
+<!DOCTYPE html>
+<html>
+<head>
+  <title>Medivo</title>
+  <%= stylesheet_link_tag    "medivo/application" %>
+  <%= javascript_include_tag "medivo/application" %>
+  <%= csrf_meta_tags %>
+</head>
+<body>
+
+<%= yield %>
+
+</body>
+</html>

data/config/routes.rb

@@ -0,0 +1,3 @@
+Medivo::Engine.routes.draw do
+  match '/labs/data/:zip_code' => "labs#data", :via => :get, :as=>:data_labs
+end

data/lib/generators/medivo/install/install_generator.rb

@@ -0,0 +1,42 @@
+module Medivo
+  module Generators #:nodoc:
+    class InstallGenerator < Rails::Generators::Base #:nodoc:
+      source_root File.expand_path('../templates', __FILE__)
+
+
+      def database_file
+        copy_file "medivo.yml", "config/medivo.yml"
+      end
+
+      def test_helper
+        if rspec?
+          inject_into_file("spec/spec_helper.rb", :after => "Rspec.configure do |config|\n") do
+            "  # Reset the Machinist cache before each spec.\n" +
+            "  config.before(:each) { Machinist.reset_before_test }\n\n"
+          end
+        else
+          inject_into_file("test/test_helper.rb", :after => "require 'rails/test_help'\n") do
+            "require File.expand_path(File.dirname(__FILE__) + '/blueprints')\n"
+          end
+          inject_into_class("test/test_helper.rb", ActiveSupport::TestCase) do
+            "  # Reset the Machinist cache before each test.\n" +
+            "  setup { Machinist.reset_before_test }\n\n"
+          end
+        end
+      end
+
+      def cucumber_support
+        if options[:cucumber]
+          template "machinist.rb.erb", "features/support/machinist.rb"
+        end
+      end
+
+    private
+
+      def rspec?
+        options[:test_framework].to_sym == :rspec
+      end
+
+    end
+  end
+end

data/lib/medivo.rb

@@ -0,0 +1,6 @@
+require "medivo/engine"
+require "medivo/validators"
+
+require 'jquery-rails'
+require 'coffee-script'
+require 'haml-rails'

data/lib/medivo/engine.rb

@@ -0,0 +1,5 @@
+module Medivo
+  class Engine < Rails::Engine
+    isolate_namespace Medivo
+  end
+end

data/lib/medivo/validators.rb

@@ -0,0 +1,20 @@
+module Medivo
+  class ArrayValidator < ActiveModel::Validator
+    def validate(record)
+      for field in options[:fields]
+        value = record.attributes[field]
+        record.errors.add(field, "#{field} must be an array") unless value.is_a? Array
+      end
+    end
+  end
+
+  class DateValidator < ActiveModel::Validator
+    def validate(record)
+      for field in options[:fields]
+        value = record.attributes[field]
+        date = Date.strptime(value, '%Y%m%d') rescue nil
+        record.errors.add(field, "invalid #{field}. needs to be in '%Y%m%d' format") unless date
+      end
+    end
+  end
+end

data/lib/medivo/version.rb

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

data/lib/tasks/load_zips.thor

@@ -0,0 +1,16 @@
+class Zips < Thor
+
+  desc 'load [full path to zip_code file]', "Load geonames zips with lat longs into Redis"
+  def load(zip_code_file=nil)
+    require './config/environment'
+    raise "Can't find that zip code file '#{zip_code_file}'" unless File.exist? zip_code_file
+
+    ZipCode.connection.execute "TRUNCATE `zip_codes`"
+     st = ZipCode.connection.raw_connection.prepare "INSERT IGNORE INTO `zip_codes` (`zip_code`, `city`, `state_short`, `lat`, `lng`) VALUES (?, ?, ?, ?, ?)"
+     File.readlines(zip_code_file).each_with_index do |line|
+      data = line.force_encoding("UTF-8").split("\t")
+      st.execute(data[1],data[2],data[4], data[9], data[10])
+    end
+    st.close
+  end
+end

data/lib/tasks/medivo_tasks.rake

@@ -0,0 +1,4 @@
+# desc "Explaining what the task does"
+# task :medivo do
+#   # Task goes here
+# end