From b8f39a7f1e6deb7302d7c1424204699b85710ce9 Mon Sep 17 00:00:00 2001 From: Hannah Date: Fri, 22 Mar 2024 10:46:43 -0800 Subject: [PATCH] Update validate.table.R --- R/validate.table.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/validate.table.R b/R/validate.table.R index bc7fa97..bf19a16 100644 --- a/R/validate.table.R +++ b/R/validate.table.R @@ -165,7 +165,7 @@ validate.table <- function(x, y) { for (a in 1:ncol(data.NA)) { for (bb in 1:nrow(dict.datafield)) if (colnames(data.NA[a]) == dict.datafield$codeName[bb] & - dict.datafield$allowNull[bb] == "no" & + dict.datafield$allowNull[bb] == FALSE & NA %in% (unique(data.NA[, a]))) { warnings.df <- warnings.df %>% dplyr::add_row(