[90] | 1 | # This module is an implementation of this UML:
|
---|
| 2 | # http://www.openehr.org/uml/release-1.0.1/Browsable/_9_0_76d0249_1109331021343_528780_2066Report.html
|
---|
| 3 | # Ticket refs #39
|
---|
[4] | 4 | module OpenEHR
|
---|
| 5 | module RM
|
---|
| 6 | module Support
|
---|
[26] | 7 | module Identification
|
---|
| 8 |
|
---|
[90] | 9 | class Object_ID
|
---|
| 10 | attr_reader :value
|
---|
[26] | 11 |
|
---|
[90] | 12 | def initialize(value)
|
---|
| 13 | self.value=value
|
---|
[4] | 14 | end
|
---|
[90] | 15 |
|
---|
| 16 | def value=(value)
|
---|
[91] | 17 | raise ArgumentError, "empty value" if value.nil? or value.empty?
|
---|
[90] | 18 | @value = value
|
---|
| 19 | end
|
---|
[94] | 20 | def ==(object_id)
|
---|
| 21 | @value == object_id.value
|
---|
| 22 | end
|
---|
[4] | 23 | end # of ObjectID
|
---|
[94] | 24 |
|
---|
| 25 | class Object_Ref
|
---|
| 26 | attr_reader :namespace, :type, :id
|
---|
| 27 |
|
---|
| 28 | def initialize(namespace, type, id)
|
---|
| 29 | self.namespace = namespace
|
---|
| 30 | self.type = type
|
---|
| 31 | self.id = id
|
---|
| 32 | end
|
---|
| 33 |
|
---|
| 34 | def namespace=(namespace)
|
---|
| 35 | raise ArgumentError if namespace.nil? or namespace.empty? or !(/([a-z]|[A-Z]).*/ =~ namespace) # error original is =~ #([a-z][A-Z])([a-z]|[A-Z]|\s|[0-9]|[_-\:\/\&\+\?])*/
|
---|
| 36 | @namespace = namespace
|
---|
| 37 | end
|
---|
| 38 |
|
---|
| 39 | def type=(type)
|
---|
| 40 | raise ArgumentError if type.nil? or type.empty?
|
---|
| 41 | @type = type
|
---|
| 42 | end
|
---|
| 43 |
|
---|
| 44 | def id=(id)
|
---|
| 45 | raise ArgumentError if id.nil?
|
---|
| 46 | @id = id
|
---|
| 47 | end
|
---|
| 48 | end
|
---|
[97] | 49 |
|
---|
[90] | 50 | class Archetype_ID < Object_ID
|
---|
[91] | 51 | attr_reader :domain_concept, :rm_name, :rm_entity, :rm_originator, :specialisation, :version_id
|
---|
| 52 |
|
---|
[266] | 53 | def initialize(value)
|
---|
[91] | 54 | super(value)
|
---|
[266] | 55 |
|
---|
[91] | 56 | end
|
---|
| 57 | def domain_concept=(domain_concept)
|
---|
| 58 | raise ArgumentError, "domain concept not valid" if domain_concept.nil? or domain_concept.empty?
|
---|
| 59 | @domain_concept = domain_concept
|
---|
| 60 | end
|
---|
| 61 |
|
---|
[266] | 62 | def value=(value)
|
---|
| 63 | if /([a-zA-Z]\w+)-([a-zA-Z]\w+)-([a-zA-Z]\w+)\.([a-zA-Z]\w+)(-([a-zA-Z]\w+))?\.(v[1-9]\d*)/ =~ value
|
---|
| 64 | self.rm_originator = $1
|
---|
| 65 | self.rm_name = $2
|
---|
| 66 | self.rm_entity = $3
|
---|
| 67 | self.concept_name = $4
|
---|
| 68 | self.specialisation = $6
|
---|
| 69 | self.version_id = $7
|
---|
| 70 | else
|
---|
| 71 | raise ArgumentError, 'invalid archetype id form'
|
---|
| 72 | end
|
---|
| 73 | end
|
---|
| 74 |
|
---|
| 75 | def qualified_rm_entity
|
---|
| 76 | return @rm_originator + '-' + @rm_name + '-' + @rm_entity
|
---|
| 77 | end
|
---|
| 78 |
|
---|
| 79 | def domain_concept
|
---|
| 80 | if @specialisation.nil?
|
---|
| 81 | return @concept_name
|
---|
| 82 | else
|
---|
| 83 | return @concept_name + '-' + @specialisation
|
---|
| 84 | end
|
---|
| 85 | end
|
---|
| 86 |
|
---|
| 87 | def value
|
---|
| 88 | return self.qualified_rm_entity + self.domain_concept + '.' + @version_id
|
---|
| 89 | end
|
---|
| 90 |
|
---|
| 91 | def concept_name=(concept_name)
|
---|
| 92 | if concept_name.nil? or concept_name.empty?
|
---|
| 93 | raise ArgumentError, 'concept_name is mandatory'
|
---|
| 94 | end
|
---|
| 95 | @concept_name = concept_name
|
---|
| 96 | end
|
---|
| 97 |
|
---|
| 98 | def domain_concept=(domain_concept)
|
---|
| 99 | if domain_concept.nil? or domain_concept.empty?
|
---|
| 100 | raise ArgumentError, "domain concept not valid"
|
---|
| 101 | end
|
---|
| 102 | if /([a-zA-Z]\w+)(-([a-zA-Z]\w))?/ =~ domain_concept
|
---|
| 103 | self.concept_name = $1
|
---|
| 104 | self.specialisation = $3
|
---|
| 105 | else
|
---|
| 106 | raise ArgumentError, 'invalid domain concept form'
|
---|
| 107 | end
|
---|
| 108 | end
|
---|
| 109 |
|
---|
[91] | 110 | def rm_name=(rm_name)
|
---|
| 111 | raise ArgumentError, "rm_name not valid" if rm_name.nil? or rm_name.empty?
|
---|
| 112 | @rm_name = rm_name
|
---|
| 113 | end
|
---|
| 114 |
|
---|
| 115 | def rm_entity=(rm_entity)
|
---|
[266] | 116 | if rm_entity.nil? or rm_entity.empty?
|
---|
| 117 | raise ArgumentError, "rm_entity is mandatory"
|
---|
| 118 | end
|
---|
[91] | 119 | @rm_entity = rm_entity
|
---|
| 120 | end
|
---|
| 121 |
|
---|
| 122 | def rm_originator=(rm_originator)
|
---|
[266] | 123 | if rm_originator.nil? or rm_originator.empty?
|
---|
| 124 | raise ArgumentError, "rm_originator not valid"
|
---|
| 125 | end
|
---|
[91] | 126 | @rm_originator = rm_originator
|
---|
| 127 | end
|
---|
| 128 |
|
---|
| 129 | def specialisation=(specialisation)
|
---|
[266] | 130 | if !specialisation.nil? and specialisation.empty?
|
---|
| 131 | raise ArgumentError, "rm_specialisation not valid"
|
---|
| 132 | end
|
---|
[91] | 133 | @specialisation = specialisation
|
---|
| 134 | end
|
---|
[266] | 135 |
|
---|
[91] | 136 | def version_id=(version_id)
|
---|
| 137 | raise ArgumentError, "version_id not valid" if version_id.nil? or version_id.empty?
|
---|
| 138 | @version_id = version_id
|
---|
| 139 | end
|
---|
[26] | 140 | end
|
---|
| 141 |
|
---|
[90] | 142 | class Terminology_ID < Object_ID
|
---|
[92] | 143 | attr_reader :name, :version_id
|
---|
[26] | 144 |
|
---|
[158] | 145 | def initialize(value)
|
---|
| 146 | super(value)
|
---|
[4] | 147 | end
|
---|
[26] | 148 |
|
---|
[107] | 149 | def value
|
---|
| 150 | if @version_id.empty?
|
---|
| 151 | @name
|
---|
| 152 | else
|
---|
| 153 | @name + '(' + @version_id + ')'
|
---|
| 154 | end
|
---|
| 155 | end
|
---|
| 156 |
|
---|
| 157 |
|
---|
| 158 | def value=(value)
|
---|
[106] | 159 | raise ArgumentError, "value not valid" if value.nil? or value.empty?
|
---|
[107] | 160 | if /(.*)\((.*)\)$/ =~ value
|
---|
[106] | 161 | @name = $1
|
---|
| 162 | @version_id = $2
|
---|
| 163 | else
|
---|
| 164 | @name = value
|
---|
[158] | 165 | @version_id = ''
|
---|
[106] | 166 | end
|
---|
| 167 | @value = value
|
---|
| 168 | end
|
---|
| 169 |
|
---|
[92] | 170 | def name=(name)
|
---|
| 171 | raise ArgumentError, "name not valid" if name.nil? or name.empty?
|
---|
| 172 | @name = name
|
---|
[4] | 173 | end
|
---|
[26] | 174 |
|
---|
[92] | 175 | def version_id=(version_id)
|
---|
| 176 | raise ArgumentError, "version_id not valid" if version_id.nil?
|
---|
| 177 | @version_id = version_id
|
---|
[4] | 178 | end
|
---|
[92] | 179 | end # of Terminology_ID
|
---|
[26] | 180 |
|
---|
[92] | 181 | class Generic_ID < Object_ID
|
---|
| 182 | attr_reader :scheme
|
---|
[26] | 183 |
|
---|
[92] | 184 | def initialize(value, scheme)
|
---|
| 185 | super(value)
|
---|
| 186 | self.scheme = scheme
|
---|
[4] | 187 | end
|
---|
[26] | 188 |
|
---|
[92] | 189 | def scheme=(scheme)
|
---|
| 190 | raise ArgumentError, "scheme not valid" if scheme.nil? or scheme.empty?
|
---|
| 191 | @scheme = scheme
|
---|
[4] | 192 | end
|
---|
[92] | 193 | end # of Generic_ID
|
---|
[94] | 194 |
|
---|
[100] | 195 | class Template_ID < Object_ID
|
---|
| 196 |
|
---|
| 197 | end
|
---|
| 198 |
|
---|
[93] | 199 | class UID_Based_ID < Object_ID
|
---|
| 200 | def initialize(value)
|
---|
| 201 | super(value)
|
---|
| 202 | end
|
---|
[97] | 203 |
|
---|
[93] | 204 | def extension
|
---|
| 205 | if self.has_extension?
|
---|
| 206 | @value[/::.*/][2..-1]
|
---|
| 207 | else
|
---|
| 208 | ''
|
---|
| 209 | end
|
---|
| 210 | end
|
---|
[97] | 211 |
|
---|
[93] | 212 | def has_extension?
|
---|
| 213 | @value.include? '::'
|
---|
| 214 | end
|
---|
[97] | 215 |
|
---|
[93] | 216 | def root
|
---|
| 217 | if self.has_extension?
|
---|
| 218 | @value[/.*::/][0..-3]
|
---|
| 219 | else
|
---|
| 220 | @value
|
---|
| 221 | end
|
---|
| 222 | end
|
---|
| 223 | end
|
---|
[95] | 224 |
|
---|
[157] | 225 | class Object_Version_ID < UID_Based_ID
|
---|
| 226 | attr_reader :object_id, :creating_system_id, :version_tree_id
|
---|
| 227 |
|
---|
| 228 | def initialize(value)
|
---|
| 229 | super(value)
|
---|
| 230 | end
|
---|
| 231 |
|
---|
| 232 | def value=(value)
|
---|
| 233 | super(value)
|
---|
| 234 | if /^(\w+)::(\w+)::((\d|\.)+)$/ =~ value
|
---|
| 235 | self.object_id = UID.new($1)
|
---|
| 236 | self.creating_system_id = UID.new($2)
|
---|
| 237 | self.version_tree_id = Version_Tree_ID.new($3)
|
---|
| 238 | else
|
---|
| 239 | raise ArgumentError, 'invalid format'
|
---|
| 240 | end
|
---|
| 241 | end
|
---|
| 242 |
|
---|
| 243 | def object_id=(object_id)
|
---|
| 244 | raise ArgumentError, 'object_id is mandatory' if object_id.nil?
|
---|
| 245 | @object_id = object_id
|
---|
| 246 | end
|
---|
| 247 |
|
---|
| 248 | def creating_system_id=(creating_system_id)
|
---|
| 249 | if creating_system_id.nil?
|
---|
| 250 | raise ArgumentError, 'creating_system_id is mandatory'
|
---|
| 251 | end
|
---|
| 252 | @creating_system_id = creating_system_id
|
---|
| 253 | end
|
---|
| 254 |
|
---|
| 255 | def version_tree_id=(version_tree_id)
|
---|
| 256 | if version_tree_id.nil?
|
---|
| 257 | raise ArgumentError, 'version_tree_id is mandatory'
|
---|
| 258 | end
|
---|
| 259 | @version_tree_id = version_tree_id
|
---|
| 260 | end
|
---|
[158] | 261 |
|
---|
| 262 | def is_branch?
|
---|
| 263 | return @version_tree_id.is_branch?
|
---|
| 264 | end
|
---|
[157] | 265 | end
|
---|
| 266 |
|
---|
[97] | 267 | class Locatable_Ref < Object_Ref
|
---|
| 268 | attr_reader :namespace, :type, :id, :path
|
---|
| 269 |
|
---|
| 270 | def initialize(namespace, type, id, path)
|
---|
| 271 | super(namespace, type, id)
|
---|
| 272 | self.path = path
|
---|
| 273 | end
|
---|
| 274 |
|
---|
| 275 | def path=(path)
|
---|
| 276 | raise ArgumentError if path.nil? or path.empty?
|
---|
| 277 | @path = path
|
---|
| 278 | end
|
---|
| 279 |
|
---|
| 280 | def as_uri
|
---|
| 281 | 'ehr://' + @id.value + '/' + @path
|
---|
| 282 | end
|
---|
| 283 | end
|
---|
| 284 |
|
---|
[98] | 285 | class Party_Ref < Object_Ref
|
---|
| 286 |
|
---|
| 287 | def type=(type)
|
---|
[100] | 288 | parties = ['PERSON', 'ORGANISATION', 'GROUP', 'AGENT', 'ROLE','PARTY', 'ACTOR']
|
---|
[101] | 289 | raise ArgumentError, 'type invalid' unless parties.include? type
|
---|
[98] | 290 | @type = type
|
---|
| 291 | end
|
---|
| 292 | end
|
---|
[99] | 293 |
|
---|
| 294 | class Access_Group_Ref < Object_Ref
|
---|
| 295 | def type=(type)
|
---|
[101] | 296 | raise ArgumentError, 'type invalid' unless type == 'ACCESS_GROUP'
|
---|
[99] | 297 | @type = type
|
---|
| 298 | end
|
---|
| 299 | end
|
---|
| 300 |
|
---|
[95] | 301 | class Hier_Object_ID < UID_Based_ID
|
---|
| 302 |
|
---|
| 303 | end
|
---|
| 304 |
|
---|
[98] | 305 | class Version_Tree_ID
|
---|
| 306 | attr_reader :value, :trunk_version, :branch_number, :branch_version
|
---|
| 307 |
|
---|
| 308 | def initialize(value)
|
---|
| 309 | self.value = value
|
---|
| 310 | end
|
---|
| 311 |
|
---|
| 312 | def value=(value)
|
---|
| 313 | raise ArgumentError, 'value invalid' if value.nil? or value.empty?
|
---|
[101] | 314 | @trunk_version = @branch_number = @branch_version = nil
|
---|
[98] | 315 | (trunk_version, branch_number, branch_version) = value.split '.'
|
---|
[100] | 316 | self.trunk_version = trunk_version
|
---|
| 317 | self.branch_number = branch_number
|
---|
| 318 | self.branch_version = branch_version
|
---|
[98] | 319 | end
|
---|
| 320 |
|
---|
| 321 | def trunk_version=(trunk_version)
|
---|
[101] | 322 | raise ArgumentError, 'trunk_version invalid' if trunk_version.nil? and !trunk_version.to_i >= 1
|
---|
[98] | 323 | @trunk_version = trunk_version
|
---|
[101] | 324 | set_value
|
---|
[98] | 325 | end
|
---|
| 326 |
|
---|
| 327 | def branch_number=(branch_number)
|
---|
[101] | 328 | raise ArgumentError, 'branch number invalid' unless branch_number.nil? or branch_number.to_i >= 1
|
---|
[100] | 329 | @branch_number = branch_number
|
---|
[101] | 330 | set_value
|
---|
[98] | 331 | end
|
---|
| 332 |
|
---|
[100] | 333 | def branch_version=(branch_version)
|
---|
[101] | 334 | raise ArgumentError, 'branch version invalid' if (!branch_version.nil? and !( branch_version.to_i >= 1)) or (!branch_version.nil? and @branch_number.nil?)
|
---|
[100] | 335 | @branch_version = branch_version
|
---|
[101] | 336 | set_value
|
---|
[100] | 337 | end
|
---|
[98] | 338 | def is_branch?
|
---|
[101] | 339 | !@branch_version.nil? and !@branch_number.nil?
|
---|
[98] | 340 | end
|
---|
[101] | 341 |
|
---|
| 342 | def is_first?
|
---|
| 343 | trunk_version == '1'
|
---|
| 344 | end
|
---|
| 345 |
|
---|
[98] | 346 | private
|
---|
[101] | 347 | def set_value
|
---|
| 348 | @value = trunk_version
|
---|
| 349 | @value = @value + '.' + @branch_number unless @branch_number.nil?
|
---|
| 350 | @value = @value + '.' + @branch_version unless @branch_version.nil?
|
---|
[98] | 351 | end
|
---|
| 352 | end
|
---|
| 353 |
|
---|
| 354 | class UID
|
---|
| 355 | attr_reader :value
|
---|
| 356 |
|
---|
| 357 | def initialize(value)
|
---|
| 358 | self.value = value
|
---|
| 359 | end
|
---|
| 360 |
|
---|
| 361 | def value=(value)
|
---|
| 362 | raise ArgumentError if value.nil? or value.empty?
|
---|
| 363 | @value = value
|
---|
| 364 | end
|
---|
| 365 | end
|
---|
| 366 |
|
---|
| 367 | class UUID < UID
|
---|
| 368 |
|
---|
| 369 | end
|
---|
| 370 |
|
---|
| 371 | class Internet_ID <UID
|
---|
| 372 |
|
---|
| 373 | end
|
---|
| 374 |
|
---|
| 375 | class ISO_OID <UID
|
---|
| 376 |
|
---|
[157] | 377 | end
|
---|
[93] | 378 | end # of Identification
|
---|
[4] | 379 | end # of Support
|
---|
| 380 | end # of RM
|
---|
| 381 | end # of OpenEHR
|
---|