--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/software/eXist/webapp/mpdl/interface/external/object.xql	Tue Feb 08 15:16:46 2011 +0100
@@ -0,0 +1,19 @@
+xquery version "1.0";
+
+declare namespace request="http://exist-db.org/xquery/request";
+declare namespace response="http://exist-db.org/xquery/response";
+declare namespace session="http://exist-db.org/xquery/session";
+declare namespace echo="http://www.mpiwg-berlin.mpg.de/ns/echo/1.0/";
+
+let $operation := request:get-parameter("operation", "")
+let $type := request:get-parameter("type", "")
+let $uid := request:get-parameter("uid", "")
+let $document := request:get-parameter("document", "")
+let $pn := request:get-parameter("pn", "-1")
+let $xpath := request:get-parameter("xpath", "")
+let $charPosition := request:get-parameter("charPosition", "")
+let $externalObject := request:get-parameter("externalObject", "")
+
+let $result := mpdltext:externalObject($operation, $type, $uid, $document, $pn, $xpath, $charPosition, $externalObject)
+
+return $result
\ No newline at end of file