From 84eba5143bdb81dda3a1af0e1a65f81cc27aaf76 Mon Sep 17 00:00:00 2001
From: cecicampanile <campanile.cecilia@gmail.com>
Date: Tue, 7 Jan 2025 09:58:07 +0000
Subject: [PATCH] Update mockOmopSketch.R

---
 R/mockOmopSketch.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/mockOmopSketch.R b/R/mockOmopSketch.R
index 3cf8198..291bbc3 100644
--- a/R/mockOmopSketch.R
+++ b/R/mockOmopSketch.R
@@ -69,10 +69,10 @@ checkColumns <- function(cdm_local){
   for (table in names(cdm_local)){
     cols <-  info |>
       dplyr::filter(.data$cdm_table_name == table)|>
-      dplyr::select(cdm_field_name,cdm_datatype)
+      dplyr::select(.data$cdm_field_name,.data$cdm_datatype)
 
     missing_cols <- cols|>
-      dplyr::filter(!(cdm_field_name %in% colnames(cdm_local[[table]])))
+      dplyr::filter(!(.data$cdm_field_name %in% colnames(cdm_local[[table]])))
 
     if (nrow(missing_cols) > 0) {