ISOPortrayalCatalogueReference: ISOPortrayalCatalogueReference

ISOPortrayalCatalogueReferenceR Documentation

ISOPortrayalCatalogueReference

Description

ISOPortrayalCatalogueReference

ISOPortrayalCatalogueReference

Format

R6Class object.

Value

Object of R6Class for modelling an ISOPortrayalCatalogueReference

Super classes

geometa::geometaLogger -> geometa::ISOAbstractObject -> ISOPortrayalCatalogueReference

Public fields

portrayalCatalogueCitation

portrayalCatalogueCitation [1..*]

Methods

Public methods

Inherited methods

Method new()

Initializes object

Usage
ISOPortrayalCatalogueReference$new(xml = NULL)
Arguments
xml

object of class XMLInternalNode-class


Method addCitation()

Adds citation

Usage
ISOPortrayalCatalogueReference$addCitation(citation)
Arguments
citation

object of class ISOCitation

Returns

TRUE if added, FALSE otherwise


Method delCitation()

Deletes citation

Usage
ISOPortrayalCatalogueReference$delCitation(citation)
Arguments
citation

object of class ISOCitation

Returns

TRUE if deleted, FALSE otherwise


Method clone()

The objects of this class are cloneable with this method.

Usage
ISOPortrayalCatalogueReference$clone(deep = FALSE)
Arguments
deep

Whether to make a deep clone.

Author(s)

Emmanuel Blondel <emmanuel.blondel1@gmail.com>

References

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

- ISO 19115-3 https://schemas.isotc211.org/19115/-3/mpc/1.0/mpc/#element_MD_PortrayalCatalogueReference

Examples

   md <- ISOPortrayalCatalogueReference$new()
   #citation
   rp <- ISOResponsibleParty$new()
   rp$setIndividualName("someone")
   rp$setOrganisationName("somewhere")
   rp$setPositionName("someposition")
   rp$setRole("pointOfContact")
   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://somelink")
   res$setName("somename")
   contact$setOnlineResource(res)
   rp$setContactInfo(contact)
   ct <- ISOCitation$new()
   ct$setTitle("sometitle")
   d <- ISODate$new()
   d$setDate(ISOdate(2015, 1, 1, 1))
   d$setDateType("publication")
   ct$addDate(d)
   ct$setEdition("1.0")
   ct$setEditionDate(as.Date(ISOdate(2015, 1, 1, 1)))
   ct$addIdentifier(ISOMetaIdentifier$new(code = "identifier"))
   ct$addPresentationForm("mapDigital")
   ct$addCitedResponsibleParty(rp)
   md$addCitation(ct)
   
   xml <- md$encode()
   

eblondel/geometa documentation built on Oct. 10, 2024, 4:46 p.m.