diff --git a/data-raw/R/generic_scallop_clam_survey_pull.R b/data-raw/R/generic_scallop_clam_survey_pull.R
new file mode 100644
index 0000000..32a8e22
--- /dev/null
+++ b/data-raw/R/generic_scallop_clam_survey_pull.R
@@ -0,0 +1,14 @@
+#Generic survey data pull
+library(data.table); library(survdat); library(dbutils); library(here)
+
+#Pull Data----
+channel <- dbutils::connect_to_database(server="sole",uid="slucey")
+
+clams <- survdat::get_survdat_clam_data(channel)
+
+save(clams, file = here('data', 'survdatClams.RData'))
+
+scallops <- survdat::get_survdat_scallop_data(channel)
+
+save(scallops, file = here('data', 'survdatScallops.RData'))
+
diff --git a/data/survdatClams.RData b/data/survdatClams.RData
new file mode 100644
index 0000000..4ebd5fd
Binary files /dev/null and b/data/survdatClams.RData differ
diff --git a/data/survdatScallops.RData b/data/survdatScallops.RData
new file mode 100644
index 0000000..531ea3f
Binary files /dev/null and b/data/survdatScallops.RData differ