Commit 1577fc74 authored by Pietro Abate's avatar Pietro Abate

[r2004-01-21 10:08:49 by cmiachon] Empty log message

Original author: cmiachon
Date: 2004-01-21 10:08:51+00:00
parent a566f901
include "type-SEQ.cd";; (* tests/cql/SEQ/ *)
(*
In Report1,
find "Procedure" sections where no Anesthesia element occurs
before the first Incision
*)
(* In CQLp *)
select s_flat
from <report>[(s::<section>[<section.title>['Procedure'] <section.content>[(_\(Anesthesia|Incision))* Incision _*]]|_)*] in [report],
s_flat in s
(* In CQLx *)
select s
from s in [report]/<section>[<section.title>['Procedure']
<section.content>[(_\(Anesthesia|Incision))* Incision _*]] ;;
(* In XQUERY
for $p in doc("report1.xml")//section[section.title = "Procedure"]
where not(some $a in $p//anesthesia satisfies
$a << ($p//incision)[1] )
return $p
*)
This diff is collapsed.
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment