diff --git a/api/debug/all_biz.cfm b/api/debug/all_biz.cfm
new file mode 100644
index 0000000..3c3c7b4
--- /dev/null
+++ b/api/debug/all_biz.cfm
@@ -0,0 +1,23 @@
+<cfsetting showdebugoutput="false">
+<cfsetting enablecfoutputonly="true">
+<cfcontent type="application/json; charset=utf-8" reset="true">
+
+<cfquery name="q" datasource="payfrit">
+  SELECT ID, Name, BeaconShardID, BeaconMajor, IsDemo, IsPrivate
+  FROM Businesses
+  ORDER BY Name
+</cfquery>
+
+<cfset bizList = []>
+<cfloop query="q">
+  <cfset arrayAppend(bizList, {
+    "ID": q.ID,
+    "Name": q.Name,
+    "BeaconShardID": val(q.BeaconShardID),
+    "BeaconMajor": val(q.BeaconMajor),
+    "IsDemo": q.IsDemo,
+    "IsPrivate": q.IsPrivate
+  })>
+</cfloop>
+
+<cfoutput>#serializeJSON({ "OK": true, "Count": q.recordCount, "Businesses": bizList })#</cfoutput>