# NOT RUN {
query_txt <- "declare variable $name external; for $i in 1 to 3 return element { $name } { $i }"
query_obj <- Query(Session, query_txt)
Bind(query_obj, "$name", "number")
print(Execute(query_obj))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab