adiwg-mdtranslator 2.14.2 → 2.15.0

data/lib/adiwg/mdtranslator/writers/iso19115_1/classes/class_spatialRepresentation.rb

@@ -0,0 +1,61 @@
+# ISO <<Class>> CI_Series
+# 19115-1 writer output in XML
+
+# History:
+#  Stan Smith 2019-04-16 original script
+
+require_relative 'class_gridRepresentation'
+require_relative 'class_vectorRepresentation'
+require_relative 'class_georectified'
+require_relative 'class_georeferenceable'
+
+module ADIWG
+   module Mdtranslator
+      module Writers
+         module Iso19115_1
+
+            class SpatialRepresentation
+
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+               end
+
+               def writeXML(hRepresentation, inContext = nil)
+
+                  # classes used
+                  gridClass = MD_GridSpatialRepresentation.new(@xml, @hResponseObj)
+                  vectorClass = MD_VectorSpatialRepresentation.new(@xml, @hResponseObj)
+                  rectifiedClass = MD_Georectified.new(@xml, @hResponseObj)
+                  referenceClass = MD_Georeferenceable.new(@xml, @hResponseObj)
+
+                  outContext = 'spatial representation'
+                  outContext = inContext + ' spatial representation' unless inContext.nil?
+
+                  # spatial representation - grid
+                  unless hRepresentation[:gridRepresentation].empty?
+                     gridClass.writeXML(hRepresentation[:gridRepresentation], outContext)
+                  end
+
+                  # spatial representation - vector
+                  unless hRepresentation[:vectorRepresentation].empty?
+                     vectorClass.writeXML(hRepresentation[:vectorRepresentation], outContext)
+                  end
+
+                  # spatial representation - georectified
+                  unless hRepresentation[:georectifiedRepresentation].empty?
+                     rectifiedClass.writeXML(hRepresentation[:georectifiedRepresentation], outContext)
+                  end
+
+                  # spatial representation - georeferenceable
+                  unless hRepresentation[:georeferenceableRepresentation].empty?
+                     referenceClass.writeXML(hRepresentation[:georeferenceableRepresentation], outContext)
+                  end
+
+               end # writeXML
+            end # SpatialRepresentation class
+
+         end
+      end
+   end
+end

data/lib/adiwg/mdtranslator/writers/iso19115_1/classes/class_temporalExtent.rb

@@ -0,0 +1,53 @@
+# ISO <<Class>> EX_TemporalExtent
+# 19115-1 writer output in XML
+
+# History:
+# 	Stan Smith 2019-03-19 original script
+
+require_relative 'class_timeInstant'
+require_relative 'class_timePeriod'
+
+module ADIWG
+   module Mdtranslator
+      module Writers
+         module Iso19115_1
+
+            class EX_TemporalExtent
+
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+               end
+
+               def writeXML(hTempEle)
+
+                  # classes used
+                  timeInstClass = TimeInstant.new(@xml, @hResponseObj)
+                  timePeriodClass = TimePeriod.new(@xml, @hResponseObj)
+
+                  @xml.tag!('gex:EX_TemporalExtent') do
+
+                     # temporal extent - time instant
+                     hTimeInst = hTempEle[:timeInstant]
+                     unless hTimeInst.empty?
+                        @xml.tag!('gex:extent') do
+                           timeInstClass.writeXML(hTimeInst)
+                        end
+                     end
+
+                     # temporal extent - time period
+                     hTimePeriod = hTempEle[:timePeriod]
+                     unless hTimePeriod.empty?
+                        @xml.tag!('gex:extent') do
+                           timePeriodClass.writeXML(hTimePeriod)
+                        end
+                     end
+
+                  end # EX_TemporalExtent tag
+               end # writeXML
+            end # EX_TemporalExtent class
+
+         end
+      end
+   end
+end

data/lib/adiwg/mdtranslator/writers/iso19115_1/classes/class_timeInstant.rb

@@ -0,0 +1,80 @@
+# ISO <<Class>> TimeInstant
+# 19115-1 writer output in XML
+
+# History:
+# 	Stan Smith 2019-03-19 original script.
+
+require_relative 'class_gmlIdentifier'
+
+module ADIWG
+   module Mdtranslator
+      module Writers
+         module Iso19115_1
+
+            class TimeInstant
+
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+               end
+
+               def writeXML(hInstant)
+
+                  # classes used
+                  gmlClass = GMLIdentifier.new(@xml, @hResponseObj)
+
+                  # TimeInstant requires a unique ID
+                  timeID = hInstant[:timeId]
+                  if timeID.nil?
+                     @hResponseObj[:writerMissingIdCount] = @hResponseObj[:writerMissingIdCount].succ
+                     timeID = 'timeInstant' + @hResponseObj[:writerMissingIdCount]
+                  else
+                     timeID.gsub!(/[^0-9a-zA-Z]/, '')
+                  end
+
+                  @xml.tag!('gml:TimeInstant', {'gml:id' => timeID}) do
+
+                     # time instant - description
+                     unless hInstant[:description].nil?
+                        @xml.tag!('gml:description', hInstant[:description])
+                     end
+                     if hInstant[:description].nil? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gml:description')
+                     end
+
+                     # time instant - identifier {gmlIdentifier}
+                     hGMLid = hInstant[:identifier]
+                     unless hGMLid.empty?
+                        gmlClass.writeXML(hGMLid)
+                     end
+                     if hGMLid.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gml:identifier', {'codeSpace' => ''})
+                     end
+
+                     # time instant - names []
+                     aNames = hInstant[:instantNames]
+                     aNames.each do |name|
+                        @xml.tag!('gml:name', name)
+                     end
+                     if aNames.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gml:name')
+                     end
+
+                     # time instant - related Time [] { TmeInstant | TimePeriod}
+                     # not implemented
+
+                     # time instant - time position
+                     hDateTime = hInstant[:timeInstant]
+                     timeInstant = hDateTime[:dateTime]
+                     timeResolution = hDateTime[:dateResolution]
+                     dateStr = AdiwgDateTimeFun.stringDateTimeFromDateTime(timeInstant, timeResolution)
+                     @xml.tag!('gml:timePosition', dateStr)
+
+                  end # TimeInstant tag
+               end # writeXML
+            end # TimeInstant class
+
+         end
+      end
+   end
+end

data/lib/adiwg/mdtranslator/writers/iso19115_1/classes/class_timePeriod.rb

@@ -0,0 +1,113 @@
+# ISO <<Class>> TimePeriod
+# 19115-1 writer output in XML
+
+# History:
+# 	Stan Smith 2019-03-19 original script.
+
+require_relative 'class_gmlIdentifier'
+
+module ADIWG
+   module Mdtranslator
+      module Writers
+         module Iso19115_1
+
+            class TimePeriod
+
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+               end
+
+               def writeXML(hPeriod)
+
+                  # classes used
+                  gmlClass = GMLIdentifier.new(@xml, @hResponseObj)
+
+                  # TimePeriod must have a uniqueID
+                  timeID = hPeriod[:timeId]
+                  if timeID.nil?
+                     @hResponseObj[:writerMissingIdCount] = @hResponseObj[:writerMissingIdCount].succ
+                     timeID = 'timePeriod' + @hResponseObj[:writerMissingIdCount]
+                  else
+                     timeID.gsub!(/[^0-9a-zA-Z]/, '')
+                  end
+
+                  @xml.tag!('gml:TimePeriod', {'gml:id' => timeID}) do
+
+                     # time period - description
+                     unless hPeriod[:description].nil?
+                        @xml.tag!('gml:description', hPeriod[:description])
+                     end
+                     if hPeriod[:description].nil? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gml:description')
+                     end
+
+                     # time period - identifier {gmlIdentifier}
+                     hGMLid = hPeriod[:identifier]
+                     unless hGMLid.empty?
+                        gmlClass.writeXML(hGMLid)
+                     end
+                     if hGMLid.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gml:identifier', {'codeSpace' => ''})
+                     end
+
+                     # time period - names []
+                     aNames = hPeriod[:periodNames]
+                     aNames.each do |name|
+                        @xml.tag!('gml:name', name)
+                     end
+                     if aNames.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('gml:name')
+                     end
+
+                     # time period - begin position
+                     # tag always required, however value may be empty
+                     # if empty add indeterminatePosition="unknown"
+                     unless hPeriod[:startDateTime].empty?
+                        hDateTime = hPeriod[:startDateTime]
+                        dateTime = hDateTime[:dateTime]
+                        timeResolution = hDateTime[:dateResolution]
+                        dateStr = AdiwgDateTimeFun.stringDateTimeFromDateTime(dateTime, timeResolution)
+                        @xml.tag!('gml:beginPosition', dateStr)
+                     end
+                     if hPeriod[:startDateTime].empty?
+                        @xml.tag!('gml:beginPosition', {indeterminatePosition: 'unknown'})
+                     end
+
+                     # time period - begin position
+                     # tag always required, however value may be empty
+                     # if empty add indeterminatePosition="unknown"
+                     unless hPeriod[:endDateTime].empty?
+                        hDateTime = hPeriod[:endDateTime]
+                        dateTime = hDateTime[:dateTime]
+                        timeResolution = hDateTime[:dateResolution]
+                        dateStr = AdiwgDateTimeFun.stringDateTimeFromDateTime(dateTime, timeResolution)
+                        @xml.tag!('gml:endPosition', dateStr)
+                     end
+                     if hPeriod[:endDateTime].empty?
+                        @xml.tag!('gml:endPosition', {indeterminatePosition: 'unknown'})
+                     end
+
+                     # time period - time interval
+                     hInterval = hPeriod[:timeInterval]
+                     unless hInterval.empty?
+                        units = hInterval[:units]
+                        interval = hInterval[:interval]
+                        @xml.tag!('gml:timeInterval', {'unit' => units}, interval)
+                     end
+
+                     # time period - duration (do not output if have time interval)
+                     hDuration = hPeriod[:duration]
+                     if hInterval.empty? && !hDuration.empty?
+                        duration = AdiwgDateTimeFun.writeDuration(hDuration)
+                        @xml.tag!('gml:duration', duration)
+                     end
+
+                  end # TimePeriod tag
+               end # writeXML
+            end # TimePeriod class
+
+         end
+      end
+   end
+end

data/lib/adiwg/mdtranslator/writers/iso19115_1/classes/class_transferOptions.rb

@@ -0,0 +1,107 @@
+# ISO <<Class>> MD_DigitalTransferOptions
+# 19115-1 writer output in XML
+
+# History:
+# 	Stan Smith 2019-04-10 original script
+
+require_relative 'class_onlineResource'
+require_relative 'class_medium'
+require_relative 'class_format'
+
+module ADIWG
+   module Mdtranslator
+      module Writers
+         module Iso19115_1
+
+            class MD_DigitalTransferOptions
+
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+               end
+
+               def writeXML(hOption, inContext = nil)
+
+                  # classes used
+                  olResClass = CI_OnlineResource.new(@xml, @hResponseObj)
+                  mediumClass = MD_Medium.new(@xml, @hResponseObj)
+                  formatClass = MD_Format.new(@xml, @hResponseObj)
+
+                  outContext = 'transfer option'
+                  outContext = inContext + ' transfer option' unless inContext.nil?
+
+                  @xml.tag!('mrd:MD_DigitalTransferOptions') do
+
+                     # digital transfer options - units of distribution
+                     unless hOption[:unitsOfDistribution].nil?
+                        @xml.tag!('mrd:unitsOfDistribution') do
+                           @xml.tag!('gco:CharacterString', hOption[:unitsOfDistribution])
+                        end
+                     end
+                     if hOption[:unitsOfDistribution].nil? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('mrd:unitsOfDistribution')
+                     end
+
+                     # digital transfer options - transfer size {MB}
+                     unless hOption[:transferSize].nil?
+                        @xml.tag!('mrd:transferSize') do
+                           @xml.tag!('gco:Real', hOption[:transferSize].to_s)
+                        end
+                     end
+                     if hOption[:transferSize].nil? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('mrd:transferSize')
+                     end
+
+                     # digital transfer options - online [] {CI_OnlineResource}
+                     aOnlineOps = hOption[:onlineOptions]
+                     aOnlineOps.each do |hOlOption|
+                        @xml.tag!('mrd:onLine') do
+                           olResClass.writeXML(hOlOption, outContext)
+                        end
+                     end
+                     if aOnlineOps.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('mrd:onLine')
+                     end
+
+                     # digital transfer options - offline [] {MD_Medium}
+                     aOfflineOps = hOption[:offlineOptions]
+                     aOfflineOps.each do |hOffline|
+                        @xml.tag!('mrd:offLine') do
+                           mediumClass.writeXML(hOffline)
+                        end
+                     end
+                     if aOfflineOps.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('mrd:offLine')
+                     end
+
+                     # digital transfer options - transfer frequency {TM_PeriodDuration}
+                     hDuration = hOption[:transferFrequency]
+                     unless hDuration.empty?
+                        duration = AdiwgDateTimeFun.writeDuration(hDuration)
+                        @xml.tag!('mrd:transferFrequency') do
+                           @xml.tag!('gco:TM_PeriodDuration', duration)
+                        end
+                     end
+                     if hDuration.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('mrd:transferFrequency')
+                     end
+
+                     # digital transfer options - distribution format [] {MD_Format}
+                     aFormats = hOption[:distributionFormats]
+                     aFormats.each do |hFormat|
+                        @xml.tag!('mrd:distributionFormat') do
+                           formatClass.writeXML(hFormat)
+                        end
+                     end
+                     if aFormats.empty? && @hResponseObj[:writerShowTags]
+                        @xml.tag!('mrd:distributionFormat')
+                     end
+
+                  end # mrd:MD_DigitalTransferOptions tag
+               end # writeXML
+            end # MD_DigitalTransferOptions class
+
+         end
+      end
+   end
+end

data/lib/adiwg/mdtranslator/writers/iso19115_1/classes/class_unitsOfMeasure.rb

@@ -0,0 +1,258 @@
+# ISO <<Class>> UnitsOfMeasure
+# 19115-1 writer output in XML
+
+# History:
+# 	Stan Smith 2019-04-08 copied from 19115_2 writer
+
+require_relative 'class_baseUnit'
+require_relative 'class_conventionalUnit'
+require_relative 'class_derivedUnit'
+require_relative 'class_definitionUnit'
+
+module ADIWG
+   module Mdtranslator
+      module Writers
+         module Iso19115_1
+
+            class UnitsOfMeasure
+
+               def initialize(xml, hResponseObj)
+                  @xml = xml
+                  @hResponseObj = hResponseObj
+               end
+
+               def writeUnits(unit)
+
+                  # define empty containers here to save lines of code
+                  # for base units
+                  hBase = {}
+                  hBase[:identifier] = ''
+                  hBase[:codeSpace] = 'http://www.bipm.org/en/si/'
+                  hBase[:name] = ''
+                  hBase[:catalogSymbol] = ''
+                  hBase[:unitsSystem] = 'base unit'
+
+                  # for conventional units
+                  hConvent = {}
+                  hConvent[:identifier] = ''
+                  hConvent[:codeSpace] = 'http://www.bipm.org/en/si/'
+                  hConvent[:name] = ''
+                  hConvent[:catalogSymbol] = ''
+                  hConvent[:preferredUnit] = ''
+                  hConvent[:factor] = nil
+                  hConvent[:a] = nil
+                  hConvent[:b] = nil
+                  hConvent[:c] = nil
+                  hConvent[:d] = nil
+
+                  # for derived units
+                  hDerived = {}
+                  hDerived[:identifier] = ''
+                  hDerived[:codeSpace] = ''
+                  hDerived[:name] = ''
+                  hDerived[:remarks] = ''
+                  hDerived[:catalogSymbol] = ''
+                  hDerived[:derivationUnitTerm] = nil
+
+                  # find matching units of measure
+                  case unit
+
+                     # angular degrees
+                  when 'deg', 'degree', 'degrees'
+                     hBase[:identifier] = 'degree'
+                     hBase[:codeSpace] = 'urn:ogc:def:uom:1.0'
+                     hBase[:name] = 'degree of arc'
+                     hBase[:catalogSymbol] = 'deg'
+                     hBase[:unitsSystem] = 'http://www.opengis.net/def/uom/OGC/1.0/degree'
+
+                     baseClass = BaseUnit.new(@xml, @hResponseObj)
+                     baseClass.writeXML(hBase)
+
+                  when 'm', 'meter', 'meters', 'metre'
+                     hBase[:identifier] = 'meter'
+                     hBase[:name] = 'meter'
+                     hBase[:catalogSymbol] = 'm'
+
+                     baseClass = BaseUnit.new(@xml, @hResponseObj)
+                     baseClass.writeXML(hBase)
+
+                  when 'kg', 'kilogram', 'kilograms'
+                     hBase[:identifier] = 'kilogram'
+                     hBase[:name] = 'kilogram'
+                     hBase[:catalogSymbol] = 'kg'
+
+                     baseClass = BaseUnit.new(@xml, @hResponseObj)
+                     baseClass.writeXML(hBase)
+
+                  when 's', 'second', 'seconds'
+                     hBase[:identifier] = 'second'
+                     hBase[:name] = 'second'
+                     hBase[:catalogSymbol] = 'd'
+
+                     baseClass = BaseUnit.new(@xml, @hResponseObj)
+                     baseClass.writeXML(hBase)
+
+                  when 'A', 'ampere', 'amperes'
+                     hBase[:identifier] = 'ampere'
+                     hBase[:name] = 'ampere'
+                     hBase[:catalogSymbol] = 'A'
+
+                     baseClass = BaseUnit.new(@xml, @hResponseObj)
+                     baseClass.writeXML(hBase)
+
+                  when 'K', 'kelvin'
+                     hBase[:identifier] = 'kelvin'
+                     hBase[:name] = 'kelvin'
+                     hBase[:catalogSymbol] = 'K'
+
+                     baseClass = BaseUnit.new(@xml, @hResponseObj)
+                     baseClass.writeXML(hBase)
+
+                  when 'mol', 'mole', 'moles'
+                     hBase[:identifier] = 'mole'
+                     hBase[:name] = 'mole'
+                     hBase[:catalogSymbol] = 'mol'
+
+                     baseClass = BaseUnit.new(@xml, @hResponseObj)
+                     baseClass.writeXML(hBase)
+
+                  when 'cd', 'candela', 'candelas'
+                     hBase[:identifier] = 'candela'
+                     hBase[:name] = 'candela'
+                     hBase[:catalogSymbol] = 'cd'
+
+                     baseClass = BaseUnit.new(@xml, @hResponseObj)
+                     baseClass.writeXML(hBase)
+
+                  when 'ft', 'foot', 'feet'
+                     hConvent[:identifier] = 'meter'
+                     hConvent[:name] = 'foot'
+                     hConvent[:catalogSymbol] = 'ft'
+                     hConvent[:preferredUnit] = 'meter'
+                     hConvent[:factor] = 3.280839
+
+                     convClass = ConventionalUnit.new(@xml, @hResponseObj)
+                     convClass.writeXML(hConvent)
+
+                  when 'in', 'inch', 'inches'
+                     hConvent[:identifier] = 'meter'
+                     hConvent[:name] = 'inch'
+                     hConvent[:catalogSymbol] = 'in'
+                     hConvent[:preferredUnit] = 'meter'
+                     hConvent[:factor] = 0.0254
+
+                     convClass = ConventionalUnit.new(@xml, @hResponseObj)
+                     convClass.writeXML(hConvent)
+
+                  when 'mm', 'millimeter', 'millimeters'
+                     hConvent[:identifier] = 'meter'
+                     hConvent[:name] = 'millimeter'
+                     hConvent[:catalogSymbol] = 'mm'
+                     hConvent[:preferredUnit] = 'meter'
+                     hConvent[:factor] = 0.001
+
+                     convClass = ConventionalUnit.new(@xml, @hResponseObj)
+                     convClass.writeXML(hConvent)
+
+                  when 'micrometer', 'micrometers'
+                     micro = "\u00b5"
+                     s = micro.encode('utf-8')
+                     s += 'm'
+                     hConvent[:identifier] = 'meter'
+                     hConvent[:name] = 'micrometer'
+                     hConvent[:catalogSymbol] = s
+                     hConvent[:preferredUnit] = 'meter'
+                     hConvent[:factor] = 0.000001
+
+                     convClass = ConventionalUnit.new(@xml, @hResponseObj)
+                     convClass.writeXML(hConvent)
+
+                  when 'nm', 'nanometer', 'nanometers'
+                     hConvent[:identifier] = 'meter'
+                     hConvent[:name] = 'nanometer'
+                     hConvent[:catalogSymbol] = 'nm'
+                     hConvent[:preferredUnit] = 'meter'
+                     hConvent[:factor] = 0.000000001
+
+                     convClass = ConventionalUnit.new(@xml, @hResponseObj)
+                     convClass.writeXML(hConvent)
+
+                  when 'degC', 'centigrade', 'degreesC', 'Celsius'
+                     hConvent[:identifier] = 'kelvin'
+                     hConvent[:name] = 'degree Celsius'
+                     hConvent[:catalogSymbol] = 'degC'
+                     hConvent[:preferredUnit] = 'kelvin'
+                     hConvent[:a] = 273.16
+                     hConvent[:b] = 1
+                     hConvent[:c] = 1
+                     hConvent[:d] = 0
+
+                     convClass = ConventionalUnit.new(@xml, @hResponseObj)
+                     convClass.writeXML(hConvent)
+
+                  when 'degF', 'degreesF', 'Fahrenheit'
+                     hConvent[:identifier] = 'kelvin'
+                     hConvent[:name] = 'degree Fahrenheit'
+                     hConvent[:catalogSymbol] = 'degF'
+                     hConvent[:preferredUnit] = 'kelvin'
+                     hConvent[:a] = 2298.44
+                     hConvent[:b] = 5
+                     hConvent[:c] = 9
+                     hConvent[:d] = 0
+
+                     convClass = ConventionalUnit.new(@xml, @hResponseObj)
+                     convClass.writeXML(hConvent)
+
+                  when 'mph', 'miles per hour'
+                     hConvent[:identifier] = 'mi/h'
+                     hConvent[:name] = 'miles per hour'
+                     hConvent[:catalogSymbol] = 'mph'
+                     hConvent[:preferredUnit] = 'm/s'
+                     hConvent[:a] = 0
+                     hConvent[:b] = 1609.344
+                     hConvent[:c] = 0
+                     hConvent[:d] = 3600.0
+
+                     convClass = ConventionalUnit.new(@xml, @hResponseObj)
+                     convClass.writeXML(hConvent)
+
+                  when 'kph', 'kilometers per hour'
+                     hConvent[:identifier] = 'k/h'
+                     hConvent[:name] = 'kilometers per hour'
+                     hConvent[:catalogSymbol] = 'kph'
+                     hConvent[:preferredUnit] = 'm/s'
+                     hConvent[:a] = 0
+                     hConvent[:b] = 1000
+                     hConvent[:c] = 0
+                     hConvent[:d] = 3600
+
+                     convClass = ConventionalUnit.new(@xml, @hResponseObj)
+                     convClass.writeXML(hConvent)
+
+                  when 'density'
+                     hDerived = {}
+                     hDerived[:identifier] = 'kg/m^3'
+                     hDerived[:name] = 'kilograms per cubic meter'
+                     hDerived[:remarks] = 'volumetric mass density'
+                     hDerived[:catalogSymbol] = 'p'
+                     unitTerms = []
+                     unitTerms << {'uom' => 'kg', 'exponent' => '1'}
+                     unitTerms << {'uom' => 'm', 'exponent' => '-3'}
+                     hDerived[:derivationUnitTerm] = unitTerms
+
+                     dervClass = DerivedUnit.new(@xml, @hResponseObj)
+                     dervClass.writeXML(hDerived)
+
+                  else
+                     defnClass = UnitDefinition.new(@xml, @hResponseObj)
+                     defnClass.writeXML(unit)
+
+                  end
+               end
+
+            end
+
+         end
+      end
+   end
+end