如何使用XSLT 1将负小数转换为十六进制

Question

我想使用XSLT 1.0将负小数和正十进制转换为十六进制。

这里已经有一个与此问题有关的主题，但是答案是使用XSLT 2.0给出的。

我尝试使用XSLT 1.0重现模板，但它总是返回一个空值。

    <xsl:template name="convertDecToHex">
    <xsl:param name="pInt" />
    <xsl:variable name="vMinusOneHex64"><xsl:number>18446744073709551615</xsl:number></xsl:variable>
    <xsl:variable name="vCompl">
        <xsl:choose>
            <xsl:when test="$pInt &gt; 0">
                <xsl:value-of select="$pInt" />
            </xsl:when>
            <xsl:otherwise>
                <xsl:value-of select="$vMinusOneHex64 + $pInt + 1" />
            </xsl:otherwise>
        </xsl:choose>
    </xsl:variable>
    <xsl:choose>
        <xsl:when test="vCompl = 0">
            <xsl:text>0</xsl:text>
        </xsl:when>
        <xsl:otherwise>
            <xsl:choose>
                <xsl:when test="vCompl &gt; 16">
                    <xsl:variable name="result">
                        <xsl:call-template name="convertDecToHex">
                            <xsl:with-param name="pInt" select="$vCompl div 16" />
                        </xsl:call-template>
                    </xsl:variable>
                    <xsl:value-of select="concat($result,substring('0123456789ABCDEF',($vCompl div 16) + 1,1))" />
                </xsl:when>
                <xsl:otherwise>
                    <xsl:value-of select="concat('',substring('0123456789ABCDEF',($vCompl div 16) + 1,1))" />
                </xsl:otherwise>
            </xsl:choose>
        </xsl:otherwise>
    </xsl:choose>
</xsl:template>

您能帮我工作吗？

Answer 1

将小数号转换为纯XSLT 1.0中的32位签名的十六进制：

<xsl:template name="dec2signedhex">
    <xsl:param name="decimal"/>
    <xsl:variable name="n">
        <xsl:choose>
            <xsl:when test="$decimal &lt; 0">
                <xsl:value-of select="$decimal + 4294967296"/>
            </xsl:when>
            <xsl:otherwise>
                <xsl:value-of select="$decimal"/>
            </xsl:otherwise>
        </xsl:choose>
    </xsl:variable>
    <xsl:variable name="q" select="floor($n div 16)"/>
    <xsl:if test="$q">
        <xsl:call-template name="dec2signedhex">
            <xsl:with-param name="decimal" select="$q"/>
        </xsl:call-template>
    </xsl:if>
    <xsl:value-of select="substring('0123456789ABCDEF', $n mod 16 + 1, 1)"/>
</xsl:template>