From c152f45409ba262d519dfa15e6a5df33a0e7df8d Mon Sep 17 00:00:00 2001
From: "ronan.vignard" <ronan.vignard@developpement-durable.gouv.fr>
Date: Fri, 7 Feb 2025 16:49:13 +0100
Subject: [PATCH] =?UTF-8?q?Cr=C3=A9ation=20de=20la=20proc=C3=A9dure=20pour?=
 =?UTF-8?q?=20la=20cr=C3=A9ation=20d'un=20dataframe=20unique=20pr=C3=A9l?=
 =?UTF-8?q?=C3=A8vements=20+=20analyse=20pour=20les=20donn=C3=A9es=20Hub'e?=
 =?UTF-8?q?au=20ESu?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 dev/flat_insert_data_hubeau_esu.Rmd | 52 +++++++++++++++++++++++++++++
 1 file changed, 52 insertions(+)
 create mode 100644 dev/flat_insert_data_hubeau_esu.Rmd

diff --git a/dev/flat_insert_data_hubeau_esu.Rmd b/dev/flat_insert_data_hubeau_esu.Rmd
new file mode 100644
index 0000000..bf80c31
--- /dev/null
+++ b/dev/flat_insert_data_hubeau_esu.Rmd
@@ -0,0 +1,52 @@
+---
+title: "Insertion des pr\u00e9l\u00e8vements et analyses Hubeau ESU"
+output: html_document
+editor_options: 
+  chunk_output_type: console
+---
+
+```{r development, include=FALSE}
+library(testthat)
+library(yaml)
+library(datalibaba)
+library(dplyr)
+library(stringr)
+library(glue)
+library(DBI)
+library(RPostgres)
+```
+
+```{r development-load}
+# Load already included functions if relevant
+pkgload::load_all(export_all = FALSE)
+```
+
+```{r config, eval=FALSE}
+# Lire le fichier de configuration
+config <- yaml::read_yaml("config.yml")
+
+# Accéder à la valeur pour version
+version <- config$version
+```
+
+# Consolidation et insertion des données Hub'eau ESU dans la table des prélèvements
+
+## Chargement des prélèvements Hub'eau ESU
+
+La table des données brutes Nitrates Hub'eau ESU est chargée :
+```{r load-nitrate_qualite_rivieres_analyse_pc, eval=FALSE}
+# Charger la table qualite_nappes_eau_souterraine.nitrate_qualite_rivieres_analyse_pc
+nitrate_qualite_rivieres_prelevements <- datalibaba::importer_data(
+  table = "nitrate_qualite_rivieres_analyse_pc",
+  schema = "qualite_cours_d_eau",
+  db = "si_eau",
+  user = "admin"
+)
+```
+
+```{r development-inflate, eval=FALSE}
+# Run but keep eval=FALSE to avoid infinite loop
+# Execute in the console directly
+fusen::inflate(flat_file = "dev/flat_insert_data_hubeau_esu.Rmd", vignette_name = "Insertion des pr\u00e9l\u00e8vements et analyses Hubeau ESU")
+```
+
-- 
GitLab