diff --git a/R/getParameterInfo.r b/R/getNWISPcodeInfo.r
similarity index 75%
rename from R/getParameterInfo.r
rename to R/getNWISPcodeInfo.r
index 46890671d2e920e01a54e0a8295b7821aefab818..e98d6bfc8d3c04c84b7f02c1710b7d717a7f2245 100644
--- a/R/getParameterInfo.r
+++ b/R/getNWISPcodeInfo.r
@@ -4,15 +4,14 @@
 #' This function gets the data from here: \url{http://nwis.waterdata.usgs.gov/nwis/pmcodes}
 #'
 #' @param parameterCd vector of USGS parameter codes.  This is usually an 5 digit number.
-#' @param interactive logical Option for interactive mode.  If true, there is user interaction for error handling and data checks.
 #' @keywords data import USGS web service
 #' @return parameterData dataframe with all information from the USGS about the particular parameter (usually code, name, short name, units, and CAS registry numbers)
 #' @export
 #' @examples
 #' # These examples require an internet connection to run
 #' paramINFO <- getNWISPcodeInfo(c('01075','00060','00931'))
-getNWISPcodeInfo <- function(parameterCd,interactive=TRUE){
-  parameterCd <- formatCheckParameterCd(parameterCd, interactive=interactive)
+getNWISPcodeInfo <- function(parameterCd){
+ 
   
   parameterCdFile <- parameterCdFile