ccls-ccls_engine 3.11.0

data/app/models/context_data_source.rb

@@ -0,0 +1,4 @@
+class ContextDataSource < ActiveRecordShared
+	belongs_to :context
+	belongs_to :data_source
+end

data/app/models/county.rb

@@ -0,0 +1,16 @@
+class County < ActiveRecordShared
+
+	default_scope :order => :name
+	has_many :zip_codes
+
+	validates_presence_of :name
+	validates_length_of   :name,         :maximum => 250
+	validates_presence_of :state_abbrev
+	validates_length_of   :state_abbrev, :maximum => 2
+	validates_length_of   :fips_code,    :maximum => 5, :allow_nil => true
+
+	def to_s
+		"#{name}, #{state_abbrev}"
+	end
+
+end

data/app/models/data_source.rb

@@ -0,0 +1,24 @@
+# don't know exactly
+class DataSource < ActiveRecordShared
+
+	acts_as_list
+	default_scope :order => :position
+
+	acts_like_a_hash
+
+	validates_length_of     :data_origin,
+		:other_organization, :other_person,
+		:maximum => 250, :allow_blank => true
+
+	#	Returns description
+	def to_s
+		description
+	end
+
+	#	Returns boolean of comparison
+	#	true only if key == 'other'
+	def is_other?
+		key == 'other'
+	end
+
+end

data/app/models/diagnosis.rb

@@ -0,0 +1,23 @@
+#	don't know
+class Diagnosis < ActiveRecordShared
+
+	acts_as_list
+	default_scope :order => :position
+
+	acts_like_a_hash
+
+	validates_presence_of   :code
+	validates_uniqueness_of :code
+
+	#	Return description
+	def to_s
+		description
+	end
+
+	#	Returns boolean of comparison
+	#	true only if key == 'other'
+	def is_other?
+		key == 'other'
+	end
+
+end

data/app/models/document_type.rb

@@ -0,0 +1,16 @@
+class DocumentType < ActiveRecordShared
+
+	acts_as_list
+	default_scope :order => :position
+
+	has_many :document_versions
+
+	validates_presence_of :title
+	validates_length_of   :title,       :maximum => 250, :allow_blank => true
+	validates_length_of   :description, :maximum => 250, :allow_blank => true
+
+	def to_s
+		title
+	end
+
+end

data/app/models/document_version.rb

@@ -0,0 +1,27 @@
+class DocumentVersion < ActiveRecordShared
+
+	acts_as_list
+	default_scope :order => 'position, title ASC'
+
+	belongs_to :document_type
+	belongs_to :language
+	has_many :enrollments
+
+	validates_presence_of :document_type_id
+	validates_presence_of :document_type, :if => :document_type_id
+
+	validates_length_of   :title,       :maximum => 250, :allow_blank => true
+	validates_length_of   :description, :maximum => 250, :allow_blank => true
+	validates_length_of   :indicator,   :maximum => 250, :allow_blank => true
+
+	validates_complete_date_for :began_use_on, :allow_nil => true
+	validates_complete_date_for :ended_use_on, :allow_nil => true
+
+	#	Return title
+	def to_s
+		title
+	end
+
+	named_scope :type1, :conditions => { :document_type_id => 1 }
+
+end

data/app/models/enrollment.rb

@@ -0,0 +1,78 @@
+#	Rich join of Subject and Project
+#	==	requires
+#	*	project
+class Enrollment < ActiveRecordShared
+
+	belongs_to :study_subject
+	belongs_to :ineligible_reason
+	belongs_to :refusal_reason
+	belongs_to :document_version
+	belongs_to :project
+	belongs_to :project_outcome
+	belongs_to :tracing_status
+	has_many   :operational_events
+	has_many   :follow_ups
+	has_many   :samples
+
+	attr_protected :study_subject_id, :study_subject
+
+	delegate :is_other?, :to => :ineligible_reason, :allow_nil => true, :prefix => true
+	delegate :is_other?, :to => :refusal_reason,    :allow_nil => true, :prefix => true
+
+	include EnrollmentValidations
+
+	#	use after_save, rather than before_save,
+	#	so that enrollment exists and can be used to create
+	# the operational event as the enrollment is validated
+#	before_save :create_enrollment_update,
+	after_save :create_enrollment_update,
+		:if => :is_complete_changed?
+
+	after_save :create_subject_consents_operational_event,
+		:if => :consented_changed?
+
+	after_save :create_subject_declines_operational_event,
+		:if => :consented_changed?
+
+	named_scope :consented, :conditions => { :consented => YNDK[:yes] }
+
+protected
+
+	def create_enrollment_update
+		operational_event_type, occurred_on = if( is_complete == YNDK[:yes] )
+			[OperationalEventType['complete'], completed_on]
+		elsif( is_complete_was == YNDK[:yes] )
+			[OperationalEventType['reopened'], Date.today]
+		else 
+			[nil, nil]
+		end
+		unless operational_event_type.nil?
+			OperationalEvent.create!(
+				:enrollment => self,
+				:operational_event_type => operational_event_type,
+				:occurred_on => occurred_on
+			)
+		end
+	end
+
+	def create_subject_consents_operational_event
+		if( ( consented == YNDK[:yes] ) and ( consented_was != YNDK[:yes] ) )
+			OperationalEvent.create!(
+				:enrollment => self,
+				:operational_event_type => OperationalEventType['subjectConsents'],
+				:occurred_on            => consented_on
+			)
+		end
+	end
+
+	def create_subject_declines_operational_event
+		if( ( consented == YNDK[:no] ) and ( consented_was != YNDK[:no] ) )
+			OperationalEvent.create!(
+				:enrollment => self,
+				:operational_event_type => OperationalEventType['subjectDeclines'],
+				:occurred_on            => consented_on
+			)
+		end
+	end
+
+end

data/app/models/enrollment_validations.rb

@@ -0,0 +1,167 @@
+#
+#	Simply extracted some code to clean up model.
+#	I'd like to do this to all of the really big classes
+#	but let's see how this goes first.
+#
+module EnrollmentValidations
+def self.included(base)
+#	Must delay the calls to these ActiveRecord methods
+#	or it will raise many "undefined method"s.
+base.class_eval do
+
+	validates_presence_of   :project_id
+	validates_presence_of   :project, :if => :project_id
+	validates_uniqueness_of :project_id, :scope => [:study_subject_id], :allow_blank => true
+
+	validates_length_of :notes, :maximum => 65000, :allow_blank => true
+
+	validates_presence_of :ineligible_reason_id,
+		:message => 'required if is_eligible is No',
+		:if => :is_not_eligible?
+	validates_absence_of :ineligible_reason_id,
+		:message => 'not allowed unless is_eligible is No',
+		:unless => :is_not_eligible?
+	validates_presence_of :ineligible_reason, :if => :ineligible_reason_id
+
+	validates_presence_of :ineligible_reason_specify,
+		:message => 'required if ineligible reason is Other',
+		:if => :ineligible_reason_is_other?
+	validates_absence_of :ineligible_reason_specify,
+		:message => 'not allowed unless is_eligible is No',
+		:unless => :is_not_eligible?
+
+	validates_presence_of :reason_not_chosen,
+		:message => 'requires if is_chosen is No',
+		:if => :is_not_chosen?
+	validates_absence_of :reason_not_chosen,
+		:message => 'not allowed unless is_chosen is No',
+		:unless => :is_not_chosen?
+
+	validates_presence_of :refusal_reason_id,
+		:message => "required if consented is No",
+		:if => :not_consented?
+	validates_absence_of :refusal_reason_id,
+		:message => "not allowed unless consented is No",
+		:unless => :not_consented?
+	validates_presence_of :refusal_reason, :if => :refusal_reason_id
+
+#	validates_presence_of :consented_on,
+#		:message => 'date is required when adding consent information',
+#		:if => :consented?
+	validates_presence_of :consented_on,
+		:message => 'date is required when adding consent information',
+		:unless => :consent_unknown?
+#		:if => :not_consented?
+	validates_absence_of :consented_on,
+		:message => "not allowed if consented is blank or Don't Know",
+		:if => :consent_unknown?
+	validates_past_date_for :consented_on
+
+	validates_presence_of :other_refusal_reason,
+		:message => "required if refusal reason is Other",
+		:if => :refusal_reason_is_other?
+	validates_absence_of :other_refusal_reason,
+		:message => "not allowed unless consented is No",
+		:unless => :not_consented?
+
+	validates_presence_of :terminated_reason,
+		:message => "required if terminated participation is Yes",
+		:if => :terminated_participation?
+	validates_absence_of :terminated_reason,
+		:message => "not allowed unless terminated participation is Yes",
+		:unless => :terminated_participation?
+
+	validates_presence_of :completed_on,
+		:message => "required if is_complete is Yes",
+		:if => :is_complete?
+	validates_absence_of :completed_on,
+		:message => "not allowed unless is_complete is Yes",
+		:unless => :is_complete?
+	validates_past_date_for :completed_on
+
+	validates_absence_of :document_version_id,
+		:message => "not allowed if consented is blank or Don't Know",
+		:if => :consent_unknown?
+	validates_presence_of :document_version, :if => :document_version_id
+	
+	validates_complete_date_for :consented_on, :allow_nil => true
+	validates_complete_date_for :completed_on, :allow_nil => true
+
+	validates_length_of :recruitment_priority,      :maximum => 250, :allow_blank => true
+	validates_length_of :ineligible_reason_specify, :maximum => 250, :allow_blank => true
+	validates_length_of :other_refusal_reason,      :maximum => 250, :allow_blank => true
+	validates_length_of :reason_not_chosen,         :maximum => 250, :allow_blank => true
+	validates_length_of :terminated_reason,         :maximum => 250, :allow_blank => true
+	validates_length_of :reason_closed,             :maximum => 250, :allow_blank => true
+
+
+	validates_inclusion_of :consented, :is_eligible,
+		:is_chosen, :is_complete, :terminated_participation,
+		:is_candidate,
+			:in => YNDK.valid_values, :allow_nil => true
+
+	validates_inclusion_of :use_smp_future_rsrch,
+		:use_smp_future_cancer_rsrch, :use_smp_future_other_rsrch,
+		:share_smp_with_others, :contact_for_related_study,
+		:provide_saliva_smp, :receive_study_findings,
+			:in => ADNA.valid_values, :allow_nil => true
+
+
+#
+#	NOTE: BEWARE of POSSIBLE strings in these comparisons.
+#		Rails SHOULD actually convert the incoming 
+#		params (which are strings) to integers or nil.
+#
+
+	#	Return boolean of comparison
+	#	true only if is_eligible == 2
+	def is_not_eligible?
+#		is_eligible.to_i == YNDK[:no]	#2
+		is_eligible == YNDK[:no]	#2
+	end
+
+	#	Return boolean of comparison
+	#	true only if is_chosen == 2
+	def is_not_chosen?
+#		is_chosen.to_i == YNDK[:no]	#2
+		is_chosen == YNDK[:no]	#2
+	end
+
+	#	Return boolean of comparison
+	#	true only if consented == 1
+#	no longer used, I believe
+#	def consented?
+#		consented == 1
+#	end
+
+	#	Return boolean of comparison
+	#	true only if consented == 2
+	def not_consented?
+#		consented.to_i == YNDK[:no]	#2
+		consented == YNDK[:no]	#2
+	end
+
+	#	Return boolean of comparison
+	#	true only if consented == nil or 999
+	def consent_unknown?
+#		[nil,999,'','999'].include?(consented)	#	not 1 or 2
+		[nil,999].include?(consented)	#	not 1 or 2
+	end
+
+	#	Return boolean of comparison
+	#	true only if terminated_participation == 1
+	def terminated_participation?
+#		terminated_participation.to_i == YNDK[:yes]	#	1
+		terminated_participation == YNDK[:yes]	#	1
+	end
+
+	#	Return boolean of comparison
+	#	true only if is_complete == 1
+	def is_complete?
+#		is_complete.to_i == YNDK[:yes]	#	1
+		is_complete == YNDK[:yes]	#	1
+	end
+
+end	#	class_eval
+end	#	included
+end	#	EnrollmentValidations

data/app/models/follow_up.rb

@@ -0,0 +1,16 @@
+class FollowUp < ActiveRecordShared
+
+#	with these null = false lines,
+#	there should really be validations
+#	or remove these.
+#			t.integer :section_id, :null => false
+#			t.integer :enrollment_id, :null => false
+#			t.integer :follow_up_type_id, :null => false
+
+	belongs_to :section
+	belongs_to :enrollment
+	belongs_to :follow_up_type
+
+	attr_accessor :current_user
+
+end

data/app/models/follow_up_type.rb

@@ -0,0 +1,18 @@
+#	==	requires
+#	*	key ( unique )
+#	*	description ( > 3 chars )
+class FollowUpType < ActiveRecordShared
+
+	acts_as_list
+	default_scope :order => :position
+
+	acts_like_a_hash
+
+	has_many :follow_ups
+
+	#	Returns description
+	def to_s
+		description
+	end
+
+end

data/app/models/gift_card.rb

@@ -0,0 +1,22 @@
+class GiftCard < ActiveRecordShared
+
+	belongs_to :study_subject
+	attr_protected :study_subject_id, :study_subject
+	belongs_to :project
+
+	validates_presence_of   :number
+	validates_length_of     :number,     :maximum => 250, :allow_blank => true
+	validates_uniqueness_of :number
+	validates_length_of     :expiration, :maximum => 250, :allow_blank => true
+	validates_length_of     :vendor,     :maximum => 250, :allow_blank => true
+
+	def to_s
+		number
+	end
+
+#	include GiftCardSearch
+	def self.search(params={})
+		GiftCardSearch.new(params).gift_cards
+	end
+
+end

data/app/models/gift_card_search.rb

@@ -0,0 +1,137 @@
+#module GiftCardSearch
+#def self.included(base)
+##	Must delay the calls to these ActiveRecord methods
+##	or it will raise many "undefined method"s.
+#base.class_eval do
+#
+#	def self.valid_search_orders
+#		{
+#			:id => 'gift_cards.id',
+#			:childid => 'study_subjects.childid',
+#			:last_name => 'study_subjects.last_name',
+#			:first_name => 'study_subjects.first_name',
+#			:studyid => 'study_subjects.patid',
+#			:number => 'gift_cards.number',
+#			:issued_on => 'gift_cards.issued_on'
+#		}.with_indifferent_access
+#	end
+#
+#	def self.search(params={})
+#		params = params.dup.with_indifferent_access
+#		paginate_search = params.has_key?(:paginate) && params[:paginate]
+#		per_page = params[:per_page]
+#		page = params[:page]
+#		q = params.has_key?(:q) && params[:q]
+#		conditions = if q.blank?
+#			nil
+#		else
+#			c = []
+#			v = {}
+#			q.to_s.split(/\s+/).each_with_index do |t,i|
+#				c.push("gift_cards.number LIKE :t#{i}")
+#				c.push("study_subjects.first_name LIKE :t#{i}")
+#				c.push("study_subjects.last_name LIKE :t#{i}")
+#				c.push("study_subjects.patid LIKE :t#{i}")
+#				c.push("study_subjects.childid LIKE :t#{i}")
+#				v["t#{i}".to_sym] = "%#{t}%"
+#			end
+#			[ "( #{c.join(' OR ')} )", v ]
+#		end
+#
+#		order = params.has_key?(:order) && params[:order]
+#		dir = params[:dir]
+#		search_order = if valid_search_orders.has_key?(order)
+#			order_string = valid_search_orders[order]
+#			dir = case dir.try(:downcase)
+#				when 'desc' then 'desc'
+#				else 'asc'
+#			end
+#			[order_string,dir].join(' ')
+#		else
+#			nil
+#		end
+#
+#		GiftCard.send(
+#			(paginate_search)?'paginate':'all',{
+#				:order => search_order,
+#				:joins => "LEFT JOIN study_subjects ON gift_cards.study_subject_id = study_subjects.id",
+#				:conditions => conditions
+#			}.merge(
+#				(paginate_search)?{
+#					:per_page => per_page||25,
+#					:page     => page||1
+#				}:{}
+#			)
+#		)
+#	end
+#
+#end	#	class_eval
+#end	#	included
+#end	#	GiftCardSearch
+#
+#
+#__END__
+
+#	This is only ever used in HomeX which is going to go away.
+
+
+class GiftCardSearch < Search
+
+	self.searchable_attributes += [ :q, :number ]
+
+#	self.valid_orders.merge!({  #	NO!
+#	@valid_orders.merge!({      #	NO!
+	self.valid_orders = self.valid_orders.merge({
+		:id => nil,
+		:childid => 'study_subjects.childid',
+		:last_name => 'study_subjects.last_name',
+		:first_name => 'study_subjects.first_name',
+		:studyid => 'study_subjects.patid',
+		:number => nil,
+		:issued_on => nil
+	})
+
+	def gift_cards
+		@gift_cards ||= GiftCard.send(
+			(paginate?)?'paginate':'all',{
+				:order => search_order,
+				:joins => joins,
+				:conditions => conditions
+			}.merge(
+				(paginate?)?{
+					:per_page => per_page||25,
+					:page     => page||1
+				}:{}
+			)
+		)
+	end
+
+private	#	THIS IS REQUIRED
+
+	def q_conditions
+		unless q.blank?
+			c = []
+			v = {}
+			q.to_s.split(/\s+/).each_with_index do |t,i|
+				c.push("gift_cards.number LIKE :t#{i}")
+				c.push("study_subjects.first_name LIKE :t#{i}")
+				c.push("study_subjects.last_name LIKE :t#{i}")
+				c.push("study_subjects.patid LIKE :t#{i}")
+				c.push("study_subjects.childid LIKE :t#{i}")
+				v["t#{i}".to_sym] = "%#{t}%"
+			end
+			[ "( #{c.join(' OR ')} )", v ]
+		end
+	end
+
+	def study_subjects_joins
+		"LEFT JOIN study_subjects ON gift_cards.study_subject_id = study_subjects.id"
+	end
+
+#	#	must come before other study_subject related joins
+#	def a_subjects_joins
+#		"LEFT JOIN study_subjects ON gift_cards.study_subject_id = study_subjects.id" if(
+#			%w(childid studyid last_name first_name).include?(@order) )
+#	end
+
+end