unike feltnavn for adhoc

Rapporteket · Jan 9, 2024 · 8360d4f · 8360d4f
1 parent c27b0be
commit 8360d4f
Showing 1 changed file with 27 additions and 0 deletions.
diff --git a/R/getKodebokData.R b/R/getKodebokData.R
@@ -82,6 +82,33 @@ getKodebokData <- function() {
 
 
 
+        # FRA HENDELSE
+        .data$fysisk_feltnavn %in% c("komp_janei",
+                                     "komp_av_fistel",
+                                     "komp_pseudoan",
+                                     "komp_blodning",
+                                     "komp_infek",
+                                     "komp_tamp",
+                                     "komp_nfren",
+                                     "komp_apoplexi",
+                                     "komp_avblokk_pm",
+                                     "komp_pulm",
+                                     "komp_osofag",
+                                     "komp_koronar",
+                                     "komp_perikard",
+                                     "komp_dod",
+                                     "komp_annen",
+                                     "komp_annet_spes",
+                                     "sykehus_opph",
+                                     "sykehus_annet_spes",
+                                     "residiv",
+                                     "residiv_annet_spes",
+                                     "usercomment",
+                                     "status") &
+          .data$skjemanavn == "Hendelse" ~
+          paste0("adhoc_", .data$fysisk_feltnavn),
+
+
         # FRA PROSEDYRE
         .data$fysisk_feltnavn %in% c("status",
                                      "usercomment") &