Ajout de la variable code_reseau

dev/flat_insert_data_ars.Rmd

@@ -66,6 +66,7 @@ On ajoute les variables `source` et `code_support` :
 nitrate_prelevement_analyse_ars <- nitrate_data_analyse_ars |>
   dplyr::mutate(
     source = "ARS",
+    code_reseau = NA,
     code_support = 3
   )
 ```
@@ -138,6 +139,7 @@ On sélectionne les champs utiles à la table des prélèvements et analyse :
 nitrate_prelevement_analyse_ars <- nitrate_prelevement_analyse_ars |>
   dplyr::select(code_intervenant = geo_dept_ddass_gest_code,
                 source,
+                code_reseau,
                 code_station = ins_code_national,
                 date_prelevement = plv_date,
                 heure_prelevement = plv_heure,