updates to mapper files

Big-Life-Lab · Mar 15, 2021 · 6512f46 · 6512f46
1 parent 5bbe30f
commit 6512f46
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 2 deletions.
diff --git a/src/mappers/statscan_mapper.r b/src/mappers/statscan_mapper.r
@@ -1,10 +1,10 @@
 
 
-library(stringi)
+
 #source("src/wbe_db_func.r")
 
 
-NML <- list(
+STATSCAN <- list(
     nm = "STATSCAN",
 
 
@@ -88,13 +88,16 @@ NML <- list(
             }
         })
         df2$tmp_id <-  NULL
+
+        #tables involved in the load
         ld_tbl_nms <-
             names(df2) %>%
             str_split(pattern = "_", n = 2) %>%
             lapply(`[[`, 1) %>% unlist() %>% unique()
 
         lapply(ld_tbl_nms, function(ld_tbl_nm){
             df2 %>% select(starts_with(ld_tbl_nm))
+
             wbe_find_df_col(df)
 
         })

diff --git a/src/wbe_db_func.r b/src/wbe_db_func.r
@@ -22,6 +22,8 @@ library(docstring)
 library(anytime)
 library(tools)
 library(assertthat)
+library(stringi)
+
 
 wbe_CONNS <- c()   # Keeps a list of connections to the db