diff --git a/R/RomFeature.R b/R/RomFeature.R
index 908c984b..0e22c7dc 100644
--- a/R/RomFeature.R
+++ b/R/RomFeature.R
@@ -117,6 +117,8 @@ RomFeature <- R6Class(
           self$geom = as.character(config$dh_geofield)
         } else if (i == "nextdown_id") {
           self$nextdown_id = as.integer(config$nextdown_id)
+        } else if (i == "parent_id") {
+          self$parent_id = as.integer(config$parent_id)
         }
       }
     },
diff --git a/R/cia_utils.R b/R/cia_utils.R
index 6d75fc5e..d0b09a3a 100644
--- a/R/cia_utils.R
+++ b/R/cia_utils.R
@@ -600,7 +600,7 @@ fn_downstream <- function(riv.seg, AllSegList) {
     Upstream <- which(as.character(ModelSegments$Downstream)==as.character(ModelSegments$RiverSeg[k]))
     NumUp <- ModelSegments$RiverSeg[Upstream]
     ModelSegments[k,6]<- paste(NumUp, collapse = '+')
-    if (is.empty(ModelSegments[k,6])==TRUE){
+    if (hydrotools::is.empty(ModelSegments[k,6])==TRUE){
       ModelSegments[k,6]<- 'NA'
     } 
     k<-k+1