[jboss-svn-commits] JBL Code SVN: r37528 - labs/jbossesb/branches/JBESB_4_10_CP/product/services/jbrules/src/test/resources.

[jboss-svn-commits at lists.jboss.org]

Author: tcunning
Date: 2011-10-11 09:24:14 -0400 (Tue, 11 Oct 2011)
New Revision: 37528

Added:
   labs/jbossesb/branches/JBESB_4_10_CP/product/services/jbrules/src/test/resources/CEPtest.drl
Log:
JBESB-3698
Add missing CEPtest.drl file.


Added: labs/jbossesb/branches/JBESB_4_10_CP/product/services/jbrules/src/test/resources/CEPtest.drl
===================================================================
--- labs/jbossesb/branches/JBESB_4_10_CP/product/services/jbrules/src/test/resources/CEPtest.drl	                        (rev 0)
+++ labs/jbossesb/branches/JBESB_4_10_CP/product/services/jbrules/src/test/resources/CEPtest.drl	2011-10-11 13:24:14 UTC (rev 37528)
@@ -0,0 +1,27 @@
+package org.jboss.soa.esb.actions.cep.test;
+
+import org.jboss.soa.esb.message.Message;
+import org.jboss.soa.esb.actions.BusinessRulesProcessorUnitTest.Event;
+import org.jboss.soa.esb.actions.BusinessRulesProcessorUnitTest.Vote;
+import org.jboss.soa.esb.actions.BusinessRulesProcessorUnitTest.Callback;
+
+global Message message;
+
+declare Event
+    @role( event )
+    @expires( 0ms )
+end
+
+declare Vote
+    @role( event )
+end
+
+rule "Allow one vote for each person within 5 second period"
+when
+    $e : Event($name: name, $vote : vote) from entry-point "event"
+    not (Vote( name == $name, this before[0, 4s999ms] $e))
+then
+    insert(new Vote($name)) ;
+    Callback.processVote($name, $vote) ;
+end
+