ISOCitation
ISOCitation
R6Class
object.
Object of R6Class
for modelling an ISO Citation
ISO 19115:2003 - Geographic information – Metadata
geometa::geometaLogger
-> geometa::ISOAbstractObject
-> ISOCitation
title
title
alternateTitle
alternate title
date
date list
edition
edition
editionDate
edition date
identifier
identifier list
citedResponsibleParty
list of cited responsible parties
presentationForm
list of presentation forms
series
series
otherCitationDetails
other citation details
collectiveTitle
collective title
ISBN
ISBN
ISSN
ISSN
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()
setEditionDate()
Sets the edition date, either an ISODate object containing date and dateType or
a simple R date "POSIXct"/"POSIXt" object. For thesaurus citations, an ISODate
should be used while for the general citation of ISODataIdentification
,
a simple R date should be used.
setIdentifier()
Set identifier
identifier
identifier, object of class ISOMetaIdentifier
addIdentifier()
Adds identifier
identifier
identifier, object of class ISOMetaIdentifier
locales
list of localized identifiers. Default is NULL
delIdentifier()
Deletes identifier
identifier
identifier, object of class ISOMetaIdentifier
locales
list of localized identifiers. Default is NULL
setCitedResponsibleParty()
Set cited responsible party
rp
cited responsible party, object of class ISOResponsibleParty
addCitedResponsibleParty()
Adds cited responsible party
rp
cited responsible party, object of class ISOResponsibleParty
locales
list of localized responsible parties. Default is NULL
delCitedResponsibleParty()
Deletes cited responsible party
rp
cited responsible party, object of class ISOResponsibleParty
locales
list of localized responsible parties. Default is NULL
setPresentationForm()
Sets presentation form
presentationForm
presentation form, object of class ISOPresentationForm or character among values
returned by ISOPresentationForm$values()
addPresentationForm()
Adds presentation form
presentationForm
presentation form, object of class ISOPresentationForm or
character among values returned by ISOPresentationForm$values()
delPresentationForm()
Deletes presentation form
presentationForm
presentation form, object of class ISOPresentationForm or
character among values returned by ISOPresentationForm$values()
#create ISOCitation
md <- ISOCitation$new()
md$setTitle("sometitle")
md$setEdition("1.0")
md$setEditionDate(ISOdate(2015,1,1))
md$addIdentifier(ISOMetaIdentifier$new(code = "identifier"))
#> [1] TRUE
md$addPresentationForm("mapDigital")
#> [1] TRUE
#add a cited responsible party
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://www.somewhereovertheweb.org")
res$setName("somename")
contact$setOnlineResource(res)
rp$setContactInfo(contact)
md$addCitedResponsibleParty(rp)
#> [1] TRUE
xml <- md$encode()
#> [geometa][WARN] Element '{http://www.isotc211.org/2005/gmd}edition': This element is not expected. Expected is one of ( {http://www.isotc211.org/2005/gmd}alternateTitle, {http://www.isotc211.org/2005/gmd}date ) at line 5.
#> [geometa][WARN] Object 'ISOCitation' is INVALID according to ISO 19139 XML schemas!