ISOFeatureAttribute

ISOFeatureAttribute

Format

R6Class object.

Value

Object of R6Class for modelling an ISOFeatureAttribute

References

ISO 19110:2005 Methodology for Feature cataloguing

Author

Emmanuel Blondel <emmanuel.blondel1@gmail.com>

Public fields

code

code [0..1]: character

valueMeasurementUnit

valueMeasurementUnit [0..1]: GMLUnitDefinition

valueType

valueType [0..1]: ISOTypeName

listedValue

listedValue [0..*]: ISOListedValue

Methods

Inherited methods


Method new()

Initializes object

Usage

ISOFeatureAttribute$new(xml = NULL)

Arguments

xml

object of class XMLInternalNode-class


Method setCode()

Set code

Usage

ISOFeatureAttribute$setCode(code, locales = NULL)

Arguments

code

code

locales

list of localized codes. Default is NULL


Method setValueMeasurementUnit()

Set value measurement unit

Usage

ISOFeatureAttribute$setValueMeasurementUnit(uom)

Arguments

uom

uom, object of class GMLUnitDefinition


Method setValueType()

Set type name

Usage

ISOFeatureAttribute$setValueType(typeName, locales = NULL)

Arguments

typeName

typeName

locales

list of localized typeNames. Default is NULL


Method addListedValue()

Adds listed value

Usage

ISOFeatureAttribute$addListedValue(value)

Arguments

value

value, object of class ISOListedValue

Returns

TRUE if added, FALSE otherwise


Method delListedValue()

Deletes listed value

Usage

ISOFeatureAttribute$delListedValue(value)

Arguments

value

value, object of class ISOListedValue

Returns

TRUE if deleted, FALSE otherwise


Method clone()

The objects of this class are cloneable with this method.

Usage

ISOFeatureAttribute$clone(deep = FALSE)

Arguments

deep

Whether to make a deep clone.

Examples

  md <- ISOFeatureAttribute$new()
  md$setMemberName("name")
  md$setDefinition("definition")
  md$setCardinality(lower=1,upper=1)
  md$setCode("code")
  
  gml <- GMLBaseUnit$new(id = "ID")
  gml$setDescriptionReference("someref")
  gml$setIdentifier("identifier", "codespace")
  gml$addName("name1", "codespace")
#> [1] TRUE
  gml$addName("name2", "codespace")
#> [1] TRUE
  gml$setQuantityTypeReference("someref")
  gml$setCatalogSymbol("symbol")
  gml$setUnitsSystem("somelink")
  md$setValueMeasurementUnit(gml)
  
  val1 <- ISOListedValue$new()
  val1$setCode("code1")
  val1$setLabel("label1")
  val1$setDefinition("definition1")
  md$addListedValue(val1)
#> [1] TRUE
  val2 <- ISOListedValue$new()
  val2$setCode("code2")
  val2$setLabel("label2")
  val2$setDefinition("definition2")
  md$addListedValue(val2)
#> [1] TRUE
  md$setValueType("typeName")