ccls-ccls_engine 3.11.0

data/test/unit/ccls/study_subject_interviews_test.rb

@@ -0,0 +1,26 @@
+require 'test_helper'
+
+class Ccls::StudySubjectInterviewsTest < ActiveSupport::TestCase
+
+	test "should NOT destroy interviews with study_subject" do
+		assert_difference('StudySubject.count',1) {
+		assert_difference('Interview.count',1) {
+			@study_subject = Factory(:interview).study_subject
+		} }
+		assert_difference('StudySubject.count',-1) {
+		assert_difference('Interview.count',0) {
+			@study_subject.destroy
+		} }
+	end
+
+	test "should not have hx_interview" do
+		study_subject = create_study_subject
+		assert_nil study_subject.hx_interview
+	end
+
+	test "should have hx_interview" do
+		study_subject = create_hx_interview_study_subject
+		assert_not_nil study_subject.hx_interview
+	end
+
+end

data/test/unit/ccls/study_subject_languages_test.rb

@@ -0,0 +1,142 @@
+require 'test_helper'
+
+#	This is just a collection of language related tests 
+#	for StudySubject separated only for clarity due
+#	to the size of the StudySubjectTest class.
+class Ccls::StudySubjectLanguagesTest < ActiveSupport::TestCase
+
+	test "should create study_subject with language" do
+		assert_difference( 'Language.count', 1 ){
+		assert_difference( 'SubjectLanguage.count', 1 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			study_subject = create_study_subject
+			study_subject.languages << Factory(:language)
+			assert !study_subject.new_record?, 
+				"#{study_subject.errors.full_messages.to_sentence}"
+		} } }
+	end
+
+	test "should NOT destroy languages with study_subject" do
+		assert_difference('StudySubject.count',1) {
+		assert_difference('SubjectLanguage.count',1) {
+			@study_subject = Factory(:subject_language).study_subject
+		} }
+		assert_difference('StudySubject.count',-1) {
+		assert_difference('SubjectLanguage.count',0) {
+			@study_subject.destroy
+		} }
+	end
+
+	test "should NOT destroy subject_languages with study_subject" do
+		assert_difference('StudySubject.count',1) {
+		assert_difference('SubjectLanguage.count',1) {
+			@study_subject = Factory(:subject_language).study_subject
+		} }
+		assert_difference('StudySubject.count',-1) {
+		assert_difference('SubjectLanguage.count',0) {
+			@study_subject.destroy
+		} }
+	end
+
+#	add similar for languages?
+#	test "should return race name for string" do
+#		study_subject = create_study_subject
+#		assert_equal study_subject.race_names,
+#			"#{study_subject.races.first}"
+#	end 
+
+	test "should create study_subject with empty subject_languages_attributes" do
+		assert_difference( 'SubjectLanguage.count', 0 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_languages_attributes => { })
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert @study_subject.languages.empty?
+		assert @study_subject.subject_languages.empty?
+	end
+
+	test "should create study_subject with blank language_id" do
+		assert_difference( 'SubjectLanguage.count', 0 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_languages_attributes => { 
+				'0' => { :language_id => '' }
+			})
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert @study_subject.languages.empty?
+		assert @study_subject.subject_languages.empty?
+	end
+
+	test "should create study_subject with subject_languages_attributes language_id" do
+		assert Language.count > 0
+		assert_difference( 'SubjectLanguage.count', 1 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_languages_attributes => {
+				'0' => { :language_id => Language.first.id }
+			})
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert !@study_subject.languages.empty?
+		assert_equal 1, @study_subject.languages.length
+		assert !@study_subject.subject_languages.empty?
+		assert_equal 1, @study_subject.subject_languages.length
+	end
+
+	test "should create study_subject with subject_languages_attributes multiple languages" do
+		assert Language.count > 1
+		languages = Language.all
+		assert_difference( 'SubjectLanguage.count', 2 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_languages_attributes => {
+				'0' => { :language_id => languages[0].id },
+				'1' => { :language_id => languages[1].id }
+			})
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert !@study_subject.languages.empty?
+		assert_equal 2, @study_subject.languages.length
+		assert !@study_subject.subject_languages.empty?
+		assert_equal 2, @study_subject.subject_languages.length
+	end
+
+	test "should NOT create study_subject with subject_languages_attributes " <<
+			"if language is other and no other given" do
+		assert Language.count > 0
+		assert_difference( 'SubjectLanguage.count', 0 ){
+		assert_difference( "StudySubject.count", 0 ) {
+			@study_subject = create_study_subject(:subject_languages_attributes => {
+				'0' => { :language_id => Language['other'].id }
+			})
+			assert @study_subject.errors.on_attr_and_type?("subject_languages.other",:blank)
+		} }
+	end
+
+	test "should update study_subject with subject_languages_attributes" do
+		study_subject = create_study_subject
+		assert_difference( 'SubjectLanguage.count', 1 ){
+			study_subject.update_attributes(:subject_languages_attributes => {
+				'0' => { :language_id => Language.first.id }
+			})
+		}
+	end
+
+	test "should destroy subject_language on update with _destroy" do
+		study_subject = create_study_subject
+		assert_difference( 'SubjectLanguage.count', 1 ){
+			study_subject.update_attributes(:subject_languages_attributes => {
+				'0' => { :language_id => Language.first.id }
+			})
+		}
+		subject_language = study_subject.subject_languages.first
+		assert_difference( 'SubjectLanguage.count', -1 ){
+			study_subject.update_attributes(:subject_languages_attributes => {
+				'0' => { :id => subject_language.id, :_destroy => 1 }
+			})
+		}
+	end
+
+end

data/test/unit/ccls/study_subject_operational_events_test.rb

@@ -0,0 +1,53 @@
+require 'test_helper'
+
+#	This is just a collection of race related tests 
+#	for StudySubject separated only for clarity due
+#	to the size of the StudySubjectTest class.
+class Ccls::StudySubjectOperationalEventsTest < ActiveSupport::TestCase
+
+	test "should create newSubject operational event on creation" do
+		study_subject = nil
+		assert_difference('OperationalEventType.count',0) {	#	make sure it didn't create it
+		assert_difference('OperationalEvent.count',1) {
+		assert_difference('StudySubject.count',1) {
+			study_subject = Factory(:study_subject)
+		} } }
+		ccls_enrollment = study_subject.enrollments.find_by_project_id(Project['ccls'].id)
+		assert_not_nil ccls_enrollment
+		assert_not_nil ccls_enrollment.operational_events.find_by_operational_event_type_id(
+			OperationalEventType['newSubject'].id )
+	end
+
+	test "should create subjectDied operational event when vital status changed to deceased" do
+		study_subject = Factory(:study_subject).reload
+		assert_not_nil study_subject.vital_status
+		assert_difference('OperationalEventType.count',0) {	#	make sure it didn't create it
+		assert_difference('OperationalEvent.count',1) {
+			study_subject.update_attributes(:vital_status_id => VitalStatus['deceased'].id)
+		} }
+		assert_equal study_subject.reload.vital_status, VitalStatus['deceased']
+		ccls_enrollment = study_subject.enrollments.find_by_project_id(Project['ccls'].id)
+		assert_not_nil ccls_enrollment
+		assert_not_nil ccls_enrollment.operational_events.find_by_operational_event_type_id(
+			OperationalEventType['subjectDied'].id )
+	end
+
+	test "should return nil for subject's screener_complete_date_for_open_project" <<
+			" when subject has no associated operational event type" do
+		study_subject = Factory(:study_subject)
+		assert_nil study_subject.screener_complete_date_for_open_project
+	end
+
+	test "should return date for subject's screener_complete_date_for_open_project" <<
+			" when subject has associated operational event type" do
+		study_subject = Factory(:study_subject)
+		assert_nil study_subject.screener_complete_date_for_open_project
+		ccls_enrollment = study_subject.enrollments.find_by_project_id(Project['ccls'].id)
+		ccls_enrollment.operational_events.create(
+			:operational_event_type_id => OperationalEventType['screener_complete'].id,
+			:occurred_on => Date.today)
+		date = study_subject.screener_complete_date_for_open_project
+		assert_equal date, Date.today
+	end
+
+end

data/test/unit/ccls/study_subject_patient_test.rb

@@ -0,0 +1,249 @@
+require 'test_helper'
+
+#	This is just a collection of patient related tests 
+#	for StudySubject separated only for clarity due
+#	to the size of the StudySubjectTest class.
+class Ccls::StudySubjectPatientTest < ActiveSupport::TestCase
+
+	%w( admit_date organization 
+			organization_id hospital_no
+		).each do |method_name|
+
+		test "should respond to #{method_name}" do
+			study_subject = create_study_subject
+			assert study_subject.respond_to?(method_name)
+		end
+
+	end
+
+#	test "set organization for complete case study subject factory test" do
+#		#	Factory only does a merge, NOT a deep_merge, so this won' work
+#		s = Factory(:complete_case_study_subject,
+#			:patient_attributes => { :organization_id => Hospital.last.organization_id } )
+#		assert Hospital.first != Hospital.last
+#		assert_equal s.organization_id, Hospital.last.organization_id
+#	end
+
+	test "should create case study_subject and accept_nested_attributes_for patient" do
+		assert_difference( 'Patient.count', 1) {
+		assert_difference( "StudySubject.count", 1 ) {
+			study_subject = Factory(:case_study_subject,
+				:patient_attributes => Factory.attributes_for(:patient))
+			assert  study_subject.is_case?
+			assert !study_subject.new_record?, 
+				"#{study_subject.errors.full_messages.to_sentence}"
+		} }
+	end
+
+	test "should NOT create non-case study_subject with patient" do
+		assert_difference( 'Patient.count', 0) {
+		assert_difference( "StudySubject.count", 0 ) {
+			study_subject = create_study_subject(
+				:patient_attributes => Factory.attributes_for(:patient))
+			assert !study_subject.is_case?
+			assert study_subject.errors.on(:patient)	#	no type
+			assert  study_subject.new_record?, 
+				"#{study_subject.errors.full_messages.to_sentence}"
+		} }
+	end
+
+	test "should create patient for case study_subject" do
+		assert_difference( 'Patient.count', 1) {
+		assert_difference( "StudySubject.count", 1 ) {
+			study_subject = Factory(:case_study_subject)
+			assert study_subject.is_case?
+			assert !study_subject.new_record?, 
+				"#{study_subject.errors.full_messages.to_sentence}"
+			patient = Factory(:patient, :study_subject => study_subject)
+			assert !patient.new_record?, 
+				"#{patient.errors.full_messages.to_sentence}"
+		} }
+	end
+
+	test "should NOT create patient for non-case study_subject" do
+		assert_difference( 'Patient.count', 0) {
+		assert_difference( "StudySubject.count", 1 ) {
+			study_subject = create_study_subject
+			assert !study_subject.is_case?
+			assert !study_subject.new_record?, 
+				"#{study_subject.errors.full_messages.to_sentence}"
+			patient = Factory.build(:patient, :study_subject => study_subject)
+			patient.save	#	avoid an exception being raised
+			assert patient.errors.on(:study_subject)
+		} }
+	end
+
+	test "should NOT create study_subject with empty patient" do
+		assert_difference( 'Patient.count', 0) {
+		assert_difference( "StudySubject.count", 0 ) {
+			study_subject = create_study_subject( :patient_attributes => {})
+			assert study_subject.errors.on('patient.diagnosis_id')
+			assert study_subject.errors.on_attr_and_type?('patient.diagnosis_id',:blank)
+			assert study_subject.errors.on('patient.hospital_no')
+			assert study_subject.errors.on_attr_and_type?('patient.hospital_no',:blank)
+			assert study_subject.errors.on('patient.admit_date')
+			assert study_subject.errors.on_attr_and_type?('patient.admit_date',:blank)
+			assert study_subject.errors.on('patient.organization_id')
+			assert study_subject.errors.on_attr_and_type?('patient.organization_id',:blank)
+		} }
+	end
+
+	test "should NOT destroy patient with study_subject" do
+		assert_difference('StudySubject.count',1) {
+		assert_difference('Patient.count',1) {
+			@study_subject = Factory(:patient).study_subject
+		} }
+		assert_difference('StudySubject.count',-1) {
+		assert_difference('Patient.count',0) {
+			@study_subject.destroy
+		} }
+	end
+
+	#	Delegated patient fields
+	%w( admit_date organization 
+			organization_id hospital_no
+		).each do |method_name|
+
+		test "should return nil #{method_name} without patient" do
+			study_subject = create_study_subject
+			assert_nil study_subject.send(method_name)
+		end
+
+		test "should return #{method_name} with patient" do
+			study_subject = create_study_subject(
+				:patient_attributes => Factory.attributes_for(:patient))
+			assert_not_nil study_subject.send(method_name)
+		end
+
+	end
+
+	test "should return 'no oncologist specified' for study_subject without patient" do
+		study_subject = create_study_subject.reload
+		assert_nil study_subject.patient
+		assert_equal '[no oncologist specified]', study_subject.admitting_oncologist
+	end
+
+	test "should return 'no oncologist specified' for study_subject with null patient#admitting_oncologist" do
+		assert_difference('Patient.count',1) {
+		assert_difference('StudySubject.count',1) {
+			study_subject = create_patient(:admitting_oncologist => nil
+				).study_subject.reload
+			assert_equal '[no oncologist specified]', study_subject.admitting_oncologist
+		} }
+	end
+
+	test "should return 'no oncologist specified' for study_subject with blank patient#admitting_oncologist" do
+		assert_difference('Patient.count',1) {
+		assert_difference('StudySubject.count',1) {
+			study_subject = create_patient(:admitting_oncologist => ''
+				).study_subject.reload
+			assert_equal '[no oncologist specified]', study_subject.admitting_oncologist
+		} }
+	end
+
+	test "should return admitting_oncologist for study_subject with patient#admitting_oncologist" do
+		assert_difference('Patient.count',1) {
+		assert_difference('StudySubject.count',1) {
+			study_subject = create_patient(:admitting_oncologist => 'Dr Jim'
+				).study_subject.reload
+			assert_equal 'Dr Jim', study_subject.admitting_oncologist
+		} }
+	end
+
+	test "should set study_subject.reference_date to self.patient.admit_date on create" do
+		create_case_study_subject_with_patient
+	end
+
+	test "should update all matching study_subjects' reference date " <<
+			"with updated admit date" do
+		study_subject = create_case_study_subject(
+			:matchingid => '12345',
+			:patient_attributes    => Factory.attributes_for(:patient)).reload
+		other   = create_study_subject( :matchingid => '12345' )
+		nobody  = create_study_subject( :matchingid => '54321' )
+#	admit_date is now required, so will exist initially
+#		assert_nil study_subject.reference_date
+#		assert_nil study_subject.patient.admit_date
+#		assert_nil other.reference_date
+		assert_nil nobody.reference_date
+		study_subject.patient.update_attributes(
+			:admit_date => Date.yesterday )
+		assert_not_nil study_subject.patient.admit_date
+		assert_not_nil study_subject.reload.reference_date
+		assert_not_nil other.reload.reference_date
+		assert_nil     nobody.reload.reference_date
+		assert_equal study_subject.reference_date, study_subject.patient.admit_date
+		assert_equal study_subject.reference_date, other.reference_date
+	end
+
+	test "should set study_subject.reference_date to matching patient.admit_date " <<
+			"on create with patient created first" do
+		study_subject = create_case_study_subject_with_patient
+		other   = create_study_subject( :matchingid => '12345' )
+		assert_not_nil other.reload.reference_date
+		assert_equal   other.reference_date, study_subject.reference_date
+		assert_equal   other.reference_date, study_subject.patient.admit_date
+	end
+
+	test "should set study_subject.reference_date to matching patient.admit_date " <<
+			"on create with patient created last" do
+		other   = create_study_subject( :matchingid => '12345' )
+		study_subject = create_case_study_subject_with_patient
+		assert_not_nil other.reload.reference_date
+		assert_equal   other.reference_date, study_subject.reference_date
+		assert_equal   other.reference_date, study_subject.patient.admit_date
+	end
+
+	test "should nullify study_subject.reference_date if matching patient changes matchingid" do
+		other   = create_study_subject( :matchingid => '12345' )
+		study_subject = create_case_study_subject_with_patient
+		assert_not_nil other.reload.reference_date
+		study_subject.update_attributes(:matchingid => '12346')
+		assert_nil     other.reload.reference_date
+	end
+
+	test "should nullify study_subject.reference_date if matching patient nullifies matchingid" do
+		other   = create_study_subject( :matchingid => '12345' )
+		study_subject = create_case_study_subject_with_patient
+		assert_not_nil other.reload.reference_date
+		study_subject.update_attributes(:matchingid => nil)
+		assert_nil     other.reload.reference_date
+	end
+
+	test "should nullify study_subject.reference_date if matching patient nullifies admit_date (admit_date now required)" do
+		other   = create_study_subject( :matchingid => '12345' )
+		study_subject = create_case_study_subject_with_patient
+		assert_not_nil study_subject.patient.admit_date
+		assert_not_nil study_subject.reference_date
+		assert_not_nil other.reload.reference_date
+#	admit_date is now required, so can't nullify admit_date
+#	This actually now returns false
+		assert !study_subject.patient.update_attributes(:admit_date => nil)
+		assert_not_nil study_subject.patient.reload.admit_date
+		assert_not_nil study_subject.reference_date
+		assert_not_nil other.reload.reference_date
+#		assert_nil     other.reload.reference_date
+	end
+
+protected
+
+#	def create_study_subject_with_matchingid(matchingid='12345')
+##		study_subject = create_study_subject( 
+##			:identifier_attributes => Factory.attributes_for(:identifier,
+##				{ :matchingid => matchingid })).reload
+#		study_subject = create_study_subject( :matchingid => matchingid ).reload
+#	end
+
+	#	Used more than once so ...
+	def create_case_study_subject_with_patient
+		study_subject = create_case_study_subject( 
+			:matchingid => '12345',		#	NOTE expected
+			:patient_attributes    => Factory.attributes_for(:patient,
+				{ :admit_date => Date.yesterday })).reload
+		assert_not_nil study_subject.reference_date
+		assert_not_nil study_subject.patient.admit_date
+		assert_equal study_subject.reference_date, study_subject.patient.admit_date
+		study_subject
+	end
+
+end