schematron-nokogiri 0.0.2 → 0.0.3

data/spec/schema/open_peppol/SI-UBL-INV-STRICT.SCH

@@ -0,0 +1,86 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<schema xmlns:cbc="urn:oasis:names:specification:ubl:schema:xsd:CommonBasicComponents-2" xmlns:cac="urn:oasis:names:specification:ubl:schema:xsd:CommonAggregateComponents-2" xmlns:ubl="urn:oasis:names:specification:ubl:schema:xsd:Invoice-2" queryBinding="xslt" xmlns="http://purl.oclc.org/dsdl/schematron">
+    <!--
+        Release 1.1.1
+        Author: Jelte Jansen (SIDN Labs)
+        Changes since 1.1:
+        - SI-UBL version detection is now based on CustomizationID instead of UBLVersion
+        - Split up schematron tree into versions (v1.0 and v1.1)
+        - Added UBL Business rules to v1.0 checker
+
+        Release 1.1
+        Author: M.P. Diepstra (Innopay) 
+        Email: support@simplerinvoicing.org
+
+        Usable XPath statements for getting insight into Schematron file:
+        //rule[@context=preceding-sibling::rule/@context]      - - - > Gets all rules that might not get fired because they have the same context as previous rules
+        max(//assert/substring-before(text(), ']'))   - - - > Gets the maximum number of the current error numbering in the rule set
+        //assert[@flag='fatal' or (not(@flag) and parent::rule/@flag='fatal')]    - - - > Gets all asserts that are flagged 'fatal'
+        //assert[not(@flag) or @flag != parent::rule/@flag] - - - > Gets all asserts where the flag differs from the rule flag 
+
+        Development comments:
+        To facilitate developers of invoicing software, the rules should point to the actual elements that are giving the problem. Sometimes this
+        is not possible, like when the element is required but it's not there, but most times this should be possible.
+        So instead of writing an assert with cbc:ID = 'something' you should ensure that the cbc:ID is matched in the context of the rule and the
+        assert then only needs to check .='something' 
+        If the context would be a to broad match than limit it using predicates with a parent match like cbc:ID[parent::cac:TaxScheme]
+        
+        TODO: 
+            - Add calculation rules for going from taxamount to transactioncurrencyamount
+            - Fix PEPPOL and BII rules to ensure that they target the proper context to facilitate easier pinpointing of problems
+            - Fix BII rules for payable amounts calculation 
+                        - doesn't work when prepaid is filled, but payable amounts is still the same
+                        - doesn't check payable rounding amounts correctly
+            - Add warnings for elements not in the core
+            - Decide whether or not multiple occurences of items that have macoccur of 1 should be fatal or warning
+    -->
+    <title>Simplerinvoicing invoice v1.1 bound to UBL 2.1 and OPENPEPPOL v2</title>
+    <ns prefix="cbc" uri="urn:oasis:names:specification:ubl:schema:xsd:CommonBasicComponents-2"/>
+    <ns prefix="cac" uri="urn:oasis:names:specification:ubl:schema:xsd:CommonAggregateComponents-2"/>
+    <ns prefix="ubl" uri="urn:oasis:names:specification:ubl:schema:xsd:Invoice-2"/>
+
+    <phase id="invoice_phase">
+        <active pattern="BII-UBL-T10"/>
+        <active pattern="PEPPOL-UBL-T10"/>
+        <active pattern="SI-V11-INV"/>
+    </phase>
+    <phase id="codelist_phase">
+        <active pattern="BII-CodesT10"/>
+        <active pattern="PEPPOL-CodesT10"/>
+        <active pattern="SI-V11-CODES"/>
+    </phase>
+    <phase id="warning_phase">
+        <active pattern="SI-V11-INV-WARNING"/>
+    </phase>
+    <phase id="simplerinvoicing_compatibility_phase">
+        <active pattern="SI-V10-INV-FATAL"/>
+        <active pattern="SI-V10-INV-WARNING"/>
+    </phase>
+
+    <!-- basic version-independent checks -->
+    <include href="general/SI-UBL-GENERAL.SCH" />
+
+    <!-- SimplerInvoicing Version 1.1 -->
+
+    <include href="v1.1/BII/abstract/BIIRULES-T10.sch"/>
+    <include href="v1.1/BII/UBL/BIIRULES-UBL-T10.sch"/>
+    <include href="v1.1/BII/codelist/BIIRULESCodesT10-UBL.sch"/>
+    
+    <!-- PEPPOL patterns -->
+    <include href="v1.1/PEPPOL/abstract/OPENPEPPOL-T10.sch"/>
+    <include href="v1.1/PEPPOL/UBL/OPENPEPPOL-UBL-T10.sch"/>
+    <include href="v1.1/PEPPOL/codelist/OPENPEPPOLCodesT10-UBL.sch"/>
+	
+    <!-- and SI itself -->
+    <include href="v1.1/SI-UBL-INV-V11-WARNING.SCH" />
+    <include href="v1.1/SI-UBL-INV-V11-FATAL.SCH" />
+    <include href="v1.1/SI-UBL-INV-V11-Codes.SCH" />
+    
+
+    <!-- SimplerInvoicing Version 1.0 -->
+    <include href="v1.0/SI-UBL-INV-V10-FATAL.SCH"/>
+    <include href="v1.0/SI-UBL-INV-V10-WARNING.SCH"/>
+
+    <include href="v1.0/biirules/abstract/BIIRULES-T10.sch"/>
+    <include href="v1.0/biirules/UBL/BIIRULES-UBL-T10.sch"/>
+</schema>

data/spec/schema/open_peppol/SI-UBL-INV.SCH

@@ -0,0 +1,88 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<schema xmlns:cbc="urn:oasis:names:specification:ubl:schema:xsd:CommonBasicComponents-2" xmlns:cac="urn:oasis:names:specification:ubl:schema:xsd:CommonAggregateComponents-2" xmlns:ubl="urn:oasis:names:specification:ubl:schema:xsd:Invoice-2" queryBinding="xslt" xmlns="http://purl.oclc.org/dsdl/schematron">
+    <!--
+        Release 1.1.1
+        Author: Jelte Jansen (SIDN Labs)
+        Changes since 1.1:
+        - SI-UBL version detection is now based on CustomizationID instead of UBLVersion
+        - Split up schematron tree into versions (v1.0 and v1.1)
+        - Added UBL Business rules to v1.0 checker
+
+        Release 1.1
+        Author: M.P. Diepstra (Innopay) 
+        Email: support@simplerinvoicing.org
+
+        Usable XPath statements for getting insight into Schematron file:
+        //rule[@context=preceding-sibling::rule/@context]      - - - > Gets all rules that might not get fired because they have the same context as previous rules
+        max(//assert/substring-before(text(), ']'))   - - - > Gets the maximum number of the current error numbering in the rule set
+        //assert[@flag='fatal' or (not(@flag) and parent::rule/@flag='fatal')]    - - - > Gets all asserts that are flagged 'fatal'
+        //assert[not(@flag) or @flag != parent::rule/@flag] - - - > Gets all asserts where the flag differs from the rule flag 
+
+        Development comments:
+        To facilitate developers of invoicing software, the rules should point to the actual elements that are giving the problem. Sometimes this
+        is not possible, like when the element is required but it's not there, but most times this should be possible.
+        So instead of writing an assert with cbc:ID = 'something' you should ensure that the cbc:ID is matched in the context of the rule and the
+        assert then only needs to check .='something' 
+        If the context would be a to broad match than limit it using predicates with a parent match like cbc:ID[parent::cac:TaxScheme]
+        
+        TODO: 
+            - Add calculation rules for going from taxamount to transactioncurrencyamount
+            - Fix PEPPOL and BII rules to ensure that they target the proper context to facilitate easier pinpointing of problems
+            - Fix BII rules for payable amounts calculation 
+                        - doesn't work when prepaid is filled, but payable amounts is still the same
+                        - doesn't check payable rounding amounts correctly
+            - Add warnings for elements not in the core
+            - Decide whether or not multiple occurences of items that have macoccur of 1 should be fatal or warning
+    -->
+    <title>Simplerinvoicing invoice v1.1 bound to UBL 2.1 and OPENPEPPOL v2</title>
+    <ns prefix="cbc" uri="urn:oasis:names:specification:ubl:schema:xsd:CommonBasicComponents-2"/>
+    <ns prefix="cac" uri="urn:oasis:names:specification:ubl:schema:xsd:CommonAggregateComponents-2"/>
+    <ns prefix="ubl" uri="urn:oasis:names:specification:ubl:schema:xsd:Invoice-2"/>
+
+    <phase id="invoice_phase">
+        <active pattern="BII-UBL-T10"/>
+        <active pattern="PEPPOL-UBL-T10"/>
+        <active pattern="SI-V11-INV"/>
+    </phase>
+    <phase id="codelist_phase">
+        <active pattern="BII-CodesT10"/>
+        <active pattern="PEPPOL-CodesT10"/>
+        <active pattern="SI-V11-CODES"/>
+    </phase>
+    <phase id="warning_phase">
+        <active pattern="SI-V11-INV-WARNING"/>
+    </phase>
+    <phase id="simplerinvoicing_compatibility_phase">
+        <active pattern="SI-V10-INV-FATAL"/>
+        <active pattern="SI-V10-INV-WARNING"/>
+    </phase>
+
+    <!-- basic version-independent checks -->
+    <include href="general/SI-UBL-GENERAL.SCH" />
+
+    <!-- SimplerInvoicing Version 1.1 -->
+
+    <include href="v1.1/BII/abstract/BIIRULES-T10.sch"/>
+    <include href="v1.1/BII/UBL/BIIRULES-UBL-T10.sch"/>
+    <include href="v1.1/BII/codelist/BIIRULESCodesT10-UBL.sch"/>
+    
+    <!-- PEPPOL patterns -->
+    <include href="v1.1/PEPPOL/abstract/OPENPEPPOL-T10.sch"/>
+    <include href="v1.1/PEPPOL/UBL/OPENPEPPOL-UBL-T10.sch"/>
+    <include href="v1.1/PEPPOL/codelist/OPENPEPPOLCodesT10-UBL.sch"/>
+	
+    <!-- and SI itself -->
+    <include href="v1.1/SI-UBL-INV-V11-WARNING.SCH" />
+    <include href="v1.1/SI-UBL-INV-V11-FATAL.SCH" />
+    <include href="v1.1/SI-UBL-INV-V11-Codes.SCH" />
+    
+
+    <!-- SimplerInvoicing Version 1.0 -->
+    <include href="v1.0/SI-UBL-INV-V10-FATAL.SCH"/>
+    <include href="v1.0/SI-UBL-INV-V10-WARNING.SCH"/>
+
+<!-- Uncomment this to enable BII content checks on SI-UBL 1.0 documents
+    <include href="v1.0/biirules/abstract/BIIRULES-T10.sch"/>
+    <include href="v1.0/biirules/UBL/BIIRULES-UBL-T10.sch"/>
+-->
+</schema>

data/spec/schema/open_peppol/convert/iso_abstract_expand.xsl

@@ -0,0 +1,297 @@
+<?xml version="1.0" encoding="UTF-8"?><?xar XSLT?>
+
+<!-- 
+     OVERVIEW - iso_abstract_expand.xsl
+     
+	    This is a preprocessor for ISO Schematron, which implements abstract patterns. 
+	    It also 
+	       	* extracts a particular schema using an ID, where there are multiple 
+	    schemas, such as when they are embedded in the same NVDL script 
+	    	* experimentally, allows parameter recognition and substitution inside
+	    	text as well as @context, @test, & @select.
+		
+		
+		This should be used after iso-dsdl-include.xsl and before the skeleton or
+		meta-stylesheet (e.g. iso-svrl.xsl) . It only requires XSLT 1.
+		 
+		Each kind of inclusion can be turned off (or on) on the command line.
+		 
+-->
+<!-- 
+  VERSION INFORMATION
+  2008-09-18 RJ
+  		* move out param test from iso:schema template  to work with XSLT 1. (Noah Fontes)
+  		
+  2008-07-29 RJ 
+  		* Create.  Pull out as distinct XSL in its own namespace from old iso_pre_pro.xsl
+  		* Put everything in private namespace
+  		* Rewrite replace_substring named template so that copyright is clear
+  	
+  2008-07-24 RJ
+       * correct abstract patterns so for correct names: param/@name and
+     param/@value
+    
+  2007-01-12  RJ 
+     * Use ISO namespace
+     * Use pattern/@id not  pattern/@name 
+     * Add Oliver Becker's suggests from old Schematron-love-in list for <copy> 
+     * Add XT -ism?
+  2003 RJ
+     * Original written for old namespace
+     * http://www.topologi.com/resources/iso-pre-pro.xsl
+-->	
+<!--
+ LEGAL INFORMATION
+ 
+ Copyright (c) 2000-2008 Rick Jelliffe and Academia Sinica Computing Center, Taiwan
+
+ This software is provided 'as-is', without any express or implied warranty. 
+ In no event will the authors be held liable for any damages arising from 
+ the use of this software.
+
+ Permission is granted to anyone to use this software for any purpose, 
+ including commercial applications, and to alter it and redistribute it freely,
+ subject to the following restrictions:
+
+ 1. The origin of this software must not be misrepresented; you must not claim
+ that you wrote the original software. If you use this software in a product, 
+ an acknowledgment in the product documentation would be appreciated but is 
+ not required.
+
+ 2. Altered source versions must be plainly marked as such, and must not be 
+ misrepresented as being the original software.
+
+ 3. This notice may not be removed or altered from any source distribution.
+-->
+<xslt:stylesheet version="1.0" xmlns:xslt="http://www.w3.org/1999/XSL/Transform" 
+	xmlns:xsl="http://www.w3.org/1999/XSL/Transform" 
+    xmlns:iso="http://purl.oclc.org/dsdl/schematron"  
+    xmlns:nvdl="http://purl.oclc.org/dsdl/nvdl"  
+    
+    xmlns:iae="http://www.schematron.com/namespace/iae" 
+     
+      >
+	
+	<xslt:param name="schema-id"></xslt:param>
+	
+	
+	<!-- Driver for the mode -->
+	<xsl:template match="/">
+  		<xsl:apply-templates select="." mode="iae:go" />
+	</xsl:template> 
+	
+	
+	<!-- ================================================================================== -->
+	<!-- Normal processing rules                                                            -->
+	<!-- ================================================================================== -->
+	<!-- Output only the selected schema --> 
+	<xslt:template match="iso:schema" >
+	    <xsl:if test="string-length($schema-id) =0 or @id= $schema-id ">
+	    	<xslt:copy>
+				<xslt:copy-of select="@*" />
+				<xslt:apply-templates  mode="iae:go" /> 
+			</xslt:copy>
+		</xsl:if>
+	</xslt:template>
+	
+ 
+	<!-- Strip out any foreign elements above the Schematron schema .
+		-->
+	<xslt:template match="*[not(ancestor-or-self::iso:*)]"     mode="iae:go"  >
+	   <xslt:apply-templates  mode="iae:go" />
+	</xslt:template>
+	   
+	
+	<!-- ================================================================================== -->
+	<!-- Handle Schematron abstract pattern preprocessing                                   -->
+	<!-- abstract-to-real calls
+			do-pattern calls 
+				macro-expand calls 
+					multi-macro-expand
+						replace-substring                                                   -->
+	<!-- ================================================================================== -->
+	
+	<!--
+		Abstract patterns allow you to say, for example
+		
+		<pattern name="htmlTable" is-a="table">
+			<param name="row" value="html:tr"/>
+			<param name="cell" value="html:td" />
+			<param name="table" value="html:table" />
+		</pattern>
+		
+		For a good introduction, see Uche Ogbujii's article for IBM DeveloperWorks
+		"Discover the flexibility of Schematron abstract patterns"
+		  http://www-128.ibm.com/developerworks/xml/library/x-stron.html
+		However, note that ISO Schematron uses @name and @value attributes on
+		the iso:param element, and @id not @name on the pattern element.
+		
+	-->
+	
+	<!-- Suppress declarations of abstract patterns -->
+	<xslt:template match="iso:pattern[@abstract='true']"  mode="iae:go"  >
+		<xslt:comment>Suppressed abstract pattern <xslt:value-of select="@id"/> was here</xslt:comment>	
+	</xslt:template> 
+	
+	
+	<!-- Suppress uses of abstract patterns -->
+	<xslt:template match="iso:pattern[@is-a]"  mode="iae:go" >
+			
+		<xslt:comment>Start pattern based on abstract <xslt:value-of select="@is-a"/></xslt:comment>
+		
+		<xslt:call-template name="iae:abstract-to-real" >
+			<xslt:with-param name="caller" select="@id" />
+			<xslt:with-param name="is-a" select="@is-a" />
+		</xslt:call-template>
+			
+	</xslt:template>
+	 
+	 
+	
+	<!-- output everything else unchanged -->
+	<xslt:template match="*" priority="-1"  mode="iae:go" >
+	    <xslt:copy>
+			<xslt:copy-of select="@*" />
+			<xslt:apply-templates mode="iae:go"/> 
+		</xslt:copy>
+	</xslt:template>
+	
+	<!-- Templates for macro expansion of abstract patterns -->
+	<!-- Sets up the initial conditions for the recursive call -->
+	<xslt:template name="iae:macro-expand">
+		<xslt:param name="caller"/>
+		<xslt:param name="text" />
+		<xslt:call-template name="iae:multi-macro-expand">
+			<xslt:with-param name="caller" select="$caller"/>
+			<xslt:with-param name="text" select="$text"/>
+			<xslt:with-param name="paramNumber" select="1"/>
+		</xslt:call-template>
+		
+	</xslt:template>
+	
+	<!-- Template to replace the current parameter and then
+	   recurse to replace subsequent parameters. -->
+	    
+	<xslt:template name="iae:multi-macro-expand">
+		<xslt:param name="caller"/>
+		<xslt:param name="text" />
+		<xslt:param name="paramNumber" />
+
+		
+		<xslt:choose>
+			<xslt:when test="//iso:pattern[@id=$caller]/iso:param[ $paramNumber]">
+
+				<xslt:call-template name="iae:multi-macro-expand">
+					<xslt:with-param name="caller" select="$caller"/>	
+					<xslt:with-param name="paramNumber" select="$paramNumber + 1"/>		
+					<xslt:with-param name="text" >
+						<xslt:call-template name="iae:replace-substring">
+							<xslt:with-param name="original" select="$text"/>
+							<xslt:with-param name="substring"
+							select="concat('$', //iso:pattern[@id=$caller]/iso:param[ $paramNumber ]/@name)"/>
+							<xslt:with-param name="replacement"
+								select="//iso:pattern[@id=$caller]/iso:param[ $paramNumber ]/@value"/>			
+						</xslt:call-template>
+					</xslt:with-param>						
+				</xslt:call-template>
+			</xslt:when>
+			<xslt:otherwise><xslt:value-of select="$text" /></xslt:otherwise>		
+		
+		</xslt:choose>
+	</xslt:template>
+	
+	
+	<!-- generate the real pattern from an abstract pattern + parameters-->
+	<xslt:template name="iae:abstract-to-real" >
+		<xslt:param name="caller"/>
+		<xslt:param name="is-a" />
+		<xslt:for-each select="//iso:pattern[@id= $is-a]">
+		<xslt:copy>
+		
+		    <xslt:choose>
+		      <xslt:when test=" string-length( $caller ) = 0">
+		      <xslt:attribute name="id"><xslt:value-of select="concat( generate-id(.) , $is-a)" /></xslt:attribute>
+		      </xslt:when>
+		      <xslt:otherwise>
+				<xslt:attribute name="id"><xslt:value-of select="$caller" /></xslt:attribute>
+		      </xslt:otherwise>
+		    </xslt:choose> 
+			
+			<xslt:apply-templates select="*|text()" mode="iae:do-pattern"    >
+				<xslt:with-param name="caller"><xslt:value-of select="$caller"/></xslt:with-param>
+			</xslt:apply-templates>	
+			
+		</xslt:copy>
+		</xslt:for-each>
+	</xslt:template>
+		
+	
+	<!-- Generate a non-abstract pattern -->
+	<xslt:template mode="iae:do-pattern" match="*">
+		<xslt:param name="caller"/>
+		<xslt:copy>
+			<xslt:for-each select="@*[name()='test' or name()='context' or name()='select']">
+				<xslt:attribute name="{name()}">
+				<xslt:call-template name="iae:macro-expand">
+						<xslt:with-param name="text"><xslt:value-of select="."/></xslt:with-param>
+						<xslt:with-param name="caller"><xslt:value-of select="$caller"/></xslt:with-param>
+					</xslt:call-template>
+				</xslt:attribute>
+			</xslt:for-each>	
+			<xslt:copy-of select="@*[name()!='test'][name()!='context'][name()!='select']" />
+			<xsl:for-each select="node()">
+				<xsl:choose>
+				    <!-- Experiment: replace macros in text as well, to allow parameterized assertions
+				        and so on, without having to have spurious <iso:value-of> calls and multiple
+				        delimiting -->
+					<xsl:when test="self::text()">	
+						<xslt:call-template name="iae:macro-expand">
+							<xslt:with-param name="text"><xslt:value-of select="."/></xslt:with-param>
+							<xslt:with-param name="caller"><xslt:value-of select="$caller"/></xslt:with-param>
+						</xslt:call-template>
+					</xsl:when>
+					<xsl:otherwise>
+						<xslt:apply-templates select="." mode="iae:do-pattern">
+							<xslt:with-param name="caller"><xslt:value-of select="$caller"/></xslt:with-param>
+						</xslt:apply-templates>		
+					</xsl:otherwise>
+				</xsl:choose>
+			</xsl:for-each>			
+		</xslt:copy>
+	</xslt:template>
+	
+	<!-- UTILITIES --> 
+	<!-- Simple version of replace-substring function -->
+	<xslt:template name="iae:replace-substring">
+		<xslt:param name="original" />    
+		<xslt:param name="substring" />   
+		<xslt:param name="replacement" select="''"/>
+		
+  <xsl:choose>
+    <xsl:when test="not($original)" /> 
+    <xsl:when test="not(string($substring))">
+      <xsl:value-of select="$original" />
+    </xsl:when> 
+        <xsl:when test="contains($original, $substring)">
+          <xsl:variable name="before" select="substring-before($original, $substring)" />
+          <xsl:variable name="after" select="substring-after($original, $substring)" />
+          
+          <xsl:value-of select="$before" />
+          <xsl:value-of select="$replacement" />
+          <!-- recursion -->
+          <xsl:call-template name="iae:replace-substring">
+            <xsl:with-param name="original" select="$after" />
+            <xsl:with-param name="substring" select="$substring" />
+            <xsl:with-param name="replacement" select="$replacement" /> 
+            </xsl:call-template>
+        </xsl:when>
+        <xsl:otherwise>
+        	<!-- no substitution -->
+        	<xsl:value-of select="$original" />
+        </xsl:otherwise>
+      </xsl:choose> 
+</xslt:template>
+
+
+
+</xslt:stylesheet>