adiwg-mdtranslator 2.12.0 → 2.13.0

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

@@ -31,7 +31,7 @@ module ADIWG
 
                   @xml.tag!('gmd:MD_Distribution') do
 
-                     # distribution - distributor (required)
+                     # distribution - distributor
                      aDistributors = hDistribution[:distributor]
                      unless aDistributors.empty?
                         aDistributors.each do |hDistributor|

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

@@ -2,97 +2,100 @@
 # 19115-2 writer output in XML
 
 # History:
-#   Stan Smith 2016-12-07 refactored for mdTranslator/mdJson 2.0
-#   Stan Smith 2015-09-21 added format from distributorTransferOptions
-#   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 2014-12-12 refactored to handle namespacing readers and writers
-#   Stan Smith 2014-07-09 modify require statements to function in RubyGem structure
+#  Stan Smith 2018-04-09 add error and warning messaging
+#  Stan Smith 2016-12-07 refactored for mdTranslator/mdJson 2.0
+#  Stan Smith 2015-09-21 added format from distributorTransferOptions
+#  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 2014-12-12 refactored to handle namespacing readers and writers
+#  Stan Smith 2014-07-09 modify require statements to function in RubyGem structure
 # 	Stan Smith 2013-09-25 original script
 
+require_relative '../iso19115_2_writer'
 require_relative 'class_responsibleParty'
 require_relative 'class_orderProcess'
 require_relative 'class_format'
 require_relative 'class_transferOptions'
 
 module ADIWG
-    module Mdtranslator
-        module Writers
-            module Iso19115_2
+   module Mdtranslator
+      module Writers
+         module Iso19115_2
 
-                class MD_Distributor
+            class MD_Distributor
 
-                    def initialize(xml, hResponseObj)
-                        @xml = xml
-                        @hResponseObj = hResponseObj
-                    end
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+                  @NameSpace = ADIWG::Mdtranslator::Writers::Iso19115_2
+               end
 
-                    def writeXML(hDistributor)
+               def writeXML(hDistributor)
 
-                        # classes used
-                        partyClass =  CI_ResponsibleParty.new(@xml, @hResponseObj)
-                        orderClass =  MD_StandardOrderProcess.new(@xml, @hResponseObj)
-                        formatClass =  MD_Format.new(@xml, @hResponseObj)
-                        transferClass =  MD_DigitalTransferOptions.new(@xml, @hResponseObj)
+                  # classes used
+                  partyClass = CI_ResponsibleParty.new(@xml, @hResponseObj)
+                  orderClass = MD_StandardOrderProcess.new(@xml, @hResponseObj)
+                  formatClass = MD_Format.new(@xml, @hResponseObj)
+                  transferClass = MD_DigitalTransferOptions.new(@xml, @hResponseObj)
 
-                        @xml.tag!('gmd:MD_Distributor') do
+                  @xml.tag!('gmd:MD_Distributor') do
 
-                            # distributor - contact (required) {CI_ResponsibleParty}
-                            role = 'distributor'
-                            hParty = hDistributor[:contact][:parties][0]
-                            unless hParty.nil?
-                                @xml.tag!('gmd:distributorContact') do
-                                    partyClass.writeXML(role, hParty)
-                                end
-                            end
-                            if hParty.nil?
-                                @xml.tag!('gmd:distributorContact', {'gco:nilReason'=>'missing'})
-                            end
+                     # distributor - contact (required) {CI_ResponsibleParty}
+                     role = 'distributor'
+                     hParty = hDistributor[:contact][:parties][0]
+                     unless hParty.nil?
+                        @xml.tag!('gmd:distributorContact') do
+                           partyClass.writeXML(role, hParty, 'distributor')
+                        end
+                     end
+                     if hParty.nil?
+                        @NameSpace.issueWarning(90, 'gmd:distributorContact')
+                     end
 
-                            # distributor - order process [{MD_StandardOrderProcess}]
-                            aDistOrderProc = hDistributor[:orderProcess]
-                            aDistOrderProc.each do |hOrder|
-                                @xml.tag!('gmd:distributionOrderProcess') do
-                                    orderClass.writeXML(hOrder)
-                                end
-                            end
-                            if aDistOrderProc.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:distributionOrderProcess')
-                            end
+                     # distributor - order process [{MD_StandardOrderProcess}]
+                     aDistOrderProc = hDistributor[:orderProcess]
+                     aDistOrderProc.each do |hOrder|
+                        @xml.tag!('gmd:distributionOrderProcess') do
+                           orderClass.writeXML(hOrder)
+                        end
+                     end
+                     if aDistOrderProc.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:distributionOrderProcess')
+                     end
 
-                            # distributor - format [{MD_Format}]
-                            format = false
-                            aOptions = hDistributor[:transferOptions]
-                            aOptions.each do |hOption|
-                                aFormats = hOption[:distributionFormats]
-                                aFormats.each do |hFormat|
-                                    format = true
-                                    @xml.tag!('gmd:distributorFormat') do
-                                        formatClass.writeXML(hFormat)
-                                    end
-                                end
-                            end
-                            if !format && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:distributorFormat')
-                            end
+                     # distributor - format [{MD_Format}]
+                     format = false
+                     aOptions = hDistributor[:transferOptions]
+                     aOptions.each do |hOption|
+                        aFormats = hOption[:distributionFormats]
+                        aFormats.each do |hFormat|
+                           format = true
+                           @xml.tag!('gmd:distributorFormat') do
+                              formatClass.writeXML(hFormat)
+                           end
+                        end
+                     end
+                     if !format && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:distributorFormat')
+                     end
 
-                            # distributor - transfer options [{MD_DigitalTransferOptions}]
-                            aOptions = hDistributor[:transferOptions]
-                            aOptions.each do |hOption|
-                                @xml.tag!('gmd:distributorTransferOptions') do
-                                    transferClass.writeXML(hOption)
-                                end
-                            end
-                            if aOptions.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:distributorTransferOptions')
-                            end
+                     # distributor - transfer options [{MD_DigitalTransferOptions}]
+                     aOptions = hDistributor[:transferOptions]
+                     aOptions.each do |hOption|
+                        @xml.tag!('gmd:distributorTransferOptions') do
+                           transferClass.writeXML(hOption)
+                        end
+                     end
+                     if aOptions.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:distributorTransferOptions')
+                     end
 
-                        end # gmd:MD_Distributor tag
-                    end # writeXML
-                end # MD_Distributor class
+                  end # gmd:MD_Distributor tag
+               end # writeXML
+            end # MD_Distributor class
 
-            end
-        end
-    end
+         end
+      end
+   end
 end

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

@@ -2,51 +2,51 @@
 # 19115-2 writer output in XML
 
 # History:
-#   Stan Smith 2016-12-12 refactored for mdTranslator/mdJson 2.0
-#   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 (responseObj)
-#   Stan Smith 2015-06-12 refactored to use mdCodes gem for codelist contents
-#   Stan Smith 2014-12-15 replaced NOAA CT_CodelistCatalogue with mdTranslator CT_CodelistCatalogue
-#   Stan Smith 2014-12-12 refactored to handle namespacing readers and writers
-#   Stan Smith 2014-10-15 allow non-ISO codesNames to be rendered
+#  Stan Smith 2016-12-12 refactored for mdTranslator/mdJson 2.0
+#  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 (responseObj)
+#  Stan Smith 2015-06-12 refactored to use mdCodes gem for codelist contents
+#  Stan Smith 2014-12-15 replaced NOAA CT_CodelistCatalogue with mdTranslator CT_CodelistCatalogue
+#  Stan Smith 2014-12-12 refactored to handle namespacing readers and writers
+#  Stan Smith 2014-10-15 allow non-ISO codesNames to be rendered
 # 	Stan Smith 2013-08-09 original script
 
 require 'adiwg-mdcodes'
 
 module ADIWG
-    module Mdtranslator
-        module Writers
-            module Iso19115_2
+   module Mdtranslator
+      module Writers
+         module Iso19115_2
 
-                class MD_EnumerationList
+            class MD_EnumerationList
 
-                    def initialize(xml, responseObj)
-                        @xml = xml
-                        @hResponseObj = responseObj
-                    end
+               def initialize(xml, responseObj)
+                  @xml = xml
+                  @hResponseObj = responseObj
+               end
 
-                    def writeXML(codeList, codeName)
+               def writeXML(codeList, codeName)
 
-                        # get requested codelist from the adiwg-mdcodes gem
-                        mdCodelist = ADIWG::Mdcodes.getCodelistDetail(codeList)
+                  # get requested codelist from the adiwg-mdcodes gem
+                  mdCodelist = ADIWG::Mdcodes.getCodelistDetail(codeList)
 
-                        sourceName = mdCodelist['sourceName']
-                        codelist = mdCodelist['codelist']
+                  sourceName = mdCodelist['sourceName']
+                  codelist = mdCodelist['codelist']
 
-                        # search the codelist for a matching codeName
-                        # only valid enumeration values can be written in ISO
-                        codelist.each do |code|
-                            if code['codeName'] == codeName
-                                @xml.tag!('gmd:' + "#{sourceName}", codeName)
-                                break
-                            end
-                        end
+                  # search the codelist for a matching codeName
+                  # only valid enumeration values can be written in ISO
+                  codelist.each do |code|
+                     if code['codeName'] == codeName
+                        @xml.tag!('gmd:' + "#{sourceName}", codeName)
+                        break
+                     end
+                  end
 
-                    end # writeXML
-                end # MD_EnumerationList class
+               end # writeXML
+            end # MD_EnumerationList class
 
-            end
-        end
-    end
+         end
+      end
+   end
 end

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

@@ -2,198 +2,202 @@
 # 19115-2 writer output in XML
 
 # History:
+#  Stan Smith 2018-04-09 add error and warning messaging
+#  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-11 change all codelists to use 'class_codelist' method
+#  Stan Smith 2014-12-12 refactored to handle namespacing readers and writers
+#  Stan Smith 2014-07-08 modify require statements to function in RubyGem structure
 # 	Stan Smith 2013-11-22 original script.
-#   Stan Smith 2014-07-08 modify require statements to function in RubyGem structure
-#   Stan Smith 2014-12-12 refactored to handle namespacing readers and writers
-#   Stan Smith 2015-06-11 change all codelists to use 'class_codelist' method
-#   Stan Smith 2015-06-22 replace global ($response) with passed in object (hResponseObj)
-#   Stan Smith 2015-07-14 refactored to make iso19110 independent of iso19115_2 classes
-#   Stan Smith 2015-07-14 refactored to eliminate namespace globals $WriterNS and $IsoNS
 
+require_relative '../iso19115_2_writer'
 require_relative 'class_codelist'
 require_relative 'class_enumerationList'
 require_relative 'class_onlineResource'
-require_relative 'class_responsibleParty'
 
 module ADIWG
-    module Mdtranslator
-        module Writers
-            module Iso19115_2
-
-                class MD_MetadataExtensionInformation
-
-                    def initialize(xml, hResponseObj)
-                        @xml = xml
-                        @hResponseObj = hResponseObj
-                    end
-
-                    def writeXML(hExtension)
-
-                        # classes used
-                        codelistClass = MD_Codelist.new(@xml, @hResponseObj)
-                        enumerationClass = MD_EnumerationList.new(@xml, @hResponseObj)
-                        olResClass = CI_OnlineResource.new(@xml, @hResponseObj)
-                        partyClass = CI_ResponsibleParty.new(@xml, @hResponseObj)
-
-                        @xml.tag!('gmd:MD_MetadataExtensionInformation') do
-
-                            # metadata extension - online resource {CI_OnLineResource}
-                            hOLResource = hExtension[:onLineResource]
-                            unless hOLResource.empty?
-                                @xml.tag!('gmd:extensionOnLineResource') do
-                                    olResClass.writeXML(hOLResource)
-                                end
-                            end
-                            if hOLResource.empty? && @hResponseObj[:writerShowTags]
-                                @xml.tag!('gmd:extensionOnLineResource')
-                            end
-
-                            # metadata extension = extended element information
-                            @xml.tag!('gmd:extendedElementInformation') do
-                                @xml.tag!('gmd:MD_ExtendedElementInformation') do
-
-                                    # extended element info - name (required)
-                                    s = hExtension[:name]
-                                    unless s.nil?
-                                        @xml.tag!('gmd:name') do
-                                            @xml.tag!('gco:CharacterString', s)
-                                        end
-                                    end
-                                    if s.nil?
-                                        @xml.tag!('gmd:name', {'gco:nilReason' => 'missing'})
-                                    end
-
-                                    # extended element info - short name
-                                    s = hExtension[:shortName]
-                                    unless s.nil?
-                                        @xml.tag!('gmd:shortName') do
-                                            @xml.tag!('gco:CharacterString', s)
-                                        end
-                                    end
-                                    if s.nil? && @hResponseObj[:writerShowTags]
-                                        @xml.tag!('gmd:shortName')
-                                    end
-
-                                    # extended element info - definition (required)
-                                    s = hExtension[:definition]
-                                    unless s.nil?
-                                        @xml.tag!('gmd:definition') do
-                                            @xml.tag!('gco:CharacterString', s)
-                                        end
-                                    end
-                                    if s.nil?
-                                        @xml.tag!('gmd:definition', {'gco:nilReason' => 'missing'})
-                                    end
-
-                                    # extended element info - obligation
-                                    s = hExtension[:obligation]
-                                    unless s.nil?
-                                        @xml.tag!('gmd:obligation') do
-                                            enumerationClass.writeXML('iso_obligation',s)
-                                        end
-                                    end
-                                    if s.nil? && @hResponseObj[:writerShowTags]
-                                        @xml.tag!('gmd:obligation')
-                                    end
-
-                                    # extended element info - data type (required)
-                                    s = hExtension[:dataType]
-                                    unless s.nil?
-                                        @xml.tag!('gmd:dataType') do
-                                            codelistClass.writeXML('gmd', 'iso_entityClass',s)
-                                        end
-                                    end
-                                    if s.nil?
-                                        @xml.tag!('gmd:dataType', {'gco:nilReason' => 'missing'})
-                                    end
-
-                                    # extended element info - maximum occurrence
-                                    s = hExtension[:maxOccurrence]
-                                    unless s.nil?
-                                        @xml.tag!('gmd:maximumOccurrence') do
-                                            @xml.tag!('gco:CharacterString', s)
-                                        end
-                                    end
-                                    if s.nil? && @hResponseObj[:writerShowTags]
-                                        @xml.tag!('gmd:maximumOccurrence')
-                                    end
-
-                                    # extended element info - parent entity [] (required)
-                                    aParents = hExtension[:parentEntities]
-                                    aParents.each do |parent|
-                                        @xml.tag!('gmd:parentEntity') do
-                                            @xml.tag!('gco:CharacterString', parent)
-                                        end
-                                    end
-                                    if aParents.empty?
-                                        @xml.tag!('gmd:parentEntity', {'gco:nilReason' => 'missing'})
-                                    end
-
-                                    # extended element info - rule
-                                    s = hExtension[:rule]
-                                    unless s.nil?
-                                        @xml.tag!('gmd:rule') do
-                                            @xml.tag!('gco:CharacterString', s)
-                                        end
-                                    end
-                                    if s.nil?
-                                        @xml.tag!('gmd:rule', {'gco:nilReason' => 'missing'})
-                                    end
-
-                                    # extended element info - rationale []
-                                    aRations = hExtension[:rationales]
-                                    aRations.each do |ration|
-                                        @xml.tag!('gmd:rationale') do
-                                            @xml.tag!('gco:CharacterString', ration)
-                                        end
-                                    end
-                                    if aRations.empty? && @hResponseObj[:writerShowTags]
-                                        @xml.tag!('gmd:rationale')
-                                    end
-
-                                    # extended element info - source [] (required)
-                                    # only allowing 1 for now
-                                    role = hExtension[:sourceRole]
-                                    unless role.nil?
-                                        @xml.tag!('gmd:source') do
-                                            @xml.tag!('gmd:CI_ResponsibleParty') do
-                                                orgName = hExtension[:sourceOrganization]
-                                                unless orgName.nil?
-                                                    @xml.tag!('gmd:organisationName') do
-                                                        @xml.tag!('gco:CharacterString', orgName)
-                                                    end
-                                                end
-                                                uri = hExtension[:sourceURI]
-                                                unless uri.nil?
-                                                    @xml.tag!('gmd:contactInfo') do
-                                                        @xml.tag!('gmd:CI_Contact') do
-                                                            @xml.tag!('gmd:onlineResource') do
-                                                                @xml.tag!('gmd:CI_OnlineResource') do
-                                                                    @xml.tag!('gmd:linkage') do
-                                                                        @xml.tag!('gmd:URL', uri)
-                                                                    end
-                                                                end
-                                                            end
-                                                        end
-                                                    end
-                                                end
-                                                @xml.tag!('gmd:role') do
-                                                    codelistClass.writeXML('gmd', 'iso_role', role)
+   module Mdtranslator
+      module Writers
+         module Iso19115_2
+
+            class MD_MetadataExtensionInformation
+
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+                  @NameSpace = ADIWG::Mdtranslator::Writers::Iso19115_2
+               end
+
+               def writeXML(hExtension)
+
+                  # classes used
+                  codelistClass = MD_Codelist.new(@xml, @hResponseObj)
+                  enumerationClass = MD_EnumerationList.new(@xml, @hResponseObj)
+                  olResClass = CI_OnlineResource.new(@xml, @hResponseObj)
+
+                  outContext = 'extension information'
+                  outContext = 'extension name ' + hExtension[:name] unless hExtension[:name].nil?
+
+                  @xml.tag!('gmd:MD_MetadataExtensionInformation') do
+
+                     # metadata extension - online resource {CI_OnLineResource}
+                     hOLResource = hExtension[:onLineResource]
+                     unless hOLResource.empty?
+                        @xml.tag!('gmd:extensionOnLineResource') do
+                           olResClass.writeXML(hOLResource, outContext)
+                        end
+                     end
+                     if hOLResource.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gmd:extensionOnLineResource')
+                     end
+
+                     # metadata extension = extended element information
+                     @xml.tag!('gmd:extendedElementInformation') do
+                        @xml.tag!('gmd:MD_ExtendedElementInformation') do
+
+                           # extended element info - name (required)
+                           s = hExtension[:name]
+                           unless s.nil?
+                              @xml.tag!('gmd:name') do
+                                 @xml.tag!('gco:CharacterString', s)
+                              end
+                           end
+                           if s.nil?
+                              @NameSpace.issueWarning(100, 'gmd:name')
+                           end
+
+                           # extended element info - short name
+                           s = hExtension[:shortName]
+                           unless s.nil?
+                              @xml.tag!('gmd:shortName') do
+                                 @xml.tag!('gco:CharacterString', s)
+                              end
+                           end
+                           if s.nil? && @hResponseObj[:writerShowTags]
+                              @xml.tag!('gmd:shortName')
+                           end
+
+                           # extended element info - definition (required)
+                           s = hExtension[:definition]
+                           unless s.nil?
+                              @xml.tag!('gmd:definition') do
+                                 @xml.tag!('gco:CharacterString', s)
+                              end
+                           end
+                           if s.nil?
+                              @NameSpace.issueWarning(101, 'gmd:definition', outContext)
+                           end
+
+                           # extended element info - obligation
+                           s = hExtension[:obligation]
+                           unless s.nil?
+                              @xml.tag!('gmd:obligation') do
+                                 enumerationClass.writeXML('iso_obligation', s)
+                              end
+                           end
+                           if s.nil? && @hResponseObj[:writerShowTags]
+                              @xml.tag!('gmd:obligation')
+                           end
+
+                           # extended element info - data type (required)
+                           s = hExtension[:dataType]
+                           unless s.nil?
+                              @xml.tag!('gmd:dataType') do
+                                 codelistClass.writeXML('gmd', 'iso_entityClass', s)
+                              end
+                           end
+                           if s.nil?
+                              @NameSpace.issueWarning(102, 'gmd:dataType', outContext)
+                           end
+
+                           # extended element info - maximum occurrence
+                           s = hExtension[:maxOccurrence]
+                           unless s.nil?
+                              @xml.tag!('gmd:maximumOccurrence') do
+                                 @xml.tag!('gco:CharacterString', s)
+                              end
+                           end
+                           if s.nil? && @hResponseObj[:writerShowTags]
+                              @xml.tag!('gmd:maximumOccurrence')
+                           end
+
+                           # extended element info - parent entity [] (required)
+                           aParents = hExtension[:parentEntities]
+                           aParents.each do |parent|
+                              @xml.tag!('gmd:parentEntity') do
+                                 @xml.tag!('gco:CharacterString', parent)
+                              end
+                           end
+                           if aParents.empty?
+                              @NameSpace.issueWarning(103, 'gmd:parentEntity', outContext)
+                           end
+
+                           # extended element info - rule
+                           s = hExtension[:rule]
+                           unless s.nil?
+                              @xml.tag!('gmd:rule') do
+                                 @xml.tag!('gco:CharacterString', s)
+                              end
+                           end
+                           if s.nil?
+                              @NameSpace.issueWarning(104, 'gmd:rule', outContext)
+                           end
+
+                           # extended element info - rationale []
+                           aRations = hExtension[:rationales]
+                           aRations.each do |ration|
+                              @xml.tag!('gmd:rationale') do
+                                 @xml.tag!('gco:CharacterString', ration)
+                              end
+                           end
+                           if aRations.empty? && @hResponseObj[:writerShowTags]
+                              @xml.tag!('gmd:rationale')
+                           end
+
+                           # extended element info - source [] (required)
+                           # only allowing 1 for now
+                           role = hExtension[:sourceRole]
+                           unless role.nil?
+                              @xml.tag!('gmd:source') do
+                                 @xml.tag!('gmd:CI_ResponsibleParty') do
+                                    orgName = hExtension[:sourceOrganization]
+                                    unless orgName.nil?
+                                       @xml.tag!('gmd:organisationName') do
+                                          @xml.tag!('gco:CharacterString', orgName)
+                                       end
+                                    end
+                                    uri = hExtension[:sourceURI]
+                                    unless uri.nil?
+                                       @xml.tag!('gmd:contactInfo') do
+                                          @xml.tag!('gmd:CI_Contact') do
+                                             @xml.tag!('gmd:onlineResource') do
+                                                @xml.tag!('gmd:CI_OnlineResource') do
+                                                   @xml.tag!('gmd:linkage') do
+                                                      @xml.tag!('gmd:URL', uri)
+                                                   end
                                                 end
-                                            end
-                                        end
-                                    end
-                                    if role.nil?
-                                        xml.tag!('gmd:source', {'gco:nilReason' => 'missing'})
-                                    end
-
-                                end # gmd:MD_ExtendedElementInformation tag
-                            end # gmd:extendedElementInformation
-                        end # gmd:MD_MetadataExtensionInformation
-                    end # writeXML
-                end # MD_MetadataExtensionInformation class
-
-            end
-        end
-    end
+                                             end
+                                          end
+                                       end
+                                    end
+                                    @xml.tag!('gmd:role') do
+                                       codelistClass.writeXML('gmd', 'iso_role', role)
+                                    end
+                                 end
+                              end
+                           end
+                           if role.nil?
+                              @NameSpace.issueWarning(105, 'gmd:source', outContext)
+                           end
+
+                        end # gmd:MD_ExtendedElementInformation tag
+                     end # gmd:extendedElementInformation
+                  end # gmd:MD_MetadataExtensionInformation
+               end # writeXML
+            end # MD_MetadataExtensionInformation class
+
+         end
+      end
+   end
 end