feat: предсказуемый экспорт числовых значений

2026-04-11 16:06:04 +03:00
parent 59f7f40344
commit 1f0b0c2a64
4 changed files with 24 additions and 8 deletions
--- a/modules/data_validation.R
+++ b/modules/data_validation.R
@@ -93,7 +93,7 @@ init_val <- function(scheme, ns) {
          if (!all(compare_to_dict)) {

            text <- paste0("'",x[!compare_to_dict],"'", collapse = ", ")
-            glue::glue("Данные варианты, не соответствуют схеме: {text}")
+            glue::glue("варианты, не соответствующие схеме: {text}")
          }
        })
        
--- a/modules/db.R
+++ b/modules/db.R
@@ -141,7 +141,6 @@ compare_existing_table_with_schema <- function(
          length(form_base_difference) == 0 &&
          length(base_form_difference) == 0) {
      cli::cli_warn("changes in scheme file detected: assuming order changed only")
-      print(all_ids_from_schema)
    }

    if (length(all_ids_from_schema) == length(colnames(df_to_rewrite)) &&