[jboss-svn-commits] JBL Code SVN: r27241 - in labs/jbossrules/trunk/drools-solver/drools-solver-examples/src/main: resources/org/drools/solver/examples/patientadmissionschedule/solver and 1 other directory.

jboss-svn-commits at lists.jboss.org jboss-svn-commits at lists.jboss.org
Sun Jun 28 10:17:39 EDT 2009


Author: ge0ffrey
Date: 2009-06-28 10:17:39 -0400 (Sun, 28 Jun 2009)
New Revision: 27241

Modified:
   labs/jbossrules/trunk/drools-solver/drools-solver-examples/src/main/java/org/drools/solver/examples/patientadmissionschedule/domain/BedDesignation.java
   labs/jbossrules/trunk/drools-solver/drools-solver-examples/src/main/resources/org/drools/solver/examples/patientadmissionschedule/solver/patientAdmissionScheduleScoreRules.drl
Log:
pas: roomSpecialism constraint

Modified: labs/jbossrules/trunk/drools-solver/drools-solver-examples/src/main/java/org/drools/solver/examples/patientadmissionschedule/domain/BedDesignation.java
===================================================================
--- labs/jbossrules/trunk/drools-solver/drools-solver-examples/src/main/java/org/drools/solver/examples/patientadmissionschedule/domain/BedDesignation.java	2009-06-28 14:07:49 UTC (rev 27240)
+++ labs/jbossrules/trunk/drools-solver/drools-solver-examples/src/main/java/org/drools/solver/examples/patientadmissionschedule/domain/BedDesignation.java	2009-06-28 14:17:39 UTC (rev 27241)
@@ -85,6 +85,10 @@
         return admissionPart.getPatient();
     }
 
+    public Specialism getAdmissionPartSpecialism() {
+        return admissionPart.getSpecialism();
+    }
+
     public Room getRoom() {
         return bed.getRoom();
     }

Modified: labs/jbossrules/trunk/drools-solver/drools-solver-examples/src/main/resources/org/drools/solver/examples/patientadmissionschedule/solver/patientAdmissionScheduleScoreRules.drl
===================================================================
--- labs/jbossrules/trunk/drools-solver/drools-solver-examples/src/main/resources/org/drools/solver/examples/patientadmissionschedule/solver/patientAdmissionScheduleScoreRules.drl	2009-06-28 14:07:49 UTC (rev 27240)
+++ labs/jbossrules/trunk/drools-solver/drools-solver-examples/src/main/resources/org/drools/solver/examples/patientadmissionschedule/solver/patientAdmissionScheduleScoreRules.drl	2009-06-28 14:17:39 UTC (rev 27241)
@@ -87,6 +87,18 @@
 // ############################################################################
 
 
+
+// RoomSpecialism constraint
+rule "roomSpecialism"
+    when
+        $bedDesignation : BedDesignation($specialism : admissionPartSpecialism, $room : room);
+        not RoomSpecialism(room == $room, specialism == $specialism);
+    then
+        insertLogical(new IntConstraintOccurrence("roomSpecialism",
+                ConstraintType.NEGATIVE_SOFT, 10,
+                $bedDesignation));
+end
+
 // PreferredPatientEquipment constraint
 rule "preferredPatientEquipment"
     when




More information about the jboss-svn-commits mailing list