Merge branch 'main' into 32_onco_iRecist_test_data

DESCRIPTION

@@ -1,7 +1,7 @@
 Package: pharmaversesdtm
 Type: Package
 Title: Test Data for the Pharmaverse Family of Packages
-Version: 0.1.1.9000
+Version: 0.1.1.9001
 Authors@R: c(
   person("Edoardo", "Mancini", email = "edoardo.mancini@roche.com", role = c("aut", "cre")),
   person("Gayatri", "G", role = "aut"),

NEWS.md

@@ -17,6 +17,8 @@
 
 - Oncology response data for iRECIST criteria (`rs_onco_irecist`) was added. (#32)
 
+- `get_terms()` now expects `TERMCHAR` instead of `TERMNAME` in alignment with [this](https://github.com/pharmaverse/admiral/issues/2186) `{admiral}` issue. (#76)
+
 # pharmaversesdtm 0.1.1
 
 ## Documentation

R/get_terms.R

@@ -32,7 +32,7 @@ get_terms <- function(basket_select,
       select_id <- NULL
     }
     keep_cols <- c(
-      TERMNAME = "termname",
+      TERMCHAR = "termchar",
       SRCVAR = "termvar",
       GRPNAME = "smq_name",
       select_id
@@ -57,7 +57,7 @@ get_terms <- function(basket_select,
       select_id <- NULL
     }
     keep_cols <- c(
-      TERMNAME = "termname",
+      TERMCHAR = "termchar",
       SRCVAR = "termvar",
       GRPNAME = "sdg_name",
       select_id

data-raw/query_databases.R

@@ -6,7 +6,7 @@ library(dplyr)
 
 # Create smq dataset ----
 pregsmq <- tribble(
-  ~termname, ~scope,
+  ~termchar, ~scope,
   "Achromotrichia congenital", "narrow",
   "Craniosynostosis", "narrow",
   "Hypophosphatasia", "narrow",
@@ -36,7 +36,7 @@ pregsmq <- tribble(
   )
 
 bilismq <- tribble(
-  ~termname, ~scope,
+  ~termchar, ~scope,
   "Bile duct cancer recurrent", "narrow",
   "Bile duct cancer recurrent", "broad",
   "Bile duct squamous cell carcinoma", "narrow",
@@ -78,7 +78,7 @@ usethis::use_data(smq_db, overwrite = TRUE)
 
 # Create sdg dataset ----
 sdg_db <- tribble(
-  ~termname,
+  ~termchar,
   "AMINOSALICYLIC ACID",
   "AMINOSALICYLATE CALCIUM",
   "AMINOSALICYLATE CALCIUM ALUMINIUM",