Template für das BiblioMonde-System Zones 1.8 Katalog-URL (inklusive .dll/, ohne Parameter) Katalog-Style style := get('style', 'Portal2'), accountUrl := x"{$baseurl}/APS_ZONES?fn=MyZone" (: accountUrl := x"{$baseurl}/APS_ACCOUNT?Style={$style}&SubStyle=&Theme=&Lang=GER&ResponseEncoding=utf-8&Parent=APS_OPAC&BrowseAsHloc=11" :) (: accountUrl := x"{$baseurl}/APS_ZONES?fn=MyLoans&Lang=GER" :) ordersListUrl := (), bookListUrl := (), bulkRenew := () s style := get('style', 'Portal2'), accountUrl := x"{$baseurl}/APS_ACCOUNT?fn=advancedsearch&Style={$style}&BrowseAsHloc=-2", $limit-map := {"libraryBranch": "Branch.", "libraryLocation": "scope.", "mediaType": "medium.", "language": ("publicationLang.", "Sprache.") } {"author": "au=", "title": "ti=", "free": "any=", "keywords": "su=", "isbn": "sb=", "year": "dp="} i := 1, requestId := 0, request := uri-combine($search-start.url, (for $key in jn:keys($book) where $book($key) and $search-keys($key) count $i return {x"q.form.t{$i}.expr": $book($key), x"q.form.t{$i}.term": $search-keys($key)}, for $key in jn:keys($limit-map) where $book($key) return{"q.limits.limit": $book($key)} )) search-next-page-available := $search-result-count > 0, requestId := 1, need-to-login := true() requestId := $requestId + 1 $book.home-url:=replace($book.home-url, "&View=ISBD&", "&View=Annotated&") $accountUrl := $book._order-url, $need-to-login := false() form := form-combine($confirm-form, {"MakeResTypeDef.Reservation.RecipientLocn": $choose-result, "Confirm": 1}) bFoundBottom := true() requestId := 0 requestId := 1 requestId := $requestId + 1 requestId := 0 requestId := 1 requestId := $requestId + 1 vl:raise("Keinen Verlängerungslink gefunden. Vielleicht ist das Konto gesperrt, z.B.: wegen der Jahresgebühr der Bibliothek.") renew-ids := for $book in $renew-books return ( x"item:IN={$book.id};AT={$book.author}/{$book.title}" ! (if (contains(., "'")) then (., substring-before(., "'")) else . ) ) requestId := 1 requestId := $requestId + 1 renewConfirm := form-combine($baseForm, $options) i := 0 $i := $i + 1 $cancel-url := $cancel-books[1]._cancel-url b := $cancel-books[$i], nb := $cancel-books[$i+1], if (not($cancel-url)) then vl:raise("Vormerkung nicht mehr löschbar") else () url:=x"{$baseurl}/APS_OPAC?Style=Portal2"