Developing Model-to-Model Transformations - Eclipse Modeling Project: A Domain-Specific Language Toolkit - page 275

value := value;

}

}

}

/**
* Maps visibility to Java types
*/
query oocore::Visibility::toVisibility() : java::JavaVisibilityKind {
if self = oocore::Visibility::PRIVATE then {
return java::JavaVisibilityKind::PRIVATE} else
if self = oocore::Visibility::PUBLIC then {
return java::JavaVisibilityKind::PUBLIC} else
if self = oocore::Visibility::PROTECTED then {
return java::JavaVisibilityKind::PROTECTED}
endif
endif
endif ;
return java::JavaVisibilityKind::PACKAGE

}

/**
* Replaces camel case with underscore, e.g. firstName -> FIRST_NAME
*/
query String ::toColumnName() : String {
var name : String := '';
var digit : String := '';
var pos : Integer := 1;
while (pos <= self .size()) {
digit := self .substring(pos, pos);
if digit.toLowerCase() <> digit then {
name := name + '_' + digit;
} else {
name := name + digit;
} endif ;
pos := pos + 1;

};
return name.toUpperCase();

}

query oocore::Class::isEntity() : Boolean {
return self . oclIsTypeOf (dnc::MomentInterval) or
self . oclIsTypeOf (dnc::MIDetail) or
self.oclIsTypeOf (dnc::Party) or
self.oclIsTypeOf (dnc::Place) or
self.oclIsTypeOf (dnc::Thing) or
self . oclIsTypeOf (dnc::Description);

}

/**
* Returns dot '.' delimited package.Class string
*/
query oocore::Class::fullyQualifiedName() : String {
var fqn : String := self .name;
var pkg : oocore::Package := self ._package;
while ( not pkg. oclIsUndefined ()) {