declare xmlspace preserve;
let $newline := "
",
$result := (document("tab.xml")/result)
  return
    (<table>
{for $x in ($result/row)
      return (<tr>{
        for $y in ($x/fld1) return (<td><b>{$y/child::node()}</b></td>),
        for $y in ($x/fld2) return (<td>{(100,$y/child::node())}</td>)}</tr>,
        $newline)
}</table>,$newline)
