schematron-wrapper 1.0.0

data/lib/schematron.rb

@@ -0,0 +1,6 @@
+require 'schematron/version'
+require 'schematron/utils'
+require 'schematron/xslt2'
+
+module Schematron
+end

data/lib/schematron/utils.rb

@@ -0,0 +1,29 @@
+require 'tempfile'
+
+module Schematron
+  module Utils
+    def create_temp_file(content, &block)
+      temp_file = Tempfile.new('temp_file')
+      temp_file.write(content)
+      temp_file.rewind
+
+      begin
+        block.call(temp_file)
+      ensure
+        temp_file.close
+        temp_file.unlink
+      end
+    end
+
+    def get_attribute_value(element, xpath)
+      result = ''
+      attributes = element.xpath(xpath)
+
+      if attributes.size > 0
+        result = attributes.first.value
+      end
+
+      result
+    end
+  end
+end

data/lib/schematron/version.rb

@@ -0,0 +1,4 @@
+module Schematron
+  VERSION = '1.0.0'
+end
+

data/lib/schematron/xslt2.rb

@@ -0,0 +1,71 @@
+require 'nokogiri'
+
+module Schematron
+  module XSLT2
+    extend Schematron::Utils
+
+    ISO_IMPL_DIR = File.join(File.dirname(__FILE__), '../..', 'iso-schematron-xslt2')
+    DSDL_INCLUDES_PATH = File.join(ISO_IMPL_DIR, 'iso_dsdl_include.xsl')
+    ABSTRACT_EXPAND_PATH = File.join(ISO_IMPL_DIR, 'iso_abstract_expand.xsl')
+    SVRL_FOR_XSLT2_PATH = File.join(ISO_IMPL_DIR, 'iso_svrl_for_xslt2.xsl')
+    EXE_PATH = File.join(File.dirname(__FILE__), '../..', 'bin/saxon9he.jar')
+
+    def self.compile(schematron)
+      temp_schematron = process_includes(schematron)
+      temp_schematron = expand_abstract_patterns(temp_schematron)
+
+      create_stylesheet(temp_schematron)
+    end
+
+    def self.validate(stylesheet, xml)
+      create_temp_file(stylesheet) do |temp_stylesheet|
+        create_temp_file(xml) do |temp_xml|
+          execute_transform(temp_stylesheet.path, temp_xml.path)
+        end
+      end
+    end
+
+    def self.get_errors(validation_result)
+      result = []
+
+      document = Nokogiri::XML(validation_result) do |config|
+        config.options = Nokogiri::XML::ParseOptions::NOBLANKS | Nokogiri::XML::ParseOptions::NOENT
+      end
+
+      document.xpath('//svrl:failed-assert').each do |element|
+        result.push({message: element.xpath('./svrl:text').text.strip,
+                     role: get_attribute_value(element, '@role'),
+                     location: get_attribute_value(element, '@location')})
+      end
+
+      result
+    end
+
+    private
+
+    def self.process_includes(content_to_transform)
+      create_temp_file(content_to_transform) { |temp_file| execute_transform(DSDL_INCLUDES_PATH, temp_file.path) }
+    end
+
+    def self.expand_abstract_patterns(content_to_transform)
+      create_temp_file(content_to_transform) { |temp_file| execute_transform(ABSTRACT_EXPAND_PATH, temp_file.path) }
+    end
+
+    def self.create_stylesheet(content_to_transform)
+      create_temp_file(content_to_transform) { |temp_file| execute_transform(SVRL_FOR_XSLT2_PATH, temp_file.path, true) }
+    end
+
+    def self.execute_transform(stylesheet, schema, allow_foreign = false)
+      cmd = "java -cp #{EXE_PATH} net.sf.saxon.Transform"
+
+      cmd << " -xsl:#{stylesheet}"
+      cmd << " -s:#{schema}"
+
+      if allow_foreign
+        cmd << ' allow-foreign=true'
+      end
+
+      %x{#{cmd}}
+    end
+  end
+end

data/schematron_wrapper.gemspec

@@ -0,0 +1,25 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'schematron/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = 'schematron-wrapper'
+  spec.version       = Schematron::VERSION
+
+  spec.authors       = ['AgileFreaks']
+  spec.email         = ['office@agilefreaks.com']
+  spec.description   = 'A ruby gem that wrappers various schematron implementations so they can be easily used in ruby'
+
+  spec.homepage      = 'https://github.com/Agilefreaks/schematron-wrapper'
+  spec.require_paths = ['lib']
+  spec.rubygems_version = '1.0.0'
+  spec.summary       = 'Schematron XSLT 2.0 validator using Saxon9-HE'
+  
+  spec.license       = 'Mozilla Public License, version 2.0'
+  spec.files         = `git ls-files -z`.split("\x0")
+  spec.executables   = spec.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  spec.test_files    = spec.files.grep(%r{^(test|spec|features)/})
+
+  spec.add_development_dependency 'nokogiri', '~> 1.6'
+end

data/spec/lib/schematron/xslt2_spec.rb

@@ -0,0 +1,50 @@
+require 'spec_helper'
+
+describe Schematron::XSLT2 do
+  SAMPLES_DIR = File.expand_path('../../../../spec/support/samples', __FILE__)
+
+  describe 'compile' do
+    subject { Schematron::XSLT2.compile(input_file) }
+
+    context 'parameter is schematron' do
+      let(:input_file) { File.read(File.join(SAMPLES_DIR, 'initial.sch')) }
+
+      it { should eq File.read(File.join(SAMPLES_DIR, 'compiled.xsl')) }
+    end
+  end
+
+  describe 'validate' do
+    let(:stylesheet_file) { File.read(File.join(SAMPLES_DIR, 'compiled.xsl')) }
+    let(:target_xml) { File.read(File.join(SAMPLES_DIR, 'target.xml')) }
+
+    subject { Schematron::XSLT2.validate(stylesheet_file, target_xml).gsub(/"file[^"]*/, '').gsub(/[\s]/, '') }
+
+    it { should == File.read(File.join(SAMPLES_DIR, 'validation_result.xml')).gsub(/"file[^"]*/, '').gsub(/[\s]/, '') }
+  end
+
+  describe 'get_errors' do
+    subject { Schematron::XSLT2.get_errors(validation_result) }
+
+    context 'validation result has errors' do
+      let(:validation_result) { File.read(File.join(SAMPLES_DIR, 'validation_result.xml')) }
+
+      its(:size) { should eq 2 }
+
+      its(:first) {
+        should include(
+                   message: 'ePatient.13 - Gender is 9906001 (Female), but eHistory.18 - Pregnancy is 3118011 while it must be 3118003 (Possible, Uncomfirmed).',
+                   location: "/*:EMSDataSet[namespace-uri()='http://www.nemsis.org'][1]/*:Header[namespace-uri()='http://www.nemsis.org'][1]/*:PatientCareReport[namespace-uri()='http://www.nemsis.org'][1]",
+                   role: '[FATAL]'
+               )
+      }
+
+      its(:last) {
+        should include(
+                   message: 'eTimes.03 - Unit Notified by Dispatch Date/Time 2013-10-02T14:00:50+07:00 should be before eTimes.13 - Unit Back in Service Date/Time 2013-10-02T14:00:50+07:00.',
+                   location: "/*:EMSDataSet[namespace-uri()='http://www.nemsis.org'][1]/*:Header[namespace-uri()='http://www.nemsis.org'][1]/*:PatientCareReport[namespace-uri()='http://www.nemsis.org'][1]/*:eTimes[namespace-uri()='http://www.nemsis.org'][1]",
+                   role: '[FATAL]'
+               )
+      }
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,4 @@
+require 'schematron'
+require 'rspec'
+
+Dir[File.dirname(__FILE__)+('/support/**/*.rb')].each { |f| require f }

data/spec/support/samples/compiled.xsl

@@ -0,0 +1,334 @@
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<xsl:stylesheet xmlns:xs="http://www.w3.org/2001/XMLSchema"
+                xmlns:xsd="http://www.w3.org/2001/XMLSchema"
+                xmlns:saxon="http://saxon.sf.net/"
+                xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+                xmlns:schold="http://www.ascc.net/xml/schematron"
+                xmlns:iso="http://purl.oclc.org/dsdl/schematron"
+                xmlns:xhtml="http://www.w3.org/1999/xhtml"
+                xmlns:nem="http://www.nemsis.org"
+                xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+                xmlns:fct="localFunctions"
+                version="2.0"><!--Implementers: please note that overriding process-prolog or process-root is 
+    the preferred method for meta-stylesheets to use where possible. -->
+   <xsl:param name="archiveDirParameter"/>
+   <xsl:param name="archiveNameParameter"/>
+   <xsl:param name="fileNameParameter"/>
+   <xsl:param name="fileDirParameter"/>
+   <xsl:variable name="document-uri">
+      <xsl:value-of select="document-uri(/)"/>
+   </xsl:variable>
+
+   <!--PHASES-->
+
+
+   <!--PROLOG-->
+   <xsl:output xmlns:svrl="http://purl.oclc.org/dsdl/svrl"
+               method="xml"
+               omit-xml-declaration="no"
+               standalone="yes"
+               indent="yes"/>
+
+   <!--XSD TYPES FOR XSLT2-->
+
+
+   <!--KEYS AND FUNCTIONS-->
+
+
+   <!--DEFAULT RULES-->
+
+
+   <!--MODE: SCHEMATRON-SELECT-FULL-PATH-->
+   <!--This mode can be used to generate an ugly though full XPath for locators-->
+   <xsl:template match="*" mode="schematron-select-full-path">
+      <xsl:apply-templates select="." mode="schematron-get-full-path"/>
+   </xsl:template>
+
+   <!--MODE: SCHEMATRON-FULL-PATH-->
+   <!--This mode can be used to generate an ugly though full XPath for locators-->
+   <xsl:template match="*" mode="schematron-get-full-path">
+      <xsl:apply-templates select="parent::*" mode="schematron-get-full-path"/>
+      <xsl:text>/</xsl:text>
+      <xsl:choose>
+         <xsl:when test="namespace-uri()=''">
+            <xsl:value-of select="name()"/>
+         </xsl:when>
+         <xsl:otherwise>
+            <xsl:text>*:</xsl:text>
+            <xsl:value-of select="local-name()"/>
+            <xsl:text>[namespace-uri()='</xsl:text>
+            <xsl:value-of select="namespace-uri()"/>
+            <xsl:text>']</xsl:text>
+         </xsl:otherwise>
+      </xsl:choose>
+      <xsl:variable name="preceding"
+                    select="count(preceding-sibling::*[local-name()=local-name(current())                                   and namespace-uri() = namespace-uri(current())])"/>
+      <xsl:text>[</xsl:text>
+      <xsl:value-of select="1+ $preceding"/>
+      <xsl:text>]</xsl:text>
+   </xsl:template>
+   <xsl:template match="@*" mode="schematron-get-full-path">
+      <xsl:apply-templates select="parent::*" mode="schematron-get-full-path"/>
+      <xsl:text>/</xsl:text>
+      <xsl:choose>
+         <xsl:when test="namespace-uri()=''">@<xsl:value-of select="name()"/>
+         </xsl:when>
+         <xsl:otherwise>
+            <xsl:text>@*[local-name()='</xsl:text>
+            <xsl:value-of select="local-name()"/>
+            <xsl:text>' and namespace-uri()='</xsl:text>
+            <xsl:value-of select="namespace-uri()"/>
+            <xsl:text>']</xsl:text>
+         </xsl:otherwise>
+      </xsl:choose>
+   </xsl:template>
+
+   <!--MODE: SCHEMATRON-FULL-PATH-2-->
+   <!--This mode can be used to generate prefixed XPath for humans-->
+   <xsl:template match="node() | @*" mode="schematron-get-full-path-2">
+      <xsl:for-each select="ancestor-or-self::*">
+         <xsl:text>/</xsl:text>
+         <xsl:value-of select="name(.)"/>
+         <xsl:if test="preceding-sibling::*[name(.)=name(current())]">
+            <xsl:text>[</xsl:text>
+            <xsl:value-of select="count(preceding-sibling::*[name(.)=name(current())])+1"/>
+            <xsl:text>]</xsl:text>
+         </xsl:if>
+      </xsl:for-each>
+      <xsl:if test="not(self::*)">
+         <xsl:text/>/@<xsl:value-of select="name(.)"/>
+      </xsl:if>
+   </xsl:template>
+   <!--MODE: SCHEMATRON-FULL-PATH-3-->
+   <!--This mode can be used to generate prefixed XPath for humans 
+	(Top-level element has index)-->
+   <xsl:template match="node() | @*" mode="schematron-get-full-path-3">
+      <xsl:for-each select="ancestor-or-self::*">
+         <xsl:text>/</xsl:text>
+         <xsl:value-of select="name(.)"/>
+         <xsl:if test="parent::*">
+            <xsl:text>[</xsl:text>
+            <xsl:value-of select="count(preceding-sibling::*[name(.)=name(current())])+1"/>
+            <xsl:text>]</xsl:text>
+         </xsl:if>
+      </xsl:for-each>
+      <xsl:if test="not(self::*)">
+         <xsl:text/>/@<xsl:value-of select="name(.)"/>
+      </xsl:if>
+   </xsl:template>
+
+   <!--MODE: GENERATE-ID-FROM-PATH -->
+   <xsl:template match="/" mode="generate-id-from-path"/>
+   <xsl:template match="text()" mode="generate-id-from-path">
+      <xsl:apply-templates select="parent::*" mode="generate-id-from-path"/>
+      <xsl:value-of select="concat('.text-', 1+count(preceding-sibling::text()), '-')"/>
+   </xsl:template>
+   <xsl:template match="comment()" mode="generate-id-from-path">
+      <xsl:apply-templates select="parent::*" mode="generate-id-from-path"/>
+      <xsl:value-of select="concat('.comment-', 1+count(preceding-sibling::comment()), '-')"/>
+   </xsl:template>
+   <xsl:template match="processing-instruction()" mode="generate-id-from-path">
+      <xsl:apply-templates select="parent::*" mode="generate-id-from-path"/>
+      <xsl:value-of select="concat('.processing-instruction-', 1+count(preceding-sibling::processing-instruction()), '-')"/>
+   </xsl:template>
+   <xsl:template match="@*" mode="generate-id-from-path">
+      <xsl:apply-templates select="parent::*" mode="generate-id-from-path"/>
+      <xsl:value-of select="concat('.@', name())"/>
+   </xsl:template>
+   <xsl:template match="*" mode="generate-id-from-path" priority="-0.5">
+      <xsl:apply-templates select="parent::*" mode="generate-id-from-path"/>
+      <xsl:text>.</xsl:text>
+      <xsl:value-of select="concat('.',name(),'-',1+count(preceding-sibling::*[name()=name(current())]),'-')"/>
+   </xsl:template>
+
+   <!--MODE: GENERATE-ID-2 -->
+   <xsl:template match="/" mode="generate-id-2">U</xsl:template>
+   <xsl:template match="*" mode="generate-id-2" priority="2">
+      <xsl:text>U</xsl:text>
+      <xsl:number level="multiple" count="*"/>
+   </xsl:template>
+   <xsl:template match="node()" mode="generate-id-2">
+      <xsl:text>U.</xsl:text>
+      <xsl:number level="multiple" count="*"/>
+      <xsl:text>n</xsl:text>
+      <xsl:number count="node()"/>
+   </xsl:template>
+   <xsl:template match="@*" mode="generate-id-2">
+      <xsl:text>U.</xsl:text>
+      <xsl:number level="multiple" count="*"/>
+      <xsl:text>_</xsl:text>
+      <xsl:value-of select="string-length(local-name(.))"/>
+      <xsl:text>_</xsl:text>
+      <xsl:value-of select="translate(name(),':','.')"/>
+   </xsl:template>
+   <!--Strip characters-->
+   <xsl:template match="text()" priority="-1"/>
+
+   <!--SCHEMA SETUP-->
+   <xsl:template match="/">
+      <svrl:schematron-output xmlns:svrl="http://purl.oclc.org/dsdl/svrl"
+                              title="NEMSIS Compliance Test ISO Schematron File"
+                              schemaVersion="">
+         <xsl:comment>
+            <xsl:value-of select="$archiveDirParameter"/>   
+		 <xsl:value-of select="$archiveNameParameter"/>  
+		 <xsl:value-of select="$fileNameParameter"/>  
+		 <xsl:value-of select="$fileDirParameter"/>
+         </xsl:comment>
+         <svrl:ns-prefix-in-attribute-values uri="http://www.nemsis.org" prefix="nem"/>
+         <svrl:ns-prefix-in-attribute-values uri="http://www.w3.org/1999/XSL/Transform" prefix="xsl"/>
+         <svrl:ns-prefix-in-attribute-values uri="http://www.w3.org/2001/XMLSchema-instance" prefix="xsi"/>
+         <svrl:ns-prefix-in-attribute-values uri="localFunctions" prefix="fct"/>
+         <svrl:active-pattern>
+            <xsl:attribute name="document">
+               <xsl:value-of select="document-uri(/)"/>
+            </xsl:attribute>
+            <xsl:attribute name="id">complianceTestStructureRule1</xsl:attribute>
+            <xsl:attribute name="name">When ePatient.13 is 9906001, eHistory.18 must be 3118003.</xsl:attribute>
+            <xsl:apply-templates/>
+         </svrl:active-pattern>
+         <xsl:apply-templates select="/" mode="M5"/>
+         <svrl:active-pattern>
+            <xsl:attribute name="document">
+               <xsl:value-of select="document-uri(/)"/>
+            </xsl:attribute>
+            <xsl:attribute name="id">complianceTestStructureRule2</xsl:attribute>
+            <xsl:attribute name="name">eTimes.03 - Unit Notied by Dispatch Date/Time is before eTimes.13 - Unit Back in Service Date/Time</xsl:attribute>
+            <xsl:apply-templates/>
+         </svrl:active-pattern>
+         <xsl:apply-templates select="/" mode="M6"/>
+         <svrl:active-pattern>
+            <xsl:attribute name="document">
+               <xsl:value-of select="document-uri(/)"/>
+            </xsl:attribute>
+            <xsl:attribute name="id">complianceTestStructureRule3</xsl:attribute>
+            <xsl:attribute name="name">eDispatch.01 - Complaint Reported by Dispatch must not be 2301069</xsl:attribute>
+            <xsl:apply-templates/>
+         </svrl:active-pattern>
+         <xsl:apply-templates select="/" mode="M7"/>
+      </svrl:schematron-output>
+   </xsl:template>
+
+   <!--SCHEMATRON PATTERNS-->
+   <svrl:text xmlns:svrl="http://purl.oclc.org/dsdl/svrl">NEMSIS Compliance Test ISO Schematron File</svrl:text>
+
+   <!--PATTERN complianceTestStructureRule1When ePatient.13 is 9906001, eHistory.18 must be 3118003.-->
+   <svrl:text xmlns:svrl="http://purl.oclc.org/dsdl/svrl">When ePatient.13 is 9906001, eHistory.18 must be 3118003.</svrl:text>
+
+	  <!--RULE -->
+   <xsl:template match="nem:Header/nem:PatientCareReport" priority="1000" mode="M5">
+      <svrl:fired-rule xmlns:svrl="http://purl.oclc.org/dsdl/svrl"
+                       context="nem:Header/nem:PatientCareReport"
+                       role="[FATAL]"/>
+      <xsl:variable name="patientCare" select="normalize-space(.)"/>
+      <xsl:variable name="ePatient13"
+                    select="normalize-space(./nem:ePatient/nem:ePatient.13/.)"/>
+      <xsl:variable name="eHistory18"
+                    select="normalize-space(./nem:eHistory/nem:eHistory.18/.)"/>
+
+		    <!--ASSERT [FATAL]-->
+      <xsl:choose>
+         <xsl:when test="if (number($ePatient13) = 9906001) then (if (number($eHistory18) = 3118003) then true() else false()) else true()"/>
+         <xsl:otherwise>
+            <svrl:failed-assert xmlns:svrl="http://purl.oclc.org/dsdl/svrl"
+                                test="if (number($ePatient13) = 9906001) then (if (number($eHistory18) = 3118003) then true() else false()) else true()">
+               <xsl:attribute name="role">[FATAL]</xsl:attribute>
+               <xsl:attribute name="location">
+                  <xsl:apply-templates select="." mode="schematron-select-full-path"/>
+               </xsl:attribute>
+               <svrl:text>
+        ePatient.13 - Gender is 9906001 (Female), but eHistory.18 - Pregnancy is <xsl:text/>
+                  <xsl:value-of select="$eHistory18"/>
+                  <xsl:text/> while it must be 3118003 (Possible, Uncomfirmed).
+      </svrl:text>
+            </svrl:failed-assert>
+         </xsl:otherwise>
+      </xsl:choose>
+      <xsl:apply-templates select="*|comment()|processing-instruction()" mode="M5"/>
+   </xsl:template>
+   <xsl:template match="text()" priority="-1" mode="M5"/>
+   <xsl:template match="@*|node()" priority="-2" mode="M5">
+      <xsl:apply-templates select="*|comment()|processing-instruction()" mode="M5"/>
+   </xsl:template>
+
+   <!--PATTERN complianceTestStructureRule2eTimes.03 - Unit Notied by Dispatch Date/Time is before eTimes.13 - Unit Back in Service Date/Time-->
+   <svrl:text xmlns:svrl="http://purl.oclc.org/dsdl/svrl">eTimes.03 - Unit Notied by Dispatch Date/Time is before eTimes.13 - Unit Back in Service Date/Time</svrl:text>
+
+	  <!--RULE -->
+   <xsl:template match="nem:Header/nem:PatientCareReport/nem:eTimes"
+                 priority="1000"
+                 mode="M6">
+      <svrl:fired-rule xmlns:svrl="http://purl.oclc.org/dsdl/svrl"
+                       context="nem:Header/nem:PatientCareReport/nem:eTimes"
+                       role="[FATAL]"/>
+      <xsl:variable name="eTimes" select="normalize-space(.)"/>
+      <xsl:variable name="eTimes03" select="normalize-space(./nem:eTimes.03/.)"/>
+      <xsl:variable name="eTimes13" select="normalize-space(./nem:eTimes.13/.)"/>
+      <xsl:variable name="eTimes03All"
+                    select="normalize-space(concat(substring($eTimes03,1,4), substring($eTimes03,6,2), substring($eTimes03,9,2), substring($eTimes03,12,2), substring($eTimes03,15,2), substring($eTimes03,18,2)))"/>
+      <xsl:variable name="eTimes13All"
+                    select="normalize-space(concat(substring($eTimes13,1,4), substring($eTimes13,6,2), substring($eTimes13,9,2), substring($eTimes13,12,2), substring($eTimes13,15,2), substring($eTimes13,18,2)))"/>
+
+		    <!--ASSERT [FATAL]-->
+      <xsl:choose>
+         <xsl:when test=" if (number($eTimes03All) &lt; number($eTimes13All)) then true() else false() "/>
+         <xsl:otherwise>
+            <svrl:failed-assert xmlns:svrl="http://purl.oclc.org/dsdl/svrl"
+                                test="if (number($eTimes03All) &lt; number($eTimes13All)) then true() else false()">
+               <xsl:attribute name="role">[FATAL]</xsl:attribute>
+               <xsl:attribute name="location">
+                  <xsl:apply-templates select="." mode="schematron-select-full-path"/>
+               </xsl:attribute>
+               <svrl:text>
+        eTimes.03 - Unit Notified by Dispatch Date/Time <xsl:text/>
+                  <xsl:value-of select="$eTimes03"/>
+                  <xsl:text/> should be before eTimes.13 - Unit Back in Service Date/Time <xsl:text/>
+                  <xsl:value-of select="$eTimes13"/>
+                  <xsl:text/>.
+      </svrl:text>
+            </svrl:failed-assert>
+         </xsl:otherwise>
+      </xsl:choose>
+      <xsl:apply-templates select="*|comment()|processing-instruction()" mode="M6"/>
+   </xsl:template>
+   <xsl:template match="text()" priority="-1" mode="M6"/>
+   <xsl:template match="@*|node()" priority="-2" mode="M6">
+      <xsl:apply-templates select="*|comment()|processing-instruction()" mode="M6"/>
+   </xsl:template>
+
+   <!--PATTERN complianceTestStructureRule3eDispatch.01 - Complaint Reported by Dispatch must not be 2301069-->
+   <svrl:text xmlns:svrl="http://purl.oclc.org/dsdl/svrl">eDispatch.01 - Complaint Reported by Dispatch must not be 2301069</svrl:text>
+
+	  <!--RULE -->
+   <xsl:template match="nem:Header/nem:PatientCareReport/nem:eDispatch"
+                 priority="1000"
+                 mode="M7">
+      <svrl:fired-rule xmlns:svrl="http://purl.oclc.org/dsdl/svrl"
+                       context="nem:Header/nem:PatientCareReport/nem:eDispatch"
+                       role="[FATAL]"/>
+      <xsl:variable name="eDispatch" select="normalize-space(.)"/>
+      <xsl:variable name="eDispatch01" select="normalize-space(./nem:eDispatch.01/.)"/>
+
+		    <!--ASSERT [FATAL]-->
+      <xsl:choose>
+         <xsl:when test="if (number($eDispatch01) = 2301007) then false() else true()"/>
+         <xsl:otherwise>
+            <svrl:failed-assert xmlns:svrl="http://purl.oclc.org/dsdl/svrl"
+                                test="if (number($eDispatch01) = 2301007) then false() else true()">
+               <xsl:attribute name="role">[FATAL]</xsl:attribute>
+               <xsl:attribute name="location">
+                  <xsl:apply-templates select="." mode="schematron-select-full-path"/>
+               </xsl:attribute>
+               <svrl:text>
+        eDispatch.01 - Complaint Reported by Dispatch must NOT be 2301007.
+      </svrl:text>
+            </svrl:failed-assert>
+         </xsl:otherwise>
+      </xsl:choose>
+      <xsl:apply-templates select="*|comment()|processing-instruction()" mode="M7"/>
+   </xsl:template>
+   <xsl:template match="text()" priority="-1" mode="M7"/>
+   <xsl:template match="@*|node()" priority="-2" mode="M7">
+      <xsl:apply-templates select="*|comment()|processing-instruction()" mode="M7"/>
+   </xsl:template>
+</xsl:stylesheet>