Based on CDO 4.0-SR2
For some basic references to OCL please find http://atlanmod.emn.fr/atldemo/oclturorial/ or http://cs.ulb.ac.be/public/_media/teaching/infoh302/oclnotes.pdf
We have the following, deliberately trivial, model:
We have the entities Patient and Konsultation (Consultation), which hold some generic attributes resp. features. The enumeration Geschlecht (sex) is self explaining. Each Konsultation belongsTo exactly one Patient, it is however not contained by the patient but exists as independent entity.
This section documents some queries based on the aforementioned model. It is work in progress.
Finding object references
The following OCL query finds all Konsultation entries in the entire repository, that belong to a certain Patient p, "injected" by the context. The element provided by the context is refered as self within the query.
CDOTransaction cdoTransaction = Activator.openSession("demo") .openTransaction(); CDOQuery cqo = cdoTransaction.createQuery("ocl", "Konsultation.allInstances()->select(k:Konsultation|k.belongsTo=self)", ((Patient)p).cdoID(), false); List<Konsultation> lre = cqo.getResult(Konsultation.class);
The most important part in this query is the fact that we are comparing real objects, as k.belongsTo refers to an element of type Patient. For OCL CDO to evaluate this query correct, we need to pass the context objects CDOID object as otherwise we will receive an error. A direct comparison by simply passing (Patient)p as context is hence not possible.
Query ExamplesFind all instances of Patient
Patient.allInstances()Get the number of instances of Patient
Patient.allInstances()->size()Get all instances of Patient where nachname is Descher
Patient.allInstances()->select(p:Patient|p.nachname='Descher')Get all instances of Patient where nachname starts with G