Changeset 175
- Timestamp:
- 04/08/08 13:48:59
- Files:
-
- obskml/trunk/General/obsKMLSubRoutines.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
obskml/trunk/General/obsKMLSubRoutines.pm
r164 r175 359 359 { 360 360 my ( $strObsName, $strDate, $Value, $SensorSOrder, $strPlatformID, $ObsElevation, $strUnits, $rObsHash ) = @_; 361 print( "KMLAddObsToHash:: Obs: $strObsName Date: $strDate Val: $Value SORder: $SensorSOrder Platform: $strPlatformID Elev: $ObsElevation Units: $strUnits\n" );361 #print( "KMLAddObsToHash:: Obs: $strObsName Date: $strDate Val: $Value SORder: $SensorSOrder Platform: $strPlatformID Elev: $ObsElevation Units: $strUnits\n" ); 362 362 my $QCLevel = $QCLEVEL_DATANOTEVALD; 363 363 $rObsHash->{PlatformID}{$strPlatformID}{TimeStamp}{$strDate}{elev}{$ObsElevation}{obsType}{$strObsName}{uomType} = $strUnits;
