R/close.R

In ibmdbR: IBM in-Database Analytics for R

# 
# Copyright (c) 2013, 2014, IBM Corp. All rights reserved. 
# 		
# This program is free software: you can redistribute it and/or modify 
# it under the terms of the GNU General Public License as published by 
# the Free Software Foundation, either version 3 of the License, or 
# (at your option) any later version. 
#
# This program is distributed in the hope that it will be useful, 
# but WITHOUT ANY WARRANTY; without even the implied warranty of 
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 
# GNU General Public License for more details. 
#
# You should have received a copy of the GNU General Public License 
# along with this program. If not, see <http://www.gnu.org/licenses/>. 
#

idaClose <- function(idaConn, conType = "odbc") {
  if(conType == "odbc"){
    close(idaConn)
    if(idaIsDb2z()) {
      assign("p_connectString", "", envir = idaRGlobal)
    } 
  }
}