From 34b48209e8f1237f2ce212fb735df208df864ea7 Mon Sep 17 00:00:00 2001
From: Laura DeCicco <ldecicco@usgs.gov>
Date: Wed, 7 Aug 2013 16:43:55 -0500
Subject: [PATCH] Fixed an issue with XML unit value retrievals.
---
R/getWaterML1Data.r | 2 +-
man/getMultipleParameterNames.Rd | 36 --------------------------------
man/getParameterInfo.Rd | 4 ++--
3 files changed, 3 insertions(+), 39 deletions(-)
delete mode 100644 man/getMultipleParameterNames.Rd
diff --git a/R/getWaterML1Data.r b/R/getWaterML1Data.r
index 8f7e3912..fabca891 100644
--- a/R/getWaterML1Data.r
+++ b/R/getWaterML1Data.r
@@ -55,7 +55,7 @@ getWaterML1Data <- function(obs_url){
methodID <- padVariable(methodID,2)
value <- as.numeric(xpathSApply(subChunk, "ns1:value",namespaces = chunkNS, xmlValue))
- dateTime <- strptime(xpathSApply(subChunk, "ns1:value/@dateTime",namespaces = chunkNS),"%Y-%m-%dT%H:%M:%S.000")
+ dateTime <- strptime(xpathSApply(subChunk, "ns1:value/@dateTime",namespaces = chunkNS),"%Y-%m-%dT%H:%M:%S")
qualifier <- as.character(xpathSApply(subChunk, "ns1:value/@qualifiers",namespaces = chunkNS))
valueName <- paste(methodID,pCode,statCd,sep="_")
diff --git a/man/getMultipleParameterNames.Rd b/man/getMultipleParameterNames.Rd
deleted file mode 100644
index 3177e1b6..00000000
--- a/man/getMultipleParameterNames.Rd
+++ /dev/null
@@ -1,36 +0,0 @@
-\name{getMultipleParameterNames}
-\alias{getMultipleParameterNames}
-\title{USGS Mulitple Parameter List}
-\usage{
- getMultipleParameterNames(pCodes, interactive = TRUE)
-}
-\arguments{
- \item{pCodes}{vector set of 5-digit parameter codes to
- gather information on}
-
- \item{interactive}{logical Option for interactive mode.
- If true, a progress indicator is printed to the console.}
-}
-\value{
- retval dataframe with all information found in the
- expanded site file
-}
-\description{
- Imports a table of information on a set of parameters
- such as parameter name, units, group, and srs name.
- Warning! This function can be very slow because an
- individual web service call has to be made for each
- parameter. There is currently no way to request multiple
- parameters from the web service and get the extended
- information.
-}
-\examples{
-# These examples require an internet connection to run
-availableData <- getMultipleParameterNames(c("00060", "00065", "00010"),interactive=FALSE)
-}
-\keyword{data}
-\keyword{import}
-\keyword{service}
-\keyword{USGS}
-\keyword{web}
-
diff --git a/man/getParameterInfo.Rd b/man/getParameterInfo.Rd
index 1257391c..2cfa2d1c 100644
--- a/man/getParameterInfo.Rd
+++ b/man/getParameterInfo.Rd
@@ -5,8 +5,8 @@
getParameterInfo(parameterCd, interactive = TRUE)
}
\arguments{
- \item{parameterCd}{vector USGS parameter code. This is
- usually an 5 digit number.}
+ \item{parameterCd}{vector of USGS parameter codes. This
+ is usually an 5 digit number.}
\item{interactive}{logical Option for interactive mode.
If true, there is user interaction for error handling and
--
GitLab