[basex-talk] XQST0054 ?

12 Jul 2011

      Hallo !

Der Fehler XQST0054 soll aussagen: A global variable depends on itself. This may be triggered by a circular variable definition.

Nun verwende ich gar keine globale Variable.

Die Aufgabe ist einfach: Ein XML-Schema (xsd) soll geparst werden und die Abhängigkeit der Elemente (xsd:element) in eine gewünschte Darstellung gebracht werden.
Etwa so:

<XSDBaum>
  <elem name="ElNameX1" min="" max="">
    <elem name=" ElNameX2" min="0" max="1"/>
    <elem name=" ElNameX3" min="0" max="1">

Der Fehler tritt erst auf, wenn die Stelle im xml-File bearbeitet wird. Blendet man diese aus, gibt es keine Fehler-Meldung von BaseX.

Fehlermeldung mit:

      if ( name($node) = "xsd:element")
      then erg:element($root, $node)

Keine Fehlermeldung mit:

      if ( name($node) = "xsd:elementAUSBLENDEN")
      then erg:element($root, $node)

Die problemeatische Stelle im xml-File sieht in etwa folgendermaßen aus:

  <xsd:complexType name="CTName1">
    <xsd:sequence>
      <xsd:choice minOccurs="0" maxOccurs="unbounded">
        <xsd:element name="eLName1" type="ns:ELName1" minOccurs="1" maxOccurs="1" />
        <xsd:element name="eLName2" type="ns:ELName2" minOccurs="1" maxOccurs="1" />
      </xsd:choice>
      <xsd:choice minOccurs="0" maxOccurs="1">
        <xsd:element name="eLName5" type="ns:ELName5" minOccurs="1" maxOccurs="1" />
        <xsd:element name="eLName6" type="ns:ELName6" minOccurs="1" maxOccurs="1" />
      </xsd:choice>
    </xsd:sequence>
  </xsd:complexType>

Die Bearbeitung stockt demzufolge nach xsd:choice, auf die Ebene xsd:element.

Die Abfrage:

declare namespace xsd="http://www.w3.org/2001/XMLSchema";
declare namespace erg="http://www.MB.org/OTXErg";

declare function erg:next( $root , $CC)
{
            for $node in $CC
  return <ende>{$node}</ende>
};

declare function erg:all( $root , $CC)
{
            for $node in $CC/*
  return

     if ( name($node) = "xsd:element")
     then erg:element( $root , $node)

     else <endeAll>{$node}</endeAll>
};

declare function erg:getCTName( $n)
{
  let $CTNAME := substring($n/@type,5,string-length($n/@type))
  return
  $CTNAME
};

declare function erg:choice( $root , $CC)
{

  <choice  min="{$CC/@minOccurs}"  max="{$CC/@maxOccurs}">

  {

            for $node in $CC/*
  return

      if ( name($node) = "xsd:element")
      then erg:element($root, $node)

      else  <endeCC nodeName="{name($node)}"></endeCC>

   }
  </choice>

};

declare function erg:sequence( $root , $CC)
{
            for $node in $CC/*
  return

      if ( name($node) = "xsd:element")
      then erg:element( $root , $node)

      else if ( name($node) = "xsd:choice")
      then erg:choice( $root , $node)

      else if ( name($node) = "xsd:any")
      then ()

      else  <endeSEQ>{$node}</endeSEQ>

};

declare function erg:extension( $root , $CC)
{
            for $node in $CC/*
  return
      if ( name($node) = "xsd:sequence")
      then erg:sequence($root, $node)
      else if ( name($node) = "xsd:attribute")
      then ()
      else <endeEXT>{$node}</endeEXT>
};

declare function erg:complexContent( $root , $CC)
{
            for $node in $CC/*
  return if ( name($node) = "xsd:extension")
      then erg:extension($root, $node)
      else <endeCC>{$node}</endeCC>
};

declare function erg:complexType( $root , $CTName)
{
            for $node in $root/xsd:complexType[ @name=$CTName]/*
  return

      if ( name($node) = "xsd:complexContent")
      then erg:complexContent($root, $node)
      else if ( name($node) = "xsd:sequence")
      then erg:sequence($root, $node)
      else if ( name($node) = "xsd:choice")
      then erg:choice($root, $node)
      else if ( name($node) = "xsd:anyAttribute")
      then ()
      else if ( name($node) = "xsd:attribute")
      then ()
      else if ( name($node) = "xsd:attributeGroup")
      then ()

      else if ( name($node) = "xsd:all")
      then erg:all($root, $node)
      else <endeCT>{$node}</endeCT>
};

declare function erg:element( $root , $elem  )
{
  let $CTName := erg:getCTName($elem)
  return
     <elem name="{$elem/@name}" min="{$elem/@minOccurs}" max="{$elem/@maxOccurs}" >{erg:complexType( $root, $CTName)}</elem>
};

<XSDBaum>
{

let $elem := //xsd:element[@name='otx']
return
  erg:element( /* , $elem)

}
</XSDBaum>

Mit freundlichen Grüßen
Michael

[basex-talk] XQST0054 ?

Burkert, Michael