A helper function that finds out the WaterOneFlow service version from the URL of the wsdl file. By default it checks for "cuahsi_1_0" or "cuahsi_1_1" in the url. If that is not found, then the function checks the version inside the WSDL file.
WaterOneFlowVersion(WSDL)
The URL of the WSDL, for example http://icewater.usu.edu/MudLake/cuahsi_1_0.asmx?WSDL
A list with two items: Version (either 1.0 or 1.1), and Namespace (either http://www.cuahsi.org/his/1.0/ws/ or http://www.cuahsi.org/his/1.1/ws/)
# NOT RUN {
versionInfo <- WaterOneFlowVersion("http://icewater.usu.edu/MudLake/cuahsi_1_0.asmx?WSDL")
versionInfo$Version
versionInfo$Namespace
# }
Run the code above in your browser using DataLab