我想在XQuery中格式化小数。小数点是货币,所以格式应该是,###.##
。如何格式化xquery中的小数?
例如:
5573652.23
应该5,573,652.23
和
352769
应352,769
(或352,769.00
如果它更容易/清洁剂)
现在,我使用这个函数http://www.xqueryhacker.com/2009/09/format-number-in-xquery/,但我不能用小数:
declare function local:format-int($i as xs:int) as xs:string
{
let $input :=
if ($i lt 0) then fn:substring(fn:string($i), 2)
else fn:string($i)
let $rev := fn:reverse(fn:string-to-codepoints(fn:string($input)))
let $comma := fn:string-to-codepoints(',')
let $chars :=
for $c at $i in $rev
return (
$c,
if ($i mod 3 eq 0 and fn:not($i eq count($rev)))
then $comma else()
)
return fn:concat(
if ($i lt 0) then '-' else(),
fn:codepoints-to-string(fn:reverse($chars))
)
};
我为我的处理器使用了Saxon 9HE。
任何帮助将不胜感激。
----- ----- UPDATE
基于Dimitre的回答,我修改了功能,节省小数部分,并将其添加到返回字符串的结尾。
新功能
declare function local:format-dec($i as xs:decimal) as xs:string
{
let $input := tokenize(string(abs($i)),'\.')[1]
let $dec := substring(tokenize(string($i),'\.')[2],1,2)
let $rev := reverse(string-to-codepoints(string($input)))
let $comma := string-to-codepoints(',')
let $chars :=
for $c at $i in $rev
return (
$c,
if ($i mod 3 eq 0 and not($i eq count($rev)))
then $comma else()
)
return concat(if ($i lt 0) then '-' else(),
codepoints-to-string(reverse($chars)),
if ($dec != '') then concat('.',$dec) else()
)
};
问得好,+1。查看我的答案以获得完整且简短的解决方案:) – 2011-05-01 18:02:30
对于标准XPath函数,不需要使用任何名称空间前缀。如果你省略了前缀“fn:”,你的代码将更具可读性。另外,目前你的编码是不一致的:你为什么在'concat()'函数的前缀,而不是'substring()'函数的前缀? – 2011-05-02 01:35:00
@Dimitre:我通常不会前缀标准函数,但是我从上面提到的网站复制了这个函数。这是不一致的,因为我在进行修改时没有去掉前缀。我必须经过并清理它,以免混淆任何人。再次感谢。非常感激你的帮助! – 2011-05-02 01:48:16