diff --git a/archApp/bplstorage.db b/archApp/bplstorage.db
new file mode 100644
index 0000000..323127c
--- /dev/null
+++ b/archApp/bplstorage.db
@@ -0,0 +1,31 @@
+record(stringin, "$(P)Name:$(N)-I") {
+    field(DTYP, "Python Device")
+    field(INP , "@bplreport fetch_string storage.$(N).name")
+    field(SCAN, "I/O Intr")
+    field(TSE , "-2")
+}
+
+record(ai, "$(P)Size:$(N)-I") {
+    field(DTYP, "Python Device")
+    field(INP , "@bplreport fetch_string storage.$(N).available_space")
+    field(SCAN, "I/O Intr")
+    field(TSE , "-2")
+}
+
+record(ai, "$(P)Pcnt:$(N)-I") {
+    field(DTYP, "Python Device")
+    field(INP , "@bplreport fetch_string storage.$(N).available_space_percent")
+    field(SCAN, "I/O Intr")
+    field(TSE , "-2")
+    field(HOPR, "100")
+    field(LOPR, "0")
+    field(HIHI, "95")
+    field(HIGH, "80")
+    field(LOW , "10")
+    field(LOLO, "0.1")
+    field(HHSV, "MAJOR")
+    field(HSV , "MINOR")
+    field(LSV , "MINOR")
+    field(LLSV, "INVALID")
+    info("autosaveFields_pass0", "HOPR LOPR HIHI HIGH LOW LOLO")
+}
diff --git a/iocBoot/iocapplmon/Makefile b/iocBoot/iocapplmon/Makefile
new file mode 100644
index 0000000..79c4ce6
--- /dev/null
+++ b/iocBoot/iocapplmon/Makefile
@@ -0,0 +1,5 @@
+TOP = ../..
+include $(TOP)/configure/CONFIG
+ARCH = linux-x86_64
+TARGETS = envPaths
+include $(TOP)/configure/RULES.ioc
diff --git a/iocBoot/iocapplmon/st.cmd b/iocBoot/iocapplmon/st.cmd
new file mode 100755
index 0000000..c931fb9
--- /dev/null
+++ b/iocBoot/iocapplmon/st.cmd
@@ -0,0 +1,19 @@
+#!../../bin/linux-x86/softIocPy2.7
+
+< envPaths
+
+#epicsEnvSet("APPLNAME", "arcapp01.cs.nsls2.local:17665")
+epicsEnvSet("APPLNAME", "capp02.cs.nsls2.local:17665")
+
+py "import bplreport"
+py "bplreport.add('metrics','http://$(APPLNAME)/mgmt/bpl/getInstanceMetrics',3600)"
+py "bplreport.add('typechange','http://$(APPLNAME)/mgmt/bpl/getPVsByDroppedEventsTypeChange',3600)"
+py "bplreport.add('neverconn','http://$(APPLNAME)/mgmt/bpl/getNeverConnectedPVs',3600)"
+py "bplreport.add('storage','http://$(APPLNAME)/mgmt/bpl/getStorageMetricsForAppliance?appliance=appliance0',3600)"
+
+dbLoadRecords("../../db/applmetrics.db", "P=TST-CT{Arch:1}")
+dbLoadRecords("../../db/bplstorage.db",  "P=TST-CT{Arch:1},N=0")
+dbLoadRecords("../../db/bplstorage.db",  "P=TST-CT{Arch:1},N=1")
+dbLoadRecords("../../db/bplstorage.db",  "P=TST-CT{Arch:1},N=2")
+
+iocInit()