[xquery-talk] flowrrr - how to structure a function?

David Carlisle davidc at nag.co.uk
Tue Oct 17 12:57:35 PDT 2006


not sure that its better, but is-valid is only used once
and has quite small definitions so you don't need to declare
it, just inline the definition, which gets rid of one layer of
return that you were asking about.

declare function local:enter-project() as element()? {
     if (local:is-valid-user-for-group()) then
       let $db-ref := request:get-parameter("db-ref", ""),
           $db-instance := doc(databases.xml")/*/instance[@id=$db-ref]
       return
         (
           session:set-attribute("rest-db-uri", 
  string($db-instance/rest-uri)),
           session:set-attribute("xmlprc-db-uri", 
  string($db-instance/xmlprc-uri)),
           session:set-attribute("webdav-db-uri", 
  string($db-instance/webdav-uri)),
           session:set-attribute($project-key, $group-name),
           response:redirect-to(xs:anyURI("./project/"))
         )
     else
       <p class="warn">Could not find credentials to let you enter the 
project.</p>
};


you could get rid of the other let - return clause as well if you prefer
a more xpath style:


declare function local:enter-project() as element()? {
     if (local:is-valid-user-for-group()) then
      doc(databases.xml")/*/instance[@id=request:get-parameter("db-ref", "")]/
         (
           session:set-attribute("rest-db-uri",  string(rest-uri)),
           session:set-attribute("xmlprc-db-uri", string(xmlprc-uri)),
           session:set-attribute("webdav-db-uri", string(webdav-uri)),
           session:set-attribute($project-key, $group-name),
           response:redirect-to(xs:anyURI("./project/"))
         )
     else
       <p class="warn">Could not find credentials to let you enter the 
project.</p>
};




David


More information about the talk mailing list