Skip to content
Snippets Groups Projects
Commit 67eb5aad authored by ronan.vignard's avatar ronan.vignard
Browse files

Ajout de la fermeture de la connexion à la base de données

parent 1d80c4b6
No related branches found
No related tags found
8 merge requests!67Passage en version 0.1.6,!66Intégration de la fonction download_files_from_list(),!65Correction d'un bug + création des tests pour fix_encoding_variable(),!64Création des tests pour insert_into_table(),!63Ajout des tests pour import_and_merge_tables() + adaptation de create_dummy(),!62Tests pour check_structure_table() + évolution de create_dummy(),!61Ajout des tests pour import_xlsx() + correctif pour format_colnames() + divers,!60Ajout des tests pour import_xlsx() + correctif pour format_colnames()
Pipeline #536237 passed
...@@ -82,6 +82,9 @@ archive_table <- function(host, database, schema, new_schema = NULL, table, role ...@@ -82,6 +82,9 @@ archive_table <- function(host, database, schema, new_schema = NULL, table, role
db_dest = database, db_dest = database,
user = role) user = role)
# Fermer la connexion à la base de données
DBI::dbDisconnect(connexion)
# Retourner le nom de la nouvelle table archivée # Retourner le nom de la nouvelle table archivée
return(new_table) return(new_table)
} }
...@@ -72,5 +72,9 @@ check_structure_table <- function(host, database, schema, table, dataframe, role ...@@ -72,5 +72,9 @@ check_structure_table <- function(host, database, schema, table, dataframe, role
return(FALSE) return(FALSE)
} }
# Fermer la connexion à la base de données
DBI::dbDisconnect(connexion)
# Retourner TRUE si les attributs correspondent
return(TRUE) return(TRUE)
} }
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment