diff --git a/workspace/00_get_data.Rmd b/workspace/00_get_data.Rmd
index 8678f8c551d57ef6889e9f2eab8d5009b96a2567..a583312c60529eba7ed50f9db93512c19373e4ab 100644
--- a/workspace/00_get_data.Rmd
+++ b/workspace/00_get_data.Rmd
@@ -278,7 +278,7 @@ if(!file.exists(ref_cat)){
 
   for (vpu in possible_vpu){
     vpu_gpkg <- paste0(vpu, "_reference_features.gpkg")
-    sbtools::item_file_download("61295190d34e40dd9c06bcd7", names = vpu_gpkg, 
+    sbtools::item_file_download("6317a72cd34e36012efa4e8a", names = vpu_gpkg, 
                                 destinations = file.path(ref_fab_path, vpu_gpkg))
   }
   
diff --git a/workspace/02_NHD_navigate.Rmd b/workspace/02_NHD_navigate.Rmd
index e2d9ec9f61a8a7ff87ed5f3b41e55b74aae62fb4..f5eb8215f2c8a1a141c2ccbba70bb6d01a35afbc 100644
--- a/workspace/02_NHD_navigate.Rmd
+++ b/workspace/02_NHD_navigate.Rmd
@@ -260,7 +260,7 @@ if(!"Type_WBOut" %in% names(tmp_POIs)) {
   tmp_POIs <- read_sf(temp_gpkg, nav_poi_layer)
   nhd <- read_sf(nav_gpkg, nhd_flowline)
   ref_WB <- read_sf(temp_gpkg, WBs_layer)
-  resops_POIs_df <- read.csv(file.path("data/reservoir_Data", paste0("resops_POIs_",vpu,".csv")))
+  resops_POIs_df <- read.csv(file.path("data/reservoir_Data", paste0("resops_POIs_", VPU,".csv")))
 }
 
 mapview(filter(tmp_POIs, !is.na(Type_WBOut)), layer.name = "Waterbody outlet POIs", col.regions = "red")
diff --git a/workspace/R/NHD_navigate.R b/workspace/R/NHD_navigate.R
index 02f8f8c4da6816590772ca63d32d9dcaff64f5d5..c40dafe2b53936a46694dfe3a11057d5a0043ce0 100644
--- a/workspace/R/NHD_navigate.R
+++ b/workspace/R/NHD_navigate.R
@@ -1135,7 +1135,7 @@ wbin_POIcreation <- function(nhd, WBs_VPU, data_paths, crs,
     # Drive the inlet events
     nhd_inlet <- filter(nhd_WBs, !COMID %in% wb_outlet_events$COMID)
     
-    if(unique(nhd$VPUID) == "12"){
+    if("12" %in% unique(nhd$VPUID)){
       nhd_inlet <- rbind(nhd_inlet, filter(nhd_WBs, COMID == 1304709))
     }