ISODistributor: ISODistributor

ISODistributorR Documentation

ISODistributor

Description

ISODistributor

ISODistributor

Format

R6Class object.

Value

Object of R6Class for modelling an ISODistributor

Super classes

geometa::geometaLogger -> geometa::ISOAbstractObject -> ISODistributor

Public fields

distributorContact

distributorContact : ISOResponsibleParty

distributorFormat

distributorFormat : ISOFormat

Methods

Public methods

Inherited methods

Method new()

Initializes object

Usage
ISODistributor$new(xml = NULL)
Arguments
xml

object of class XMLInternalNode-class


Method setContact()

Set contact

Usage
ISODistributor$setContact(contact)
Arguments
contact

object of class ISOResponsibleParty


Method addFormat()

Adds format

Usage
ISODistributor$addFormat(format)
Arguments
format

format object of class ISOFormat

Returns

TRUE if added, FALSE otherwise


Method delFormat()

Deletes format

Usage
ISODistributor$delFormat(format)
Arguments
format

format object of class ISOFormat

Returns

TRUE if deleted, FALSE otherwise


Method clone()

The objects of this class are cloneable with this method.

Usage
ISODistributor$clone(deep = FALSE)
Arguments
deep

Whether to make a deep clone.

Author(s)

Emmanuel Blondel <emmanuel.blondel1@gmail.com>

References

ISO 19115:2003 - Geographic information – Metadata

Examples

   md <- ISODistributor$new()
   rp <- ISOResponsibleParty$new()
   rp$setIndividualName("someone")
   rp$setOrganisationName("somewhere")
   rp$setPositionName("Data manager")
   
   contact <- ISOContact$new()
   phone <- ISOTelephone$new()
   phone$setVoice("myphonenumber")
   phone$setFacsimile("myfacsimile")
   contact$setPhone(phone)
   address <- ISOAddress$new()
   address$setDeliveryPoint("theaddress")
   address$setCity("thecity")
   address$setPostalCode("111")
   address$setCountry("France")
   address$setEmail("someone@theorg.org")
   contact$setAddress(address)
   res <- ISOOnlineResource$new()
   res$setLinkage("http://www.somewhereovertheweb.org")
   res$setName("somename")
   contact$setOnlineResource(res)
   rp$setContactInfo(contact)
   rp$setRole("author")
   md$setContact(rp)
   
   format <- ISOFormat$new()
   format$setName("name")
   format$setVersion("1.0")
   format$setAmendmentNumber("2")
   format$setSpecification("specification")
   md$addFormat(format)
   
   xml <- md$encode()
 

geometa documentation built on Oct. 29, 2022, 1:06 a.m.