adiwg-mdtranslator 2.7.0 → 2.8.0

data/lib/adiwg/mdtranslator/writers/html/sections/html_projectionParameters.rb

@@ -24,17 +24,38 @@ module ADIWG
                   identifierClass = Html_Identifier.new(@html)
                   linePointClass = Html_ObliqueLinePoint.new()
 
-                  # projection parameters - projection name
-                  unless hProjection[:projectionName].nil?
-                     @html.em('Projection Name: ')
-                     @html.text!(hProjection[:projectionName])
+                  # projection parameters - grid system
+                  unless hProjection[:gridSystem].nil?
+                     @html.em('Grid System: ')
+                     @html.text!(hProjection[:gridSystem])
+                     @html.br
+                  end
+
+                  # projection parameters - grid system name
+                  unless hProjection[:gridSystemName].nil?
+                     @html.em('Grid System Name: ')
+                     @html.text!(hProjection[:gridSystemName])
                      @html.br
                   end
 
                   # projection parameters - zone
-                  unless hProjection[:zone].nil?
-                     @html.em('Projection Zone: ')
-                     @html.text!(hProjection[:zone])
+                  unless hProjection[:gridZone].nil?
+                     @html.em('Grid System Zone: ')
+                     @html.text!(hProjection[:gridZone])
+                     @html.br
+                  end
+
+                  # projection parameters - projection
+                  unless hProjection[:projection].nil?
+                     @html.em('Projection: ')
+                     @html.text!(hProjection[:projection])
+                     @html.br
+                  end
+
+                  # projection parameters - projection name
+                  unless hProjection[:projectionName].nil?
+                     @html.em('Projection Name: ')
+                     @html.text!(hProjection[:projectionName])
                      @html.br
                   end
 
@@ -194,14 +215,6 @@ module ADIWG
                      end
                   end
 
-                  # projection parameters - other projection description
-                  unless hProjection[:otherProjectionDescription].nil?
-                     @html.em('Other Projection Description: ')
-                     @html.section(:class => 'block') do
-                        @html.text!(hProjection[:otherProjectionDescription])
-                     end
-                  end
-
                   # projection parameters - other grid description
                   unless hProjection[:otherGridDescription].nil?
                      @html.em('Other Grid Description: ')
@@ -210,6 +223,14 @@ module ADIWG
                      end
                   end
 
+                  # projection parameters - other projection description
+                  unless hProjection[:otherProjectionDescription].nil?
+                     @html.em('Other Projection Description: ')
+                     @html.section(:class => 'block') do
+                        @html.text!(hProjection[:otherProjectionDescription])
+                     end
+                  end
+
                   # projection parameters - projection identifier
                   unless hProjection[:projectionIdentifier].empty?
                      @html.details do

data/lib/adiwg/mdtranslator/writers/html/sections/html_referenceSystemParameters.rb

@@ -5,7 +5,7 @@
 #  Stan Smith 2017-10-24 original script
 
 require_relative 'html_projectionParameters'
-require_relative 'html_ellipsoidParameters'
+require_relative 'html_geodeticParameters'
 require_relative 'html_verticalDatumParameters'
 
 module ADIWG
@@ -23,7 +23,7 @@ module ADIWG
 
                   # classes used
                   projectionClass = Html_ProjectionParameters.new(@html)
-                  ellipsoidClass = Html_EllipsoidParameters.new(@html)
+                  ellipsoidClass = Html_GeodeticParameters.new(@html)
                   verticalClass = Html_VerticalDatumParameters.new(@html)
 
                   # reference parameter set - projection
@@ -36,12 +36,12 @@ module ADIWG
                      end
                   end
 
-                  # reference parameter set - ellipsoid
-                  unless hParamSet[:ellipsoid].empty?
+                  # reference parameter set - geodetic
+                  unless hParamSet[:geodetic].empty?
                      @html.details do
-                        @html.summary('Ellipsoid Parameters', {'id' => 'ellipsoid', 'class' => 'h5'})
+                        @html.summary('Geodetic Parameters', {'id' => 'geodetic', 'class' => 'h5'})
                         @html.section(:class => 'block') do
-                           ellipsoidClass.writeHtml(hParamSet[:ellipsoid])
+                           ellipsoidClass.writeHtml(hParamSet[:geodetic])
                         end
                      end
                   end

data/lib/adiwg/mdtranslator/writers/html/sections/html_resourceInfo.rb

@@ -321,8 +321,7 @@ module ADIWG
                   end
 
                   # resource - keywords [] {keyword}
-                  unless hResource[:topicCategories].empty? &&
-                     hResource[:keywords].empty?
+                  unless hResource[:keywords].empty?
                      @html.details do
                         @html.summary('Keywords', {'id' => 'resourceInfo-keyword', 'class' => 'h3'})
                         @html.section(:class => 'block') do

data/lib/adiwg/mdtranslator/writers/html/sections/html_verticalDatumParameters.rb

@@ -30,6 +30,13 @@ module ADIWG
                   end
                   @html.br
 
+                  # vertical datum - datum name
+                  unless hDatum[:datumName].nil?
+                     @html.em('Datum Name: ')
+                     @html.text!(hDatum[:datumName])
+                     @html.br
+                  end
+
                   # vertical datum - encoding method
                   unless hDatum[:encodingMethod].nil?
                      @html.em('Encoding Method: ')

data/lib/adiwg/mdtranslator/writers/iso19115_2/classes/class_crs.rb

@@ -41,39 +41,52 @@ module ADIWG
                      @xml.tag!('gmd:projection')
                   end
 
-                  # ellipsoid identifier {rsIdentifier}
-                  unless hParamSet[:ellipsoid].empty?
-                     hIdentifier = hParamSet[:ellipsoid][:ellipsoidIdentifier]
+                  # geodetic ellipsoid identifier {rsIdentifier}
+                  unless hParamSet[:geodetic].empty?
+                     hIdentifier = hParamSet[:geodetic][:ellipsoidIdentifier]
                      unless hIdentifier.empty?
                         @xml.tag!('gmd:ellipsoid') do
                            idClass.writeXML(hIdentifier)
                         end
                      end
                   end
-                  if hParamSet[:ellipsoid] && @hResponseObj[:writerShowTags]
+                  if hParamSet[:geodetic].empty? && @hResponseObj[:writerShowTags]
                      @xml.tag!('gmd:ellipsoid')
                   end
 
+                  haveDatum = false
+                  # geodetic datum identifier {rsIdentifier}
+                  unless hParamSet[:geodetic].empty?
+                     hIdentifier = hParamSet[:geodetic][:datumIdentifier]
+                     unless hIdentifier.empty?
+                        @xml.tag!('gmd:datum') do
+                           idClass.writeXML(hIdentifier)
+                           haveDatum = true
+                        end
+                     end
+                  end
+
                   # vertical datum identifier {rsIdentifier}
                   unless hParamSet[:verticalDatum].empty?
                      hIdentifier = hParamSet[:verticalDatum][:datumIdentifier]
                      unless hIdentifier.empty?
                         @xml.tag!('gmd:datum') do
                            idClass.writeXML(hIdentifier)
+                           haveDatum = true
                         end
                      end
                   end
-                  if hParamSet[:verticalDatum].empty? && @hResponseObj[:writerShowTags]
+                  if !haveDatum && @hResponseObj[:writerShowTags]
                      @xml.tag!('gmd:datum')
                   end
 
                   # ellipsoid parameters
-                  unless hParamSet[:ellipsoid].empty?
+                  unless hParamSet[:geodetic].empty?
                      @xml.tag!('gmd:ellipsoidParameters') do
-                        ellipsoidClass.writeXML(hParamSet[:ellipsoid])
+                        ellipsoidClass.writeXML(hParamSet[:geodetic])
                      end
                   end
-                  if hParamSet[:ellipsoid].empty? && @hResponseObj[:writerShowTags]
+                  if hParamSet[:geodetic].empty? && @hResponseObj[:writerShowTags]
                      @xml.tag!('gmd:ellipsoidParameters')
                   end
 

data/lib/adiwg/mdtranslator/writers/iso19115_2/classes/class_dataIdentification.rb

@@ -2,19 +2,21 @@
 # 19115-2 writer output in XML
 
 # History:
-#   Stan Smith 2016-12-13 refactored for mdTranslator/mdJson 2.0
-#   Stan Smith 2015-07-30 added support for translating locale into language and characterSet
-#   Stan Smith 2015-07-14 refactored to eliminate namespace globals $WriterNS and $IsoNS
-#   Stan Smith 2015-07-14 refactored to make iso19110 independent of iso19115_2 classes
-#   Stan Smith 2015-06-22 replace global ($response) with passed in object (hResponseObj)
-#   Stan Smith 2015-06-12 added support for declaring multiple resource character sets
-#   Stan Smith 2015-06-11 change all codelists to use 'class_codelist' method
-#   Stan Smith 2014-12-12 refactored to handle namespacing readers and writers
-#   Stan Smith 2014-12-12 refactored to handle namespacing readers and writers
-#   Stan Smith 2014-10-29 add resource time period as a extent temporal element
-#   Stan Smith 2014-07-08 modify require statements to function in RubyGem structure
-#   Stan Smith 2014-05-21 added aggregate information section
-#   Stan Smith 2014-05-15 modify to support JSON schema version 0.4.0
+#  Stan Smith 2018-01-05 deprecated topicCategory[]
+#  Stan Smith 2018-01-05 get topics from keywords where type='isoTopicCategory'
+#  Stan Smith 2016-12-13 refactored for mdTranslator/mdJson 2.0
+#  Stan Smith 2015-07-30 added support for translating locale into language and characterSet
+#  Stan Smith 2015-07-14 refactored to eliminate namespace globals $WriterNS and $IsoNS
+#  Stan Smith 2015-07-14 refactored to make iso19110 independent of iso19115_2 classes
+#  Stan Smith 2015-06-22 replace global ($response) with passed in object (hResponseObj)
+#  Stan Smith 2015-06-12 added support for declaring multiple resource character sets
+#  Stan Smith 2015-06-11 change all codelists to use 'class_codelist' method
+#  Stan Smith 2014-12-12 refactored to handle namespacing readers and writers
+#  Stan Smith 2014-12-12 refactored to handle namespacing readers and writers
+#  Stan Smith 2014-10-29 add resource time period as a extent temporal element
+#  Stan Smith 2014-07-08 modify require statements to function in RubyGem structure
+#  Stan Smith 2014-05-21 added aggregate information section
+#  Stan Smith 2014-05-15 modify to support JSON schema version 0.4.0
 # 	Stan Smith 2013-11-25 add spatial resolution
 # 	Stan Smith 2013-11-25 add resource usage
 # 	Stan Smith 2013-11-22 add metadata extension
@@ -42,312 +44,321 @@ require_relative 'class_resolution'
 require_relative 'class_extent'
 
 module ADIWG
-    module Mdtranslator
-        module Writers
-            module Iso19115_2
-
-                class MD_DataIdentification
-
-                    def initialize(xml, hResponseObj)
-                        @xml = xml
-                        @hResponseObj = hResponseObj
-                    end
-
-                    def writeXML(hData, aAssocRes)
-
-                        # classes used
-                        codelistClass =  MD_Codelist.new(@xml, @hResponseObj)
-                        enumerationClass =  MD_EnumerationList.new(@xml, @hResponseObj)
-                        citationClass =  CI_Citation.new(@xml, @hResponseObj)
-                        rPartyClass =  CI_ResponsibleParty.new(@xml, @hResponseObj)
-                        mInfoClass =  MD_MaintenanceInformation.new(@xml, @hResponseObj)
-                        bGraphicClass =  MD_BrowseGraphic.new(@xml, @hResponseObj)
-                        rFormatClass =  MD_Format.new(@xml, @hResponseObj)
-                        keywordClass =  MD_Keywords.new(@xml, @hResponseObj)
-                        useClass =  MD_Usage.new(@xml, @hResponseObj)
-                        uConClass =  MD_Constraints.new(@xml, @hResponseObj)
-                        lConClass =  MD_LegalConstraints.new(@xml, @hResponseObj)
-                        sConClass =  MD_SecurityConstraints.new(@xml, @hResponseObj)
-                        aggInfoClass =  MD_AggregateInformation.new(@xml, @hResponseObj)
-                        taxClass =  MD_TaxonSys.new(@xml, @hResponseObj)
-                        resolutionClass =  MD_Resolution.new(@xml, @hResponseObj)
-                        extentClass =  EX_Extent.new(@xml, @hResponseObj)
-
-                        # data identification
-                        @xml.tag!('gmd:MD_DataIdentification') do
-
-                            # data identification - citation {CI_Citation} (required)
-                            hCitation = hData[:citation]
-                            unless hCitation.empty?
-                                @xml.tag!('gmd:citation') do
-                                    citationClass.writeXML(hCitation)
-                                end
-                            end
-                            if hCitation.empty?
-                                @xml.tag!('gmd:citation', {'gco:nilReason' => 'missing'})
-                            end
-
-                            # data identification - abstract (required)
-                            s = hData[:abstract]
-                            unless s.nil?
-                                @xml.tag!('gmd:abstract') do
-                                    @xml.tag!('gco:CharacterString', s)
-                                end
-                            end
-                            if s.nil?
-                                @xml.tag!('gmd:abstract', {'gco:nilReason' => 'missing'})
-                            end
-
-                            # data identification - purpose
-                            s = hData[:purpose]
-                            unless s.nil?
-                                @xml.tag!('gmd:purpose') do
-                                    @xml.tag!('gco:CharacterString', s)
-                                end
-                            end
-                            if s.nil? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:purpose')
-                            end
-
-                            # data identification - credit []
-                            aCredits = hData[:credits]
-                            aCredits.each do |credit|
-                                @xml.tag!('gmd:credit') do
-                                    @xml.tag!('gco:CharacterString', credit)
-                                end
-                            end
-                            if aCredits.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:credit')
-                            end
-
-                            # data identification - status []
-                            aStatus = hData[:status]
-                            aStatus.each do |code|
-                                @xml.tag!('gmd:status') do
-                                    codelistClass.writeXML('gmd', 'iso_progress', code)
-                                end
-                            end
-                            if aStatus.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:status')
-                            end
-
-                            # data identification - point of contact
-                            aRParties = hData[:pointOfContacts]
-                            aRParties.each do |hRParty|
-                                role = hRParty[:roleName]
-                                aParties = hRParty[:parties]
-                                aParties.each do |hParty|
-                                    @xml.tag!('gmd:pointOfContact') do
-                                        rPartyClass.writeXML(role, hParty)
-                                    end
-                                end
-                            end
-                            if aRParties.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:pointOfContact', {'gco:nilReason' => 'missing'})
-                            end
-
-                            # data identification - resource maintenance []
-                            aMaint = hData[:resourceMaintenance]
-                            aMaint.each do |hMaint|
-                                @xml.tag!('gmd:resourceMaintenance') do
-                                    mInfoClass.writeXML(hMaint)
-                                end
-                            end
-                            if aMaint.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:resourceMaintenance')
-                            end
-
-                            # data identification - graphic overview []
-                            aGraphics = hData[:graphicOverviews]
-                            aGraphics.each do |hGraphic|
-                                @xml.tag!('gmd:graphicOverview') do
-                                    bGraphicClass.writeXML(hGraphic)
-                                end
-                            end
-                            if aGraphics.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:graphicOverview')
-                            end
-
-                            # data identification - resource format []
-                            aFormats = hData[:resourceFormats]
-                            aFormats.each do |hResFormat|
-                                @xml.tag!('gmd:resourceFormat') do
-                                    rFormatClass.writeXML(hResFormat)
-                                end
-                            end
-                            if aFormats.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:resourceFormat')
-                            end
-
-                            # data identification - descriptive keywords []
-                            aKeywords = hData[:keywords]
-                            aKeywords.each do |hKeyword|
-                                @xml.tag!('gmd:descriptiveKeywords') do
-                                    keywordClass.writeXML(hKeyword)
-                                end
-                            end
-                            if aKeywords.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:descriptiveKeywords')
-                            end
-
-                            # data identification - resource specific usage []
-                            aUses = hData[:resourceUsages]
-                            aUses.each do |hResUse|
-                                @xml.tag!('gmd:resourceSpecificUsage') do
-                                    useClass.writeXML(hResUse)
-                                end
-                            end
-                            if aUses.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:resourceSpecificUsage')
-                            end
-
-                            # data identification - resource constraints {}
-                            aCons = hData[:constraints]
-                            aCons.each do |hCon|
-                                @xml.tag!('gmd:resourceConstraints') do
-                                    type = hCon[:type]
-                                    if type == 'use'
-                                        uConClass.writeXML(hCon)
-                                    end
-                                    if type == 'legal'
-                                        lConClass.writeXML(hCon)
-                                    end
-                                    if type == 'security'
-                                        sConClass.writeXML(hCon)
-                                    end
-                                end
-                            end
-                            if aCons.nil? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:resourceConstraints')
-                            end
-
-                            # data identification - aggregate information []
-                            aAssocRes.each do |hAssocRes|
-                                @xml.tag!('gmd:aggregationInfo') do
-                                    aggInfoClass.writeXML(hAssocRes)
-                                end
-                            end
-                            if aAssocRes.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:aggregationInfo')
-                            end
-
-                            # data identification - taxonomy
-                            hTaxonomy = hData[:taxonomy]
-                            unless hTaxonomy.empty?
-                                @xml.tag!('gmd:taxonomy') do
-                                    taxClass.writeXML(hTaxonomy)
-                                end
-                            end
-                            if hTaxonomy.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:taxonomy')
-                            end
-
-                            # data identification - spatial representation type []
-                            aSpatialType = hData[:spatialRepresentationTypes]
-                            aSpatialType.each do |spType|
-                                @xml.tag!('gmd:spatialRepresentationType') do
-                                    codelistClass.writeXML('gmd', 'iso_spatialRepresentation',spType)
-                                end
-                            end
-                            if aSpatialType.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:spatialRepresentationType')
-                            end
-
-                            # data identification - spatial resolution []
-                            aSpatialRes = hData[:spatialResolutions]
-                            aSpatialRes.each do |hSpRes|
-                                @xml.tag!('gmd:spatialResolution') do
-                                    resolutionClass.writeXML(hSpRes)
-                                end
-                            end
-                            if aSpatialRes.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:spatialResolution')
-                            end
-
-                            # data identification - language [] (required)
-                            aLocale = hData[:otherResourceLocales]
-                            aLocale.insert(0, hData[:defaultResourceLocale])
-                            aLocale.each do |hLocale|
-                                s = hLocale[:languageCode]
-                                unless hLocale[:countryCode].nil?
-                                    s += '; ' + hLocale[:countryCode]
-                                end
-                                @xml.tag!('gmd:language') do
-                                    @xml.tag!('gco:CharacterString', s)
-                                end
-                            end
-                            if aLocale.empty?
-                                @xml.tag!('gmd:language') do
-                                    @xml.tag!('gco:CharacterString', 'eng; USA')
-                                end
-                            end
-
-                            # data identification - characterSet [] (default 'utf8')
-                            charSets = 0
-                            aLocale.each do |hLocale|
-                                s = hLocale[:characterEncoding]
-                                unless s.nil?
-                                    @xml.tag!('gmd:characterSet') do
-                                        codelistClass.writeXML('gmd', 'iso_characterSet', s)
-                                        charSets += 1
-                                    end
-                                end
-                            end
-                            if charSets == 0
-                                @xml.tag!('gmd:language') do
-                                    @xml.tag!('gco:CharacterString', 'eng; USA')
-                                end
-                            end
-
-                            # data identification - topic category []
-                            aTopics = hData[:topicCategories]
-                            aTopics.each do |spType|
-                                @xml.tag!('gmd:topicCategory') do
-                                    enumerationClass.writeXML('iso_topicCategory', spType)
-                                end
-                            end
-                            if aTopics.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:topicCategory')
-                            end
-
-                            # data identification - environment description
-                            s = hData[:environmentDescription]
-                            unless s.nil?
-                                @xml.tag!('gmd:environmentDescription') do
-                                    @xml.tag!('gco:CharacterString', s)
-                                end
-                            end
-                            if s.nil? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:environmentDescription')
-                            end
-
-                            # data identification - extent []
-                            aExtents = hData[:extents]
-                            aExtents.each do |hExtent|
-                                @xml.tag!('gmd:extent') do
-                                    extentClass.writeXML(hExtent)
-                                end
-                            end
-                            if aExtents.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:extent')
-                            end
-
-                            # data identification - supplemental info
-                            s = hData[:supplementalInfo]
-                            unless s.nil?
-                                @xml.tag!('gmd:supplementalInformation') do
-                                    @xml.tag!('gco:CharacterString', s)
-                                end
-                            end
-                            if s.nil? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:supplementalInformation')
-                            end
-
-                        end # gmd:MD_DataIdentification tag
-                    end # writeXML
-                end # MD_DataIdentification class
-
-            end
-        end
-    end
+   module Mdtranslator
+      module Writers
+         module Iso19115_2
+
+            class MD_DataIdentification
+
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+               end
+
+               def writeXML(hData, aAssocRes)
+
+                  # classes used
+                  codelistClass = MD_Codelist.new(@xml, @hResponseObj)
+                  enumerationClass = MD_EnumerationList.new(@xml, @hResponseObj)
+                  citationClass = CI_Citation.new(@xml, @hResponseObj)
+                  rPartyClass = CI_ResponsibleParty.new(@xml, @hResponseObj)
+                  mInfoClass = MD_MaintenanceInformation.new(@xml, @hResponseObj)
+                  bGraphicClass = MD_BrowseGraphic.new(@xml, @hResponseObj)
+                  rFormatClass = MD_Format.new(@xml, @hResponseObj)
+                  keywordClass = MD_Keywords.new(@xml, @hResponseObj)
+                  useClass = MD_Usage.new(@xml, @hResponseObj)
+                  uConClass = MD_Constraints.new(@xml, @hResponseObj)
+                  lConClass = MD_LegalConstraints.new(@xml, @hResponseObj)
+                  sConClass = MD_SecurityConstraints.new(@xml, @hResponseObj)
+                  aggInfoClass = MD_AggregateInformation.new(@xml, @hResponseObj)
+                  taxClass = MD_TaxonSys.new(@xml, @hResponseObj)
+                  resolutionClass = MD_Resolution.new(@xml, @hResponseObj)
+                  extentClass = EX_Extent.new(@xml, @hResponseObj)
+
+                  # data identification
+                  @xml.tag!('gmd:MD_DataIdentification') do
+
+                     # data identification - citation {CI_Citation} (required)
+                     hCitation = hData[:citation]
+                     unless hCitation.empty?
+                        @xml.tag!('gmd:citation') do
+                           citationClass.writeXML(hCitation)
+                        end
+                     end
+                     if hCitation.empty?
+                        @xml.tag!('gmd:citation', {'gco:nilReason' => 'missing'})
+                     end
+
+                     # data identification - abstract (required)
+                     s = hData[:abstract]
+                     unless s.nil?
+                        @xml.tag!('gmd:abstract') do
+                           @xml.tag!('gco:CharacterString', s)
+                        end
+                     end
+                     if s.nil?
+                        @xml.tag!('gmd:abstract', {'gco:nilReason' => 'missing'})
+                     end
+
+                     # data identification - purpose
+                     s = hData[:purpose]
+                     unless s.nil?
+                        @xml.tag!('gmd:purpose') do
+                           @xml.tag!('gco:CharacterString', s)
+                        end
+                     end
+                     if s.nil? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:purpose')
+                     end
+
+                     # data identification - credit []
+                     aCredits = hData[:credits]
+                     aCredits.each do |credit|
+                        @xml.tag!('gmd:credit') do
+                           @xml.tag!('gco:CharacterString', credit)
+                        end
+                     end
+                     if aCredits.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:credit')
+                     end
+
+                     # data identification - status []
+                     aStatus = hData[:status]
+                     aStatus.each do |code|
+                        @xml.tag!('gmd:status') do
+                           codelistClass.writeXML('gmd', 'iso_progress', code)
+                        end
+                     end
+                     if aStatus.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:status')
+                     end
+
+                     # data identification - point of contact
+                     aRParties = hData[:pointOfContacts]
+                     aRParties.each do |hRParty|
+                        role = hRParty[:roleName]
+                        aParties = hRParty[:parties]
+                        aParties.each do |hParty|
+                           @xml.tag!('gmd:pointOfContact') do
+                              rPartyClass.writeXML(role, hParty)
+                           end
+                        end
+                     end
+                     if aRParties.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:pointOfContact', {'gco:nilReason' => 'missing'})
+                     end
+
+                     # data identification - resource maintenance []
+                     aMaint = hData[:resourceMaintenance]
+                     aMaint.each do |hMaint|
+                        @xml.tag!('gmd:resourceMaintenance') do
+                           mInfoClass.writeXML(hMaint)
+                        end
+                     end
+                     if aMaint.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:resourceMaintenance')
+                     end
+
+                     # data identification - graphic overview []
+                     aGraphics = hData[:graphicOverviews]
+                     aGraphics.each do |hGraphic|
+                        @xml.tag!('gmd:graphicOverview') do
+                           bGraphicClass.writeXML(hGraphic)
+                        end
+                     end
+                     if aGraphics.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:graphicOverview')
+                     end
+
+                     # data identification - resource format []
+                     aFormats = hData[:resourceFormats]
+                     aFormats.each do |hResFormat|
+                        @xml.tag!('gmd:resourceFormat') do
+                           rFormatClass.writeXML(hResFormat)
+                        end
+                     end
+                     if aFormats.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:resourceFormat')
+                     end
+
+                     # data identification - descriptive keywords []
+                     aKeywords = hData[:keywords]
+                     aKeywords.each do |hKeyword|
+                        @xml.tag!('gmd:descriptiveKeywords') do
+                           keywordClass.writeXML(hKeyword)
+                        end
+                     end
+                     if aKeywords.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:descriptiveKeywords')
+                     end
+
+                     # data identification - resource specific usage []
+                     aUses = hData[:resourceUsages]
+                     aUses.each do |hResUse|
+                        @xml.tag!('gmd:resourceSpecificUsage') do
+                           useClass.writeXML(hResUse)
+                        end
+                     end
+                     if aUses.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:resourceSpecificUsage')
+                     end
+
+                     # data identification - resource constraints {}
+                     aCons = hData[:constraints]
+                     aCons.each do |hCon|
+                        @xml.tag!('gmd:resourceConstraints') do
+                           type = hCon[:type]
+                           if type == 'use'
+                              uConClass.writeXML(hCon)
+                           end
+                           if type == 'legal'
+                              lConClass.writeXML(hCon)
+                           end
+                           if type == 'security'
+                              sConClass.writeXML(hCon)
+                           end
+                        end
+                     end
+                     if aCons.nil? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:resourceConstraints')
+                     end
+
+                     # data identification - aggregate information []
+                     aAssocRes.each do |hAssocRes|
+                        @xml.tag!('gmd:aggregationInfo') do
+                           aggInfoClass.writeXML(hAssocRes)
+                        end
+                     end
+                     if aAssocRes.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:aggregationInfo')
+                     end
+
+                     # data identification - taxonomy
+                     hTaxonomy = hData[:taxonomy]
+                     unless hTaxonomy.empty?
+                        @xml.tag!('gmd:taxonomy') do
+                           taxClass.writeXML(hTaxonomy)
+                        end
+                     end
+                     if hTaxonomy.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:taxonomy')
+                     end
+
+                     # data identification - spatial representation type []
+                     aSpatialType = hData[:spatialRepresentationTypes]
+                     aSpatialType.each do |spType|
+                        @xml.tag!('gmd:spatialRepresentationType') do
+                           codelistClass.writeXML('gmd', 'iso_spatialRepresentation', spType)
+                        end
+                     end
+                     if aSpatialType.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:spatialRepresentationType')
+                     end
+
+                     # data identification - spatial resolution []
+                     aSpatialRes = hData[:spatialResolutions]
+                     aSpatialRes.each do |hSpRes|
+                        @xml.tag!('gmd:spatialResolution') do
+                           resolutionClass.writeXML(hSpRes)
+                        end
+                     end
+                     if aSpatialRes.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:spatialResolution')
+                     end
+
+                     # data identification - language [] (required)
+                     aLocale = hData[:otherResourceLocales]
+                     aLocale.insert(0, hData[:defaultResourceLocale])
+                     aLocale.each do |hLocale|
+                        s = hLocale[:languageCode]
+                        unless hLocale[:countryCode].nil?
+                           s += '; ' + hLocale[:countryCode]
+                        end
+                        @xml.tag!('gmd:language') do
+                           @xml.tag!('gco:CharacterString', s)
+                        end
+                     end
+                     if aLocale.empty?
+                        @xml.tag!('gmd:language') do
+                           @xml.tag!('gco:CharacterString', 'eng; USA')
+                        end
+                     end
+
+                     # data identification - characterSet [] (default 'utf8')
+                     charSets = 0
+                     aLocale.each do |hLocale|
+                        s = hLocale[:characterEncoding]
+                        unless s.nil?
+                           @xml.tag!('gmd:characterSet') do
+                              codelistClass.writeXML('gmd', 'iso_characterSet', s)
+                              charSets += 1
+                           end
+                        end
+                     end
+                     if charSets == 0
+                        @xml.tag!('gmd:language') do
+                           @xml.tag!('gco:CharacterString', 'eng; USA')
+                        end
+                     end
+
+                     # data identification - topic category []
+                     # <- hData.keywords where keywordType='isoTopicCategory'
+                     aTopics = []
+                     aKeywords = hData[:keywords]
+                     aKeywords.each do |hKeyword|
+                        if hKeyword[:keywordType] == 'isoTopicCategory'
+                           hKeyword[:keywords].each do |hKeyObj|
+                              aTopics << hKeyObj[:keyword]
+                           end
+                        end
+                     end
+                     aTopics.each do |topic|
+                        @xml.tag!('gmd:topicCategory') do
+                           enumerationClass.writeXML('iso_topicCategory', topic)
+                        end
+                     end
+                     if aTopics.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:topicCategory')
+                     end
+
+                     # data identification - environment description
+                     s = hData[:environmentDescription]
+                     unless s.nil?
+                        @xml.tag!('gmd:environmentDescription') do
+                           @xml.tag!('gco:CharacterString', s)
+                        end
+                     end
+                     if s.nil? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:environmentDescription')
+                     end
+
+                     # data identification - extent []
+                     aExtents = hData[:extents]
+                     aExtents.each do |hExtent|
+                        @xml.tag!('gmd:extent') do
+                           extentClass.writeXML(hExtent)
+                        end
+                     end
+                     if aExtents.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:extent')
+                     end
+
+                     # data identification - supplemental info
+                     s = hData[:supplementalInfo]
+                     unless s.nil?
+                        @xml.tag!('gmd:supplementalInformation') do
+                           @xml.tag!('gco:CharacterString', s)
+                        end
+                     end
+                     if s.nil? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:supplementalInformation')
+                     end
+
+                  end # gmd:MD_DataIdentification tag
+               end # writeXML
+            end # MD_DataIdentification class
+
+         end
+      end
+   end
 end