ISOImageryPlatform

ISOImageryPlatform

ISOImageryPlatform

Format

R6Class object.

Value

Object of R6Class for modelling an ISO imagery platform

References

- 19139 https://schemas.isotc211.org/19115/-2/gmi/1.0/gmi/#element_MI_Platform

- 19115-3 https://schemas.isotc211.org/19115/-3/mac/2.0/mac/#element_MI_Platform

Author

Emmanuel Blondel <emmanuel.blondel1@gmail.com>

Super classes

geometa::geometaLogger -> geometa::ISOAbstractObject -> ISOImageryPlatform

Public fields

citation

citation [0..*]: ISOCitation

identifier

identifier [1..1]: ISOMetaIdentifier

description

description [0..1]: character|ISOLocalisedCharacterString

sponsor

sponsor [0..*]: ISOResponsibleParty

instrument

instrument [0..*]: ISOImageryInstrument

otherPropertyType

otherPropertyType [0..1] : ISORecordType (=> ISO 19115-3)

otherProperty

otherProperty [0..1] : ISORecord (=> ISO 19115-3)

history

history [0..*] : ISOInstrumentationEventList (=> ISO 19115-3)

Methods

Public methods

• ISOImageryPlatform$new()

• ISOImageryPlatform$addCitation()

• ISOImageryPlatform$delCitation()

• ISOImageryPlatform$setIdentifier()

• ISOImageryPlatform$setDescription()

• ISOImageryPlatform$addSponsor()

• ISOImageryPlatform$delSponsor()

• ISOImageryPlatform$addInstrument()

• ISOImageryPlatform$delInstrument()

• ISOImageryPlatform$setOtherPropertyType()

• ISOImageryPlatform$setOtherProperty()

• ISOImageryPlatform$addInstrumentationEventList()

• ISOImageryPlatform$delInstrumentationEventList()

• ISOImageryPlatform$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

ISOImageryPlatform$new(xml = NULL)

Arguments

xml

object of class XMLInternalNode-class

---

Method addCitation()

Adds citation

Usage

ISOImageryPlatform$addCitation(citation)

Arguments

citation

object of class ISOCitation

Returns

TRUE if added, FALSE otherwise

---

Method delCitation()

Deletes citation

Usage

ISOImageryPlatform$delCitation(citation)

Arguments

citation

object of class ISOCitation

Returns

TRUE if deleted, FALSE otherwise

---

Method setIdentifier()

Set identifier

Usage

ISOImageryPlatform$setIdentifier(identifier)

Arguments

identifier

object of class ISOMetaIdentifier or character

---

Method setDescription()

Set description

Usage

ISOImageryPlatform$setDescription(description, locales = NULL)

Arguments

description

description

locales

list of localized texts. Default is NULL

---

Method addSponsor()

Adds sponsor

Usage

ISOImageryPlatform$addSponsor(sponsor)

Arguments

sponsor

object of class ISOResponsibleParty

Returns

TRUE if added, FALSE otherwise

---

Method delSponsor()

Deletes sponsor

Usage

ISOImageryPlatform$delSponsor(sponsor)

Arguments

sponsor

object of class ISOResponsibleParty

Returns

TRUE if deleted, FALSE otherwise

---

Method addInstrument()

Adds instrument

Usage

ISOImageryPlatform$addInstrument(instrument)

Arguments

instrument

object of class ISOImageryInstrument

Returns

TRUE if added, FALSE otherwise

---

Method delInstrument()

Deletes instrument

Usage

ISOImageryPlatform$delInstrument(instrument)

Arguments

instrument

object of class ISOImageryInstrument

Returns

TRUE if deleted, FALSE otherwise

---

Method setOtherPropertyType()

setOtherPropertyType

Usage

ISOImageryPlatform$setOtherPropertyType(otherPropertyType)

Arguments

otherPropertyType

otherPropertyType object of class ISORecordType

---

Method setOtherProperty()

setOtherProperty

Usage

ISOImageryPlatform$setOtherProperty(otherProperty)

Arguments

otherProperty

otherProperty object of class ISORecord

---

Method addInstrumentationEventList()

Adds instrumentation event list

Usage

ISOImageryPlatform$addInstrumentationEventList(instrumentEventList)

Arguments

instrumentEventList

object of class ISOInstrumentationEventList

Returns

TRUE if added, FALSE otherwise

---

Method delInstrumentationEventList()

Adds instrumentation event list

Usage

ISOImageryPlatform$delInstrumentationEventList(instrumentEventList)

Arguments

instrumentEventList

object of class ISOInstrumentationEventList

Returns

TRUE if deleted, FALSE otherwise

---

Method clone()

The objects of this class are cloneable with this method.

Usage

ISOImageryPlatform$clone(deep = FALSE)

Arguments

deep

Whether to make a deep clone.

Examples

   md <- ISOImageryPlatform$new()
   
   #add citation
   rp1 <- ISOResponsibleParty$new()
   rp1$setIndividualName("someone1")
   rp1$setOrganisationName("somewhere1")
   rp1$setPositionName("someposition1")
   rp1$setRole("pointOfContact")
   contact1 <- ISOContact$new()
   phone1 <- ISOTelephone$new()
   phone1$setVoice("myphonenumber1")
   phone1$setFacsimile("myfacsimile1")
   contact1$setPhone(phone1)
   address1 <- ISOAddress$new()
   address1$setDeliveryPoint("theaddress1")
   address1$setCity("thecity1")
   address1$setPostalCode("111")
   address1$setCountry("France")
   address1$setEmail("someone1@theorg.org")
   contact1$setAddress(address1)
   res <- ISOOnlineResource$new()
   res$setLinkage("http://www.somewhereovertheweb.org")
   res$setName("somename")
   contact1$setOnlineResource(res)
   rp1$setContactInfo(contact1)
   
   #citation
   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(ISOdate(2015,1,1))
   ct$addIdentifier(ISOMetaIdentifier$new(code = "identifier"))
#> [1] TRUE
   ct$addPresentationForm("mapDigital")
#> [1] TRUE
   ct$addCitedResponsibleParty(rp1)
#> [1] TRUE
   md$addCitation(ct)
#> [1] TRUE
   
   md$setIdentifier("identifier")
   md$setDescription("some description")
   
   xml <- md$encode()
#> [geometa][WARN] Element '{http://standards.iso.org/iso/19115/-2/gmi/1.0}MI_Platform': Missing child element(s). Expected is one of ( {http://standards.iso.org/iso/19115/-2/gmi/1.0}sponsor, {http://standards.iso.org/iso/19115/-2/gmi/1.0}instrument ) at line 1. 
#> [geometa][WARN] Object 'ISOImageryPlatform' is INVALID according to ISO 19139 XML schemas!