Filip Stachecki at 19:44, 17 March 2017

2017-03-17T19:44:20Z

New page

[[Category:Private]]
=Basic=
==EX1==
<source>
rule "Select Salgrade" enabled false
when
$s : Salgrade()
then
System.out.println( $s.grade + " " + $s.losal + " " + $s.hisal)
end
</source>

==EX2==
<source>
rule "employees who earn between 1000 and 2000" enabled true
when
e : Emp(sal >= 1000 && <= 2000)
then
System.out.println(e.id + " " + e.name + "\t" + e.job
+ " \t" + e.mgr + "\t" + e.hiredate + " " + e.sal
+ " " + e.deptno );
end
</source>

==EX3==
<source>
rule "example 3"
when
$e : Emp(job == "CLERK" && deptno == 20)
then
System.out.println($e.id + "\t" + $e.name + "\t" + $e.job + "\t" + $e.mgr + "\t" + $e.hiredate + "\t" + $e.sal + "\t" + $e.deptno)
end
</source>

==EX4==
<source>
rule "employees who have a boss."
enabled false
when
$e : Emp(mgr != 0)

then
System.out.println($e.id + " " + $e.name + " " + $e.job + " " + $e.mgr + " " + $e.hiredate + " " + $e.sal + " " + $e.deptno )

end
</source>

==EX5==
<source>
rule "Exercise 5"
enabled true
when
$e : Emp(job == "MANAGER")
then
System.out.println($e.id + " " + $e.name + " " + $e.job + " " + $e.mgr + " " + $e.hiredate + " " + $e.sal * 12 + " " + $e.deptno )
end
</source>

==EX6==
<source>
rule "Exercise 6"
enabled false
when
$e : Emp(name matches ".LA.*")
then
System.out.println($e.id + " " + $e.name + " " + $e.job + " " + $e.mgr + " " + $e.hiredate + " " + $e.sal + " " + $e.deptno )
end
</source>

==EX7==
<source>
rule "Exercise 7"
enabled true
when
$e : Emp(name matches ".*T.*N")
then
System.out.println($e.id + " " + $e.name + " " + $e.job + " " + $e.mgr + " " + $e.hiredate + " " + $e.sal + " " + $e.deptno )
end
</source>

==EX8==
<source>
rule "Exercise 8"
enabled false
when
$e : Emp((job == "MANAGER" && deptno !=10) || (job != "MANAGER" && deptno == 10) )
then
System.out.println($e.id + " " + $e.name + " " + $e.job + " " + $e.mgr + " " + $e.hiredate + " " + $e.sal + " " + $e.deptno )
end
</source>

=Advanced=
==EX31==
<source>
rule "Exercise 31"
enabled true
when
$d : Dept()
$e : Emp($d.deptno == deptno )
then
System.out.println($e.name + "\t" + $d.loc )
end
</source>

==EX32==
<source>
rule "Exercise 32"
enabled false
when
e : Emp()
d: Dept(e.deptno == deptno)
then
System.out.println(e.id + " " + e.name + "\t"
+ " \t\t" + d.loc + "\t" + d.deptno );
end
</source>

==EX33==
<source>
rule "Exercise 33"
enabled false
when
e : Emp()
s: Salgrade(e.sal >= losal, e.sal <= hisal)
then
System.out.println(e.id + " " + e.name + "\t"
+ " \t\t" + s.grade );
end
</source>

==EX34==
<source>
rule "Exercise 34"
enabled true
when
e : Emp()
d: Dept(e.deptno == deptno, loc == "LONDON")
then
System.out.println(e.id + " " + e.name + "\t"
+ " \t\t" + d.loc );
end
</source>

==EX35==
<source>
rule "Exercise 35"
enabled true
when
e : Emp()
d: Dept(e.deptno == deptno, loc != "LONDON")
s: Salgrade(e.sal >= losal, e.sal <= hisal)
then
System.out.println(e.id + " " + e.name + "\t" + s.grade
+ " \t\t" + d.loc );
end
</source>

==EX36==
<source>
rule "Exercise 36"
enabled true
when
d :Dept()
not (Emp(deptno == d.deptno))
then
System.out.println( d.dname )
end
</source>

==EX37==
<source>
rule "Exercise 37"
enabled true
when
e1 :Emp()
e2 :Emp(id == e1.mgr)
then
System.out.println( e1.name + "\t -->" + e2.name )
end
</source>

==EX38==
<source>
rule "Exercise 38"
enabled true
when
$e : Emp()
not Emp($e.mgr == id)
then
System.out.println($e.name )
end
</source>

==EX39==
<source>
rule "Exercise 39"
enabled true
when
$e : Emp()
not Emp($e.id == mgr)
then
System.out.println($e.name )
end
</source>

==EX41==
<source>
rule "Exercise 41"
enabled true
when
$e : Emp()
$m : Emp($e.mgr == id && $e.hiredate < hiredate)
then
System.out.println($e.name + " (" +$e.hiredate+ ") was hired earlier than "+$m.name +"("+$m.hiredate+")" )
end
</source>
<source>
rule "41. Select employees hired earlier than their bosses." enabled true
when
$emp : Emp($mgr : mgr, $empHireDate : hiredate)
$boss : Emp(id == $mgr, $empHireDate < hiredate)
then
System.out.println($emp.name + " hired in " + $empHireDate + " whose boss is " + $boss.name + " hired in " + $boss.hiredate)
end
</source>

==EX44==
<source>
rule "Exercise 44"
enabled true
when
$e : Emp(deptno==10) && not Emp(job==$e.job && deptno==20)
then
System.out.println($e.job)
end
</source>

==EX23==
<source>
</source>
==EX24==
<source>
</source>
==EX26==
<source>
</source>
==EX25==
<source>
</source>
==EX27==
<source>
</source>
==EX43==
<source>
</source>
==EX28==
<source>
</source>
==EX45==
<source>
</source>
==EX46==
<source>
</source>
==EX51==
<source>
</source>
==EX55==
<source>
</source>

Drools Regensburg G2 - Revision history

Filip Stachecki at 19:44, 17 March 2017