feat: валидация данных в виде модулей

2026-04-20 16:38:14 +03:00
parent be1623716c
commit 7a006f6d6b
4 changed files with 67 additions and 59 deletions
--- a/modules/db.R
+++ b/modules/db.R
@@ -201,9 +201,6 @@ write_df_to_db = function(
      dplyr::across(tidyselect::all_of({{number_columns}}), ~ gsub("\\.", "," , .x)),
      dplyr::across(tidyselect::all_of({{other_cols}}), as.character),
    )
-  
-  df |>
-    dplyr::glimpse()

  if (table_name == "main") {
    del_query <- glue::glue("DELETE FROM main WHERE {main_key_id} = '{main_key_value}'")