{"id":611,"date":"2012-04-07T16:43:01","date_gmt":"2012-04-07T14:43:01","guid":{"rendered":"http:\/\/hasselba.ch\/blog\/?p=611"},"modified":"2012-04-09T01:01:14","modified_gmt":"2012-04-08T23:01:14","slug":"lotusscript-in-xpages-1-basics","status":"publish","type":"post","link":"https:\/\/hasselba.ch\/blog\/?p=611","title":{"rendered":"LotusScript in XPages (1): Basics"},"content":{"rendered":"

LotusScript in XPages<\/h2>\n
Dies ist der erste Teil des Artikels „LotusScript in XPages“. Der zweite Teil befindet sich hier<\/a>.<\/address>\n

 <\/p>\n

W\u00e4re es nicht sch\u00f6n, wenn man in XPages direkt mit Lotus Script arbeiten k\u00f6nnte? Wenn es einen Weg g\u00e4be, mit der sich Lotus Script-Code direkt in der XPage einbetten liesse, und wie folgt zu verwenden w\u00e4re?<\/p>\n

\"\"<\/p>\n

Prinzipiell ist das m\u00f6glich, aber der hier dargestellte Weg ist eher als Workaround anzusehen und wird das Alpha-Stadium wohl eher nicht verlassen. Aber es l\u00e4sst sich anhand dieser Anleitung zeigen, wie man XPages flexibel erweitern und weitere Interpreter-Sprachen der XPages-Engine hinzuf\u00fcgen kann.<\/p>\n

Was mit der hier vorgestellten L\u00f6sung jedoch m\u00f6glich ist, kann man in dieser kleinen Beispiel-XPage sehen:<\/p>\n

<?xml version=\"1.0\" encoding=\"UTF-8\"?>\r\n<xp:view xmlns:xp=\"http:\/\/www.ibm.com\/xsp\/core\">\r\n\r\n   <xp:label id=\"label1\">\r\n      <xp:this.value>\r\n         <![CDATA[#{lotusscript<\/strong>:returnValue=-1 }]]>\r\n      <\/xp:this.value>\r\n   <\/xp:label>\r\n\u00a0\u00a0 <xp:br\/>\r\n   <xp:br\/>\r\n   <xp:label id=\"label2\">\r\n      <xp:this.value><![CDATA[${lotusscript<\/strong>:\r\n         Dim session as New NotesSession\r\n         Dim db as NotesDatabase\r\n         Set db = session.CurrentDatabase\r\n\r\n         returnValue = db.AllDocuments.getFirstDocument.UniversalID\r\n      }]]><\/xp:this.value>\r\n   <\/xp:label>\r\n<\/xp:view><\/pre>\n
In der XPage kann der neue Tag „lotusscript:<\/em>“ verwendet und beliebiger LotusScript-Code direkt in die XPage eingebettet werden. Das Ergebnis im Browser sieht dann wie folgt aus:<\/p>\n
\"\"<\/p>\n
Soviel vorab, nun zu erst einmal zu den Basics…<\/p>\n
Grundlagen: Method-Bindings & Value-Bindings<\/h2>\n
Um einen neuen Tag f\u00fcr XPages bereitzustellen, m\u00fcssen zu aller erst Bindings f\u00fcr Methoden- und f\u00fcr Werte-Zuweisungen erstellt werden. Die beiden Binding-Arten unterscheiden sich – grob formuliert* – wie folgt: Value-Bindings werden \u00fcberall dort verwendet, wo ein Wert einer Komponente zugewiesen wird und (wie der Name erahnen l\u00e4sst) eine value<\/em>-Eigenschaft exitsiert. Dies ist bei praktisch allen UIKomponenten der Fall. Method-Bindings hingegen kommen bei der Zuweisung bei samtlichen Events ins Spiel: Der SSJS-Code eines BeforePageLoad<\/em>-Events wird mit einem Method-Binding gesetzt, oder der Code bei Button-Events usw.<\/p>\n
Die Value-Binding-Klasse, die f\u00fcr die hier geschilderten Zwecke ben\u00f6tigt wird, sieht wie folgt aus:<\/p>\n
package ch.hasselba.xpages.jsf.el;\r\n\r\nimport com.ibm.xsp.binding.ValueBindingEx;\r\nimport javax.faces.context.FacesContext;\r\nimport javax.faces.el.EvaluationException;\r\nimport javax.faces.el.PropertyNotFoundException;\r\n\r\npublic class LSValueBinding extends ValueBindingEx {\r\n\u00a0\u00a0 \u00a0private String data;\r\n\r\n\u00a0\u00a0 \u00a0public LSValueBinding(String data) {\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0this.data = data;\r\n\u00a0\u00a0 \u00a0}\r\n\r\n\u00a0\u00a0 \u00a0@Override\r\n\u00a0\u00a0 \u00a0public Object getValue(FacesContext context)\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0throws EvaluationException, PropertyNotFoundException {\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0return LSExecutor.execLotusScriptCode( this.data );\r\n\u00a0\u00a0 \u00a0}\r\n\r\n\u00a0\u00a0 \u00a0@Override\r\n\u00a0\u00a0 \u00a0public void setValue(FacesContext context, Object obj)\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 throws EvaluationException, PropertyNotFoundException {}\r\n\r\n\u00a0\u00a0 \u00a0@Override\r\n\u00a0\u00a0 \u00a0public boolean isReadOnly(FacesContext context)\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0throws EvaluationException, PropertyNotFoundException {\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0return true;\r\n\u00a0\u00a0 \u00a0}\r\n\r\n\u00a0\u00a0 \u00a0@SuppressWarnings(\"unchecked\")\r\n\u00a0\u00a0 \u00a0@Override\r\n\u00a0\u00a0 \u00a0public Class getType(FacesContext context)\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0throws EvaluationException, PropertyNotFoundException {\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0return Object.class;\r\n\u00a0\u00a0 \u00a0}\r\n}<\/pre>\n
Das Value-Binding erweitert die Klasse com.ibm.xsp.binding.ValueBindingEx<\/em> und \u00fcberschreibt deren Eigenschaften, wo es n\u00f6tig ist. Im Konstruktor der Klasse findet die Wertezuweisung statt; es wird hier der Teil, der in der XPage nach dem „lotusscript:<\/em>“ folgt, \u00fcbergeben. Auch mehrzeiliger Code in der XPage wird als einfacher String durchgereicht, getrennt durch Zeilenumbr\u00fcche.<\/p>\n
Um an den Wert des Bindings zu gelangen, wird w\u00e4hrend der Verarbeitung durch das JSF Framework die Methode getValue()<\/em> aufgerufen; dies ist die Stelle, an der die Daten des Value-Bindings verarbeitet werden, und wie man hier sehen kann, findet der Aufruf des LotusScript-Codes genau an dieser Stelle statt.<\/p>\n
Das notwendige Method-Binding ist so \u00e4hnlich aufgebaut:<\/p>\n
package ch.hasselba.xpages.jsf.el;\r\n\r\nimport com.ibm.xsp.binding.MethodBindingEx;\r\nimport javax.faces.context.FacesContext;\r\nimport javax.faces.el.EvaluationException;\r\nimport javax.faces.el.MethodNotFoundException;\r\n\r\npublic class LSMethodBinding extends MethodBindingEx {\r\n\u00a0\u00a0 \u00a0private String data;\r\n\r\n\u00a0\u00a0 \u00a0public LSMethodBinding () {\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0super();\r\n\u00a0\u00a0 \u00a0}\r\n\r\n\u00a0\u00a0 \u00a0public LSMethodBinding (String expr) {\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0super();\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0this.data = expr;\r\n\u00a0\u00a0 \u00a0}\r\n\r\n\u00a0\u00a0 \u00a0@Override\r\n\u00a0\u00a0 \u00a0public Object invoke(FacesContext context, Object[] obj)\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0throws EvaluationException, MethodNotFoundException {\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0return LSExecutor.execLotusScriptCode( this.data );\r\n\u00a0\u00a0 \u00a0}\r\n\u00a0\u00a0 \u00a0@SuppressWarnings(\"unchecked\")\r\n\u00a0\u00a0 \u00a0@Override\r\n\u00a0\u00a0 \u00a0public Class getType(FacesContext context)\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0throws MethodNotFoundException {\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0return null;\r\n\u00a0\u00a0 \u00a0}\r\n}<\/pre>\n
Hier wird wie Klasse com.ibm.xsp.binding.MethodBindingEx<\/em> erweitert und – wenn n\u00f6tig – \u00fcberschrieben. Anders als beim Value-Binding erfolgt der „Abruf“ der Daten eines Method-Bindings durch das JSF Framework nicht durch getValue()<\/em>, sondern durch die Methode invoke()<\/em>. Hierbei k\u00f6nnen theoretisch noch Parameter \u00fcbergeben werden, die f\u00fcr die Verarbeitung relevant sein k\u00f6nnten. In diesem Fall kann dies aber getrost ignoriert werden.<\/p>\n
Zu guter Letzt m\u00fcssen die beiden Bindings in eine BindingFactory<\/em>-Klasse zusammen gef\u00fchrt und mit dem „lotusscript<\/em>„-Tag verbunden werden:<\/p>\n
package ch.hasselba.xpages.jsf.el;\r\n\r\nimport com.ibm.xsp.util.ValueBindingUtil;\r\nimport com.ibm.xsp.binding.BindingFactory;\r\nimport javax.faces.application.Application;\r\nimport javax.faces.el.MethodBinding;\r\nimport javax.faces.el.ValueBinding;\r\n\r\npublic class LSBindingFactory implements BindingFactory {\r\n\r\n\u00a0\u00a0 \u00a0public String getPrefix() {\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0return \"lotusscript\";\r\n\u00a0\u00a0 \u00a0}\r\n\r\n\u00a0\u00a0 \u00a0@SuppressWarnings(\"unchecked\")\r\n\u00a0\u00a0 \u00a0public MethodBinding createMethodBinding(\r\n         Application app, String expr, Class[] obj) {\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0String script = ValueBindingUtil.parseSimpleExpression(expr);\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0return new LSMethodBinding(script);\r\n\u00a0\u00a0 \u00a0}\r\n\r\n\u00a0\u00a0 \u00a0public ValueBinding createValueBinding(Application app, String expr) {\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0String script = ValueBindingUtil.parseSimpleExpression( expr );\r\n\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0return new LSValueBinding(script);\r\n\u00a0\u00a0 \u00a0}\r\n}<\/pre>\n
Die Klasse erweitert com.ibm.xsp.binding.BindingFactory<\/em> und ist die „Weiterleitung“ innerhalb des JSF-Frameworks: Die Methode getPrefix()<\/em> liefert den String zur\u00fcck, f\u00fcr den diese BindingFactory zust\u00e4ndig ist; es ist praktisch jeder Bezeichner verwendbar, nur id<\/em> und javascript<\/em> sind bereits belegt.<\/p>\n
W\u00e4hrend der Verarbeitung der Bindings sucht das JSF-Framework zur Laufzeit nach der passenden Factory. Dabei werden alle bekannten Factories nach dem passenden Prefix durchsucht, weshalb die BindingFactory dem Framework noch bekannt gemacht werden muss, um verwendet werden zu k\u00f6nnen.<\/p>\n
Im zweiten Teil<\/a> wird eine Quick-n-Dirty-Variante gezeigt, die BindingFactory<\/em> bekannt zu machen und der LotusScript-Wrapper wird vorgestellt.<\/p>\n
*: Anmerkung:<\/strong><\/p>\n
Aus Sicht der JSF-Spezifikation ist der Unterschied zwischen Value-Binding und Method-Binding etwas komplexer, als hier dargestellt.<\/p>\n","protected":false},"excerpt":{"rendered":"
LotusScript in XPages Dies ist der erste Teil des Artikels „LotusScript in XPages“. Der zweite Teil befindet sich hier.   W\u00e4re es nicht sch\u00f6n, wenn man in XPages direkt mit Lotus Script arbeiten k\u00f6nnte? Wenn es einen Weg g\u00e4be, mit … Weiterlesen →<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1,29,38,89,26,20,74,24],"tags":[33,7,30,88,39,31,86,80,3,85],"class_list":["post-611","post","type-post","status-publish","format-standard","hentry","category-allgemein","category-expression-language","category-extensibility-api","category-java","category-jsf","category-lotus-script","category-xpages","category-xsp","tag-8-5-3","tag-domino","tag-el","tag-expression-language","tag-extenisbility-api","tag-java","tag-jsf","tag-lotus-script","tag-xpages","tag-xsp"],"_links":{"self":[{"href":"https:\/\/hasselba.ch\/blog\/index.php?rest_route=\/wp\/v2\/posts\/611","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/hasselba.ch\/blog\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/hasselba.ch\/blog\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/hasselba.ch\/blog\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/hasselba.ch\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=611"}],"version-history":[{"count":18,"href":"https:\/\/hasselba.ch\/blog\/index.php?rest_route=\/wp\/v2\/posts\/611\/revisions"}],"predecessor-version":[{"id":630,"href":"https:\/\/hasselba.ch\/blog\/index.php?rest_route=\/wp\/v2\/posts\/611\/revisions\/630"}],"wp:attachment":[{"href":"https:\/\/hasselba.ch\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=611"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/hasselba.ch\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=611"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/hasselba.ch\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=611"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}