plan_executor 1.0.2 → 1.8.0

data/lib/tests/suites/connectathon_financial_track.rb

@@ -12,6 +12,7 @@ module Crucible
 
       def initialize(client1, client2=nil)
         super(client1, client2)
+        @tags.append('connectathon')
         @category = {id: 'connectathon', title: 'Connectathon'}
       end
 
@@ -19,19 +20,224 @@ module Crucible
         @resources = Crucible::Generator::Resources.new
 
         @simple = @resources.simple_claim
-        @simple.xmlId = nil # clear the identifier, in case the server checks for duplicates
+        @simple.id = nil # clear the identifier, in case the server checks for duplicates
         @simple.identifier = nil # clear the identifier, in case the server checks for duplicates
 
         @average = @resources.average_claim
-        @average.xmlId = nil # clear the identifier, in case the server checks for duplicates
+        @average.id = nil # clear the identifier, in case the server checks for duplicates
         @average.identifier = nil # clear the identifier, in case the server checks for duplicates
+
+
+        @preauth = @resources.complex_claim
+        @preauth.id = nil # clear the identifier, in case the server checks for duplicates
+        @preauth.identifier = nil # clear the identifier, in case the server checks for duplicates
+
+        @er = @resources.load_fixture('financial/eligibilityrequest-example.xml')
+        @er.id = nil
+        @er.identifier = nil
+
+        @patient = @resources.minimal_patient
+        @patient.id = nil
+        @patient.identifier = [FHIR::Identifier.new]
+        @patient.identifier[0].value = SecureRandom.urlsafe_base64
+        result = @client.create(@patient)
+        assert_response_ok(result)
+        @patient_id = result.id
+
+        @simple.patient.reference = "Patient/#{@patient_id}"
+        @average.patient.reference = "Patient/#{@patient_id}"
+        @preauth.patient.reference = "Patient/#{@patient_id}"
+        @er.patient.reference = "Patient/#{@patient_id}"
+
+        @organization_1 = @resources.example_patient_record_organization_201
+        @organization_1.id = nil
+        reply = @client.create @organization_1
+        @organization_1_id = reply.id
+        @organization_1.id = @organization_1_id
+        assert_response_ok(reply)
+
+        @simple.organization.reference = "Organization/#{@organization_1_id}"
+        @average.organization.reference = "Organization/#{@organization_1_id}"
+        @preauth.organization.reference = "Organization/#{@organization_1_id}"
+        @er.organization.reference = "Organization/#{@organization_1_id}"
+
+        @organization_2 = @resources.example_patient_record_organization_203
+        @organization_2.id = nil
+        reply = @client.create @organization_2
+        @organization_2_id = reply.id
+        @organization_2.id = @organization_2_id
+        assert_response_ok(reply)
+
+        @simple.insurer.reference = "Organization/#{@organization_2_id}"
+        @average.insurer.reference = "Organization/#{@organization_2_id}"
+        @preauth.insurer.reference = "Organization/#{@organization_2_id}"
+        @er.insurer.reference = "Organization/#{@organization_2_id}"
       end
 
       def teardown
         @client.destroy(FHIR::Claim, @simple_id) if !@simple_id.nil?
-        @client.destroy(FHIR::ClaimResponse, @simple_response_id) if !@simple_response_id.nil?
+        @client.destroy(FHIR::Claim, @preauth_id) if !@preauth_id.nil?
         @client.destroy(FHIR::Claim, @average_id) if !@average_id.nil?
+        @client.destroy(FHIR::ClaimResponse, @simple_response_id) if !@simple_response_id.nil?
         @client.destroy(FHIR::ClaimResponse, @average_response_id) if !@average_response_id.nil?
+        @client.destroy(FHIR::ClaimResponse, @preauth_response_id) if !@preauth_response_id.nil?
+        @client.destroy(FHIR::Patient, @patient_id) if !@patient_id.nil?
+        @client.destroy(FHIR::Patient, @organization_1_id) if !@organization_1_id.nil?
+        @client.destroy(FHIR::Patient, @organization_2_id) if !@organization_2_id.nil?
+        @client.destroy(FHIR::EligibilityRequest, @er_id) if !@er_id.nil?
+        @client.destroy(FHIR::Communication, @preauth_communication_id) if !@preauth_communication_id.nil?
+      end
+
+      test 'C13F_1', 'Register an EligibilityRequest' do
+        metadata {
+          links "#{REST_SPEC_LINK}#create"
+          links "#{BASE_SPEC_LINK}/eligibilityrequest.html"
+          links 'http://wiki.hl7.org/index.php?title=201609_Financial_Management#Submit_an_Eligibility.2C_Retrieve.2FReceive_an_EligibilityResponse'
+          requires resource: 'EligibilityRequest', methods: ['create']
+          validates resource: 'EligibilityRequest', methods: ['create']
+        }
+
+        reply = @client.create(@er)
+
+        assert_response_ok(reply)
+        @er_id = reply.id
+
+        warning { assert @er.equals?(reply.resource), 'The server did not correctly preserve the EligibilityRequest data.' }
+
+      end
+
+      test 'C13F_2', 'Search for EligibilityResponse' do
+        metadata {
+          links "#{REST_SPEC_LINK}#search"
+          links "#{BASE_SPEC_LINK}/eligibilityresponse.html"
+          links 'http://wiki.hl7.org/index.php?title=201609_Financial_Management#Submit_an_Eligibility.2C_Retrieve.2FReceive_an_EligibilityResponse'
+        }
+
+        options = {
+          :search => {
+            :flag => true,
+            :compartment => nil,
+            :parameters => {
+              'request-identifier' => @er_id
+            }
+          }
+        }
+
+        sleep(5)
+
+        # @client.use_format_param = true
+        reply = @client.search(FHIR::EligibilityResponse, options)
+
+        assert_response_ok(reply)
+        assert (reply.resource.total > 0), 'The server did not report any EligibilityResponses for the submitted EligibilityResource.'
+      end
+
+      test 'C13F_3', 'Submit a PreAuthorization and an Attachment' do
+
+        # Action: The FHIR Client will construct a Claim resource indicating Pre-Authorization. The service will respond with a
+        # ClaimResponse indicating only receipt not adjudication of the Claim (Pre-Authorization).
+        # To obtain the adjudicated ClaimResponse the client must then submit an Attachment (Communication resource) containing any
+        # supporting material to which the Server will respond with a ProcessResponse indicating success or failure with errors.
+        # Then the client may obtain the adjudicated ClaimResponse via the appropriate protocol. The ClaimResponse will contain
+        # an identifier which may be used during claim submission to indicate that the Pre-Authorization has been performed.
+        # Precondition: None
+        # Success Criteria: Pre-Authorization and Attachment processed correctly by the Server (inspect via browser or available UI)
+        # Bonus point: For sending a business-appropriate form of attachment.
+
+        metadata {
+          links "#{REST_SPEC_LINK}#create"
+          links "#{BASE_SPEC_LINK}/claim.html"
+          links 'http://wiki.hl7.org/index.php?title=201609_Financial_Management'
+        }
+
+
+        reply = @client.create(@preauth)
+        assert_response_ok(reply)
+        @preauth_id = reply.id
+        sleep(10) # sleep to allow server to process claim, no wait time was causing incorrect failures in subsequent tests
+
+        if !reply.resource.nil?
+          # Response is Claim
+          temp = reply.resource.id
+          reply.resource.id = nil
+          warning { assert @simple.equals?(reply.resource), 'The server did not correctly preserve the Claim data.' }
+          reply.resource.id = temp
+        elsif !reply.body.nil?
+          begin
+            @preauth_response = FHIR.from_contents(reply.body)
+            if cr.class==FHIR::ClaimResponse
+              # Response is ClaimResponse
+              @preauth_response_id = @preauth_response.id
+            else
+              warning { assert(false,"The Claim request responded with an unexpected resource: #{cr.class}",reply.body) }
+              @preauth_response = nil
+            end
+          rescue Exception => ex
+            @preauth_response = nil
+            warning { assert(false,'The Claim request responded with an unexpected body.',reply.body) }
+          end
+        end
+
+        # get the claim response if we weren't given one back directly
+
+        search_string = @preauth_id
+        search_regex = Regexp.new(search_string)
+
+        if @preauth_response.nil?
+          options = {
+            :search => {
+              :flag => true,
+              :compartment => nil,
+              :parameters => {
+                'request' => search_string
+              }
+            }
+          }
+          @client.use_format_param = true
+          reply = @client.search(FHIR::ClaimResponse, options)
+          assert_response_ok(reply)
+          assert_bundle_response(reply)
+          assert (reply.resource.total > 0), 'The server does not have a record of the submitted preauthorization.'
+          assert(reply.resource.entry[0].resource.request.reference.include?(@preauth_id), 'The server did not return a request with the proper preauthorization.')
+
+          @preauth_response = reply.resource.entry[0].resource
+          @preauth_response_id = @preauth_response.id
+        end
+
+        # check receipt and not adjudication of the claim
+        # To do this, we will just make sure that it isn't marked as "complete"
+        # This may not be the proper method
+
+        assert_operator(:notEquals, @preauth_response.outcome, 'complete', 'The current status of the preauth should not be complete')
+
+        # create an communication that references additional information for the claim
+
+        @preauth_communication = FHIR::Communication.new()
+        # Associate with the claim using the topic
+        # This might not be the appopriate place to do this
+        @preauth_communication.topic = [ FHIR::Reference.new ]
+        @preauth_communication.topic[0].reference = "Claim/#{@preauth_id}"
+
+        attachment = FHIR::Attachment.new
+        attachment.data = File.read(File.join(Crucible::Generator::Resources::FIXTURE_DIR, 'attachment', 'ccda_pdf_base64.txt'))
+        # attachment.data = 'SGVsbG8='
+        attachment.contentType = 'application/pdf'
+
+        payload = FHIR::Communication::Payload.new
+        payload.contentAttachment = attachment
+
+        @preauth_communication.payload = [payload]
+
+        reply = @client.create(@preauth_communication)
+        assert_response_ok(reply)
+        @preauth_communication_id = reply.id
+
+
+        #TODO: The Server will respond with a ProcessResponse indicating success or failure with errors.
+        #Then the client may obtain the adjudicated ClaimResponse via the appropriate protocol.
+        #The ClaimResponse will contain an identifier which may be used during claim submission to indicate
+        #that the Pre-Authorization has been performed.
+
       end
 
       #
@@ -53,16 +259,16 @@ module Crucible
 
         if !reply.resource.nil?
           # Response is Claim
-          temp = reply.resource.xmlId
-          reply.resource.xmlId = nil
+          temp = reply.resource.id
+          reply.resource.id = nil
           warning { assert @simple.equals?(reply.resource), 'The server did not correctly preserve the Claim data.' }
-          reply.resource.xmlId = temp
+          reply.resource.id = temp
         elsif !reply.body.nil?
           begin
-            cr = FHIR::Resource.from_contents(reply.body)
+            cr = FHIR.from_contents(reply.body)
             if cr.class==FHIR::ClaimResponse
               # Response is ClaimResponse
-              @simple_response_id = cr.xmlId
+              @simple_response_id = cr.id
               @simple_id = cr.request.reference if cr.request
             else
               warning { assert(false,"The Claim request responded with an unexpected resource: #{cr.class}",reply.body) }
@@ -96,16 +302,16 @@ module Crucible
 
         if !reply.resource.nil?
           # Response is Claim
-          temp = reply.resource.xmlId
-          reply.resource.xmlId = nil
+          temp = reply.resource.id
+          reply.resource.id = nil
           warning { assert @average.equals?(reply.resource), 'The server did not correctly preserve the Claim data.' }
-          reply.resource.xmlId = temp
+          reply.resource.id = temp
         elsif !reply.body.nil?
           begin
-            cr = FHIR::Resource.from_contents(reply.body)
+            cr = FHIR.from_contents(reply.body)
             if cr.class==FHIR::ClaimResponse
               # Response is ClaimResponse
-              @average_response_id = cr.xmlId
+              @average_response_id = cr.id
               @average_id = cr.request.reference if cr.request
             else
               warning { assert(false,"The Claim request responded with an unexpected resource: #{cr.class}",reply.body) }
@@ -136,8 +342,8 @@ module Crucible
         reply = @client.read(FHIR::Claim,@simple_id)
         assert_response_ok(reply)
         assert_resource_type(reply,FHIR::Claim)
-        reply.resource.coverage.each do |coverage|
-          assert(!coverage.try(:claimResponse).try(:reference).nil?,'Claim does not reference a ClaimResponse.',reply.body)
+        reply.resource.insurance.each do |insurance|
+          assert(!insurance.try(:claimResponse).try(:reference).nil?,'Claim does not reference a ClaimResponse.',reply.body)
         end
         warning { assert_valid_resource_content_type_present(reply) }
         warning { assert_last_modified_present(reply) }
@@ -159,8 +365,8 @@ module Crucible
         reply = @client.read(FHIR::Claim,@average_id)
         assert_response_ok(reply)
         assert_resource_type(reply,FHIR::Claim)
-        reply.resource.coverage.each do |coverage|
-          assert(!coverage.try(:claimResponse).try(:reference).nil?,'Claim does not reference a ClaimResponse.',reply.body)
+        reply.resource.insurance.each do |insurance|
+          assert(!insurance.try(:claimResponse).try(:reference).nil?,'Claim does not reference a ClaimResponse.',reply.body)
         end
         warning { assert_valid_resource_content_type_present(reply) }
         warning { assert_last_modified_present(reply) }
@@ -199,8 +405,9 @@ module Crucible
         assert_response_ok(reply)
         assert_bundle_response(reply)
         assert (reply.resource.total > 0), 'The server did not report any results.'
+        assert(reply.resource.entry[0].resource.request.reference.include?(@simple_id), 'The server did not return a request with the proper claim')
 
-        @simple_response_id = reply.resource.entry[0].resource.xmlId unless @simple_response_id
+        @simple_response_id = reply.resource.entry[0].resource.id unless @simple_response_id
       end
 
       #
@@ -234,7 +441,7 @@ module Crucible
         assert_bundle_response(reply)
         assert (reply.resource.total > 0), 'The server did not report any results.'
 
-        @simple_response_id = reply.resource.entry[0].resource.xmlId unless @simple_response_id
+        @simple_response_id = reply.resource.entry[0].resource.id unless @simple_response_id
       end
 
       #
@@ -268,7 +475,7 @@ module Crucible
         assert_bundle_response(reply)
         assert (reply.resource.total > 0), 'The server did not report any results.'
 
-        @simple_response_id = reply.resource.entry[0].resource.xmlId unless @simple_response_id
+        @simple_response_id = reply.resource.entry[0].resource.id unless @simple_response_id
       end
 
       # ------------------------------------------------------------------------------
@@ -304,7 +511,8 @@ module Crucible
         assert_bundle_response(reply)
         assert (reply.resource.total > 0), 'The server did not report any results.'
 
-        @average_response_id = reply.resource.entry[0].resource.xmlId unless @average_response_id
+        assert(reply.resource.entry[0].resource.request.reference.include?(@average_id), 'The server did not return a request with the proper claim')
+        @average_response_id = reply.resource.entry[0].resource.id unless @average_response_id
       end
 
       #
@@ -338,7 +546,7 @@ module Crucible
         assert_bundle_response(reply)
         assert (reply.resource.total > 0), 'The server did not report any results.'
 
-        @average_response_id = reply.resource.entry[0].resource.xmlId unless @average_response_id
+        @average_response_id = reply.resource.entry[0].resource.id unless @average_response_id
       end
 
       #
@@ -372,7 +580,7 @@ module Crucible
         assert_bundle_response(reply)
         assert (reply.resource.total > 0), 'The server did not report any results.'
 
-        @average_response_id = reply.resource.entry[0].resource.xmlId unless @average_response_id
+        @average_response_id = reply.resource.entry[0].resource.id unless @average_response_id
       end
 
     end

data/lib/tests/suites/connectathon_genomics_track_test.rb

@@ -0,0 +1,255 @@
+module Crucible
+  module Tests
+    class ConnectathonGenomicsTrackTest < BaseSuite
+
+      def id
+        'ConnectathonGenomicsTrackTest'
+      end
+
+      def description
+        'Genomic data are of increasing importance to clinical care and secondary analysis. FHIR Genomics consists of the Sequence resource and several profiles built on top of existing FHIR resources.'
+      end
+
+      def initialize(client1, client2=nil)
+        super(client1, client2)
+        @tags.append('connectathon')
+        @category = {id: 'connectathon', title: 'Connectathon'}
+      end
+
+      def setup
+        @resources = Crucible::Generator::Resources.new
+        @records = {}
+
+        patient = @resources.load_fixture("patient/patient-register-create.xml")
+        practitioner = @resources.load_fixture("practitioner/practitioner-register-create.xml")
+
+        create_object(patient, :patient)
+        create_object(practitioner, :practitioner)
+      end
+
+      def teardown
+        @records.each_value do |value|
+          @client.destroy(value.class, value.id)
+        end
+      end
+
+      # register sequence and observation
+      test 'CGT01','Register a New Sequence and Observation' do
+        metadata {
+          links "#{REST_SPEC_LINK}#create"
+          links "#{BASE_SPEC_LINK}/sequence.html"
+          links 'http://wiki.hl7.org/index.php?title=201605_FHIR_Genomics_on_FHIR_Connectathon_Track_Proposal'
+          requires resource: 'Sequence', methods: ['create']
+          requires resource: 'Specimen', methods: ['create']
+          requires resource: 'Observation', methods: ['create']
+          validates resource: 'Sequence', methods: ['create']
+          validates resource: 'Specimen', methods: ['create']
+          validates resource: 'Observation', methods: ['create']
+        }
+
+        sequence = @resources.load_fixture('sequence/sequence-register-create.xml')
+        specimen = @resources.load_fixture('specimen/specimen-register-create.xml')
+        observation = @resources.load_fixture('observation/observation-register-create.xml')
+
+        specimen.subject = @records[:patient].to_reference
+        create_object(specimen, :specimen_register_create)
+
+        sequence.patient = @records[:patient].to_reference
+        sequence.specimen = @records[:specimen_register_create].to_reference
+        create_object(sequence, :sequence_register_create)
+
+        observation.subject = @records[:patient].to_reference
+        observation.specimen = @records[:specimen_register_create].to_reference
+        observation.performer = @records[:practitioner].to_reference
+        create_object(observation, :observation_register_create)
+      end
+
+      test 'CGT02', 'Retrieve Genomic Source data for given patient' do
+        metadata {
+          links "#{REST_SPEC_LINK}#search"
+          links 'http://wiki.hl7.org/index.php?title=201605_FHIR_Genomics_on_FHIR_Connectathon_Track_Proposal'
+          requires resource: 'Sequence', methods: ['read']
+          requires resource: 'Observation', methods: ['read']
+          requires resource: 'Patient', methods: ['read']
+        }
+
+        options = {
+          :search => {
+            :flag => false,
+            :compartment => nil,
+            :parameters => {
+              'subject' => "Patient/#{@records[:patient].id}"
+            }
+          }
+        }
+
+        reply = @client.search(FHIR::Observation, options)
+        assert_response_ok(reply)
+
+        ext = reply.resource.entry.find {|entry| entry.resource.extension.find { |exten| exten.url == "http://hl7.org/fhir/StructureDefinition/observation-geneticsGenomicSourceClass" } }
+
+        assert ext, "No Genomic Source Class extension found on returned Observations"
+
+        assert_equal 'LA6683-2', ext.resource.extension.find { |exten| exten.url == 'http://hl7.org/fhir/StructureDefinition/observation-geneticsGenomicSourceClass'}.valueCodeableConcept.coding[0].code
+      end
+
+      test 'CGT03', 'Retrieve Family History data for the given patient' do
+        metadata {
+          links "#{REST_SPEC_LINK}#search"
+          links 'http://wiki.hl7.org/index.php?title=201605_FHIR_Genomics_on_FHIR_Connectathon_Track_Proposal'
+          requires resource: 'Sequence', methods: ['read']
+          requires resource: 'Observation', methods: ['create', 'read']
+          requires resource: 'Patient', methods: ['create', 'read']
+          requires resource: 'Specimen', methods: ['create', 'read']
+          requires resource: 'FamilyMemberHistory', methods: ['create', 'read']
+          requires resource: 'DiagnosticReport', methods: ['create', 'read']
+        }
+
+        patient = @resources.load_fixture('patient/patient-familyhistory-create.xml')
+        create_object(patient, :family_patient)
+
+        observation = @resources.load_fixture('observation/observation-familyhistory-create.xml')
+        observation.subject = @records[:family_patient].to_reference
+        create_object(observation, :family_observation)
+
+        familymemberhistory = @resources.load_fixture('family_member_history/familymemberhistory-familyhistory-create.xml')
+        familymemberhistory.patient = @records[:family_patient].to_reference
+        familymemberhistory.extension.find { |exten| exten.url == 'http://hl7.org/fhir/StructureDefinition/family-member-history-genetics-observation'}.valueReference = @records[:family_observation].to_reference
+        create_object(familymemberhistory, :family_member_history)
+
+        specimen = @resources.load_fixture('specimen/specimen-familyhistory-create.xml')
+        specimen.subject = @records[:family_patient].to_reference
+        create_object(specimen, :family_specimen)
+
+        diag_report = @resources.load_fixture('diagnostic_report/diagnosticreport-familyhistory-create.xml')
+        diag_report.subject = @records[:family_patient].to_reference
+        diag_report.performer = @records[:practitioner].to_reference
+        diag_report.specimen = @records[:family_specimen].to_reference
+        diag_report.result = @records[:family_observation].to_reference
+        create_object(diag_report, :family_report)
+
+        reply = @client.read FHIR::FamilyMemberHistory, @records[:family_member_history].id
+        assert_response_ok(reply)
+
+        ext = reply.resource.extension.find { |exten| exten.url == 'http://hl7.org/fhir/StructureDefinition/family-member-history-genetics-observation'}
+
+        assert ext, "No Family History extension found"
+
+        reply = @client.read FHIR::Observation, ext.valueReference.reference.split("/")[1]
+        assert_response_ok(reply)
+
+        assert @records[:family_observation].equals?(reply.resource, ['meta']), "Observation doesn't match the stored Observation; difference is: #{@records[:family_observation].mismatch(reply.resource, ['meta'])}"
+      end
+
+      test 'CGT04', 'Clinical data warehouse search' do
+        metadata {
+          links "#{REST_SPEC_LINK}#search"
+          links 'http://wiki.hl7.org/index.php?title=201605_FHIR_Genomics_on_FHIR_Connectathon_Track_Proposal'
+          requires resource: 'Observation', methods: ['create', 'read']
+        }
+
+        dw_obs = @resources.load_fixture('observation/observation-datawarehouse-create.xml')
+        dw_obs.performer = @records[:practitioner].to_reference
+        dw_obs.subject = @records[:family_patient].to_reference
+        dw_obs.specimen = @records[:family_specimen].to_reference
+        create_object(dw_obs, :dw_obs)
+
+        options = {
+          :search => {
+            :flag => false,
+            :compartment => nil,
+            :parameters => {
+              'subject' => "Patient/#{@records[:family_patient].id}"
+            }
+          }
+        }
+
+        reply = @client.search(FHIR::Observation, options)
+        assert_response_ok(reply)
+
+        assert reply.resource.get_by_id(@records[:dw_obs].id), "No Observation found for that patient"
+
+      end
+
+      test 'CGT05', 'HLA Typing' do
+        metadata {
+          links "#{REST_SPEC_LINK}#search"
+          links 'http://wiki.hl7.org/index.php?title=201605_FHIR_Genomics_on_FHIR_Connectathon_Track_Proposal'
+          requires resource: 'DiagnosticReport', methods: ['create', 'read']
+          validates resource: 'DiagnosticReport', methods: ['create', 'read']
+        }
+
+        dr_hla = @resources.load_fixture('diagnostic_report/diagnosticreport-hlatyping-create.xml')
+        dr_hla.subject = @records[:family_patient].to_reference
+        dr_hla.performer = [@records[:practitioner].to_reference]
+        dr_hla.specimen = [@records[:family_specimen].to_reference]
+
+        create_object(dr_hla, :dr_hla)
+
+        reply = @client.read(FHIR::DiagnosticReport, @records[:dr_hla].id)
+        assert_response_ok(reply)
+
+        assert @records[:dr_hla].equals?(reply.resource, ['meta', 'text', 'narrative']), "DiagnosticReport doesn't match the stored DiagnosticReport; difference is: #{@records[:dr_hla].mismatch(reply.resource, ['meta', 'text', 'narrative'])}"
+      end
+
+      test 'CGT07', 'Comprehensive Pathology Report' do
+        metadata {
+          links "#{REST_SPEC_LINK}#search"
+          links 'http://wiki.hl7.org/index.php?title=201605_FHIR_Genomics_on_FHIR_Connectathon_Track_Proposal'
+          requires resource: 'DiagnosticReport', methods: ['create', 'read', 'search', 'delete']
+          validates resource: 'DiagnosticReport', methods: ['create', 'read', 'search', 'delete']
+        }
+
+        dr = @resources.load_fixture('diagnostic_report/diagnosticreport-pathologyreport-create.xml')
+        dr.subject = @records[:family_patient].to_reference
+        dr.performer = [@records[:practitioner].to_reference]
+        dr.specimen = [@records[:family_specimen].to_reference]
+        create_object(dr, :dr_pathreport)
+
+        reply = @client.read(FHIR::DiagnosticReport, @records[:dr_pathreport].id)
+        assert_response_ok(reply)
+
+        assert reply.resource.equals?(@records[:dr_pathreport], ['text', 'meta', 'lastUpdated']), "DiagnosticReport returned does not match DiagnosticReport sent, mismatch in #{reply.resource.mismatch(@records[:dr_pathreport], ['text', 'meta', 'lastUpdated'])}"
+      end
+
+      test 'GCT08', 'Sequence Quality' do
+        metadata {
+          links "#{REST_SPEC_LINK}#search"
+          links 'http://wiki.hl7.org/index.php?title=201605_FHIR_Genomics_on_FHIR_Connectathon_Track_Proposal'
+          requires resource: 'Sequence', methods: ['read', 'search', 'delete']
+          validates resource: 'Sequence', methods: ['read', 'search', 'delete']
+        }
+
+        options = {
+          :search => {
+            :flag => false,
+            :compartment => nil,
+            :parameters => {
+              'patient' => "Patient/#{@records[:patient].id}"
+            }
+          }
+        }
+
+        reply = @client.search(FHIR::Sequence, options)
+        assert_response_ok(reply)
+
+        entries = reply.resource.entry.collect { |e| e.resource if e.resource.quality }
+
+        assert entries.count >= 1, 'No entries with Sequence quality found for Patient'
+      end
+
+      private
+
+      def create_object(obj, obj_sym)
+        reply = @client.create obj
+        assert_response_ok(reply)
+        obj.id = reply.id
+        @records[obj_sym] = obj
+
+        warning { assert_valid_resource_content_type_present(reply) }
+        warning { assert_valid_content_location_present(reply) }
+      end
+
+    end
+  end
+end