R/archivo_plano_srv.R

In d4t4tur/herramientas: Conjunto de funciones para el procesamiento de datos en la DNMyE

#' Leer archivos planos del server:
#' @description
#' Hace una llamada getUrl a la ruta indicada dentro de /srv/DataDNMYE/. Usarlo con read_csv o read_csv2 u otros.
#'
#' @param ruta Texto con la ruta específica del archivo a leer (ej.: "aerocomercial/anac/tabla_final.txt")
#'
#'@export

archivo_plano_srv <- function(ruta) {

  RCurl::getURL(url = paste0("sftp://",Sys.getenv("SRV_USER"),"@",Sys.getenv("SRV_IP"),
                             "/DataDNMYE/",
                      ruta),
         userpwd = paste0(Sys.getenv("SRV_USER"),":", Sys.getenv("SRV_CLAVE")),
         dirlistonly = FALSE)

}