ISOSource

ISOSource

ISOSource

Format

R6Class object.

Value

Object of R6Class for modelling an ISO Source

References

- ISO 19139 https://schemas.isotc211.org/19139/-/gmd/1.0/gmd/#element_LI_Source

- ISO 19115-3 https://schemas.isotc211.org/19115/-3/mrl/1.0/mrl/#element_LI_Source

Author

Emmanuel Blondel <emmanuel.blondel1@gmail.com>

Super classes

geometa::geometaLogger -> geometa::ISOAbstractObject -> ISOSource

Public fields

description

description [0..1]: character

scaleDenominator

scaleDenominator [0..1]: ISORepresentativeFraction

sourceReferenceSystem

sourceReferenceSystem [0..1]: ISOReferenceSystem

sourceCitation

sourceCitation [0..1]: ISOCitation

sourceExtent

sourceExtent [0..*]: ISOExtent

sourceStep

sourceStep [0..*]: ISOProcessStep

Methods

Public methods

• ISOSource$new()

• ISOSource$setDescription()

• ISOSource$setScaleDenominator()

• ISOSource$setReferenceSystem()

• ISOSource$setCitation()

• ISOSource$addExtent()

• ISOSource$delExtent()

• ISOSource$addProcessStep()

• ISOSource$delProcessStep()

• ISOSource$clone()

Inherited methods

• geometa::geometaLogger$ERROR()
• geometa::geometaLogger$INFO()
• geometa::geometaLogger$WARN()
• geometa::ISOAbstractObject$addFieldAttrs()
• geometa::ISOAbstractObject$addListElement()
• geometa::ISOAbstractObject$checkMetadataStandardCompliance()
• geometa::ISOAbstractObject$contains()
• geometa::ISOAbstractObject$createLocalisedProperty()
• geometa::ISOAbstractObject$decode()
• geometa::ISOAbstractObject$delListElement()
• geometa::ISOAbstractObject$encode()
• geometa::ISOAbstractObject$getClass()
• geometa::ISOAbstractObject$getClassName()
• geometa::ISOAbstractObject$getNamespaceDefinition()
• geometa::ISOAbstractObject$isDocument()
• geometa::ISOAbstractObject$isFieldInheritedFrom()
• geometa::ISOAbstractObject$print()
• geometa::ISOAbstractObject$save()
• geometa::ISOAbstractObject$setAttr()
• geometa::ISOAbstractObject$setCodeList()
• geometa::ISOAbstractObject$setCodeListValue()
• geometa::ISOAbstractObject$setCodeSpace()
• geometa::ISOAbstractObject$setHref()
• geometa::ISOAbstractObject$setId()
• geometa::ISOAbstractObject$setIsNull()
• geometa::ISOAbstractObject$setValue()
• geometa::ISOAbstractObject$stopIfMetadataStandardIsNot()
• geometa::ISOAbstractObject$validate()
• geometa::ISOAbstractObject$wrapBaseElement()

---

Method new()

Initializes object

Usage

ISOSource$new(xml = NULL)

Arguments

xml

object of class XMLInternalNode-class

---

Method setDescription()

Set description

Usage

ISOSource$setDescription(description, locales = NULL)

Arguments

description

description

locales

list of localized texts. Default is NULL

---

Method setScaleDenominator()

Set scale denominator

Usage

ISOSource$setScaleDenominator(denominator)

Arguments

denominator

object of class ISORepresentativeFraction

---

Method setReferenceSystem()

Set reference system

Usage

ISOSource$setReferenceSystem(referenceSystem)

Arguments

referenceSystem

object of class ISOReferenceSystem

---

Method setCitation()

Set citation

Usage

ISOSource$setCitation(citation)

Arguments

citation

object of class ISOCitation

---

Method addExtent()

Adds extent

Usage

ISOSource$addExtent(extent)

Arguments

extent

object of class ISOExtent

Returns

TRUE if added, FALSE otherwise

---

Method delExtent()

Deletes extent

Usage

ISOSource$delExtent(extent)

Arguments

extent

object of class ISOExtent

Returns

TRUE if deleted, FALSE otherwise

---

Method addProcessStep()

Adds process step

Usage

ISOSource$addProcessStep(processStep)

Arguments

processStep

object of class ISOProcessStep

Returns

TRUE if added, FALSE otherwise

---

Method delProcessStep()

Deletes process step

Usage

ISOSource$delProcessStep(processStep)

Arguments

processStep

object of class ISOProcessStep

Returns

TRUE if deleted, FALSE otherwise

---

Method clone()

The objects of this class are cloneable with this method.

Usage

ISOSource$clone(deep = FALSE)

Arguments

deep

Whether to make a deep clone.

Examples

  src <- ISOSource$new()
  src$setDescription("description")
  src$setScaleDenominator(1L)
  
  rs <- ISOReferenceSystem$new()
  rsId <- ISOReferenceIdentifier$new(code = "4326", codeSpace = "EPSG")
  rs$setReferenceSystemIdentifier(rsId)
  src$setReferenceSystem(rs)
  
  cit <- ISOCitation$new()
  cit$setTitle("sometitle") #and more citation properties...
  src$setCitation(cit)
  
  extent <- ISOExtent$new()
  bbox <- ISOGeographicBoundingBox$new(minx = -180, miny = -90, maxx = 180, maxy = 90)
  extent$setGeographicElement(bbox)
#> Warning: Method 'setGeographicElement' is deprecated, please use 'addGeographicElement'!
#> [1] TRUE
  src$addExtent(extent)
#> [1] TRUE
  xml <- src$encode()
#> [geometa][WARN] Element '{http://www.isotc211.org/2005/gmd}CI_Citation': Missing child element(s). Expected is one of ( {http://www.isotc211.org/2005/gmd}alternateTitle, {http://www.isotc211.org/2005/gmd}date ) at line 27. 
#> [geometa][WARN] Object 'ISOSource' is INVALID according to ISO 19139 XML schemas!