WSDKを使ったExcel(XMLスプレッドシート)の取り込み

ここでは、Excelのデータ形式の1つであるXMLスプレッドシートをWSDKを使用し読み込む際のtipsを紹介いたします。

WSDKを使用したXML解析で、パス表現を使って要素を抽出したいときは、下記のように要素を抽出します。

{XDMElement.search “タグ名”}

該当するXMLに名前空間がつけられていると、単純に名前のみではパスの認識ができません。（下記のXML参照）
XMLが名前空間を含んでいる場合はひと手間加える必要があります。

{XDMElement.search “名前空間:タグ名”}

ただし、単純に上記のように検索を行うと「XDMException: No declaration for prefix ‘名前空間’」

という例外が出てしまいます。

そこで、名前空間を検索前に認識させる必要が出てきます。（名前空間認識プロシージャを参照）

名前空間を持ったXML(Book2.xml)

名前空間認識プロシージャ

{define-proc {dwim-prefix-declarations
                 subject:XDMElement,
                 context:XDMNamespaceContext = xml-namespace-context
             }:void
    {subject.walk-children
        || walk descendants and self
        include-self? = true,
        include-descendants? = true,
        {proc {n:XDMNode}:bool
            {type-switch n
             case e:XDMElement do
                || check declared prefixes
                {if-non-null ps = e.namespace-declarations then
                    {for p in {ps.get-prefixes} do
                        {if-non-null ns = {ps.get-uri p} then
                            {if {context.get-uri p} == null
                             then
                                || extend global declarations accordingly
                                {context.declare-prefix? p, ns}}}}}}
            || continue walking
            {return true}}}
}

例

{value
    let loc:Url = {url “TESTDATA/Book2.xml”}
    ||XMLdocumentModelエレメント
    let xml:XDMElement =
        {build-xml preserve-whitespace? = false, loc}.root

    ||名前空間認識
    {dwim-prefix-declarations xml}
    let worksheets:XDMNodeSet = {xml.search “ss:Styles”}
    {output worksheets.size}
}