ISOSource {geometa}

ISOSource

Description

ISOSource

ISOSource

Format

R6Class object.

Value

Object of R6Class for modelling an ISO Source

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$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$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.

Author(s)

Emmanuel Blondel <[e-mail]>

References

ISO 19115:2003 - Geographic information – Metadata

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)
  src$addExtent(extent)
  xml <- src$encode()