%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /data/bordel/scanned/
Upload File :
Create Path :
Current File : //data/bordel/scanned/transform2.xsl

<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
  <xsl:template name="ConvertHexToDec">
  <xsl:param name="input-string" select=" '' "/>
  <xsl:param name="result" select="0" />
  <xsl:choose>
      <xsl:when test="$input-string = ''">
        <xsl:value-of select="$result" />
      </xsl:when>
      <xsl:otherwise>
        <xsl:variable name="digit" select="substring($input-string, 1, 1)" />
        <xsl:variable name="rest" select="substring($input-string, 2)" />
        <xsl:choose>
          <xsl:when test="$digit = '0'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = '1'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 1"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = '2'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 2"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = '3'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 3"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = '4'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 4"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = '5'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 5"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = '6'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 6"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = '7'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 7"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = '8'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 8"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = '9'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 9"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = 'A'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 10"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = 'B'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 11"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = 'C'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 12"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = 'D'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 13"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = 'E'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 14"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:when test="$digit = 'F'">
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="result" select="$result * 16 + 15"/>
              <xsl:with-param name="input-string" select="$rest"/>
            </xsl:call-template>
          </xsl:when>
          <xsl:otherwise>
            <xsl:text>bad hex digit</xsl:text>
            <xsl:value-of select="$digit"/>
            <xsl:text>found at:</xsl:text>
            <xsl:value-of select="$input-string" />
          </xsl:otherwise>
        </xsl:choose>
      </xsl:otherwise>
    </xsl:choose>
  </xsl:template>
  <xsl:template match="/">
    <source>
      <xsl:for-each select="output/radek">
        <row>
          <name>
            <xsl:value-of select="jmeno"/>
          </name>
          <value>
            <xsl:call-template name="ConvertHexToDec">
              <xsl:with-param name="input-string">
                <xsl:value-of select="string(hodnota)"/>
              </xsl:with-param>
            </xsl:call-template>
          </value>
        </row>
      </xsl:for-each>
    </source>
  </xsl:template>
</xsl:stylesheet>

Zerion Mini Shell 1.0