diff --git a/src/ca/access.cpp b/src/ca/access.cpp
index 43b681056..fbf2ec811 100644
--- a/src/ca/access.cpp
+++ b/src/ca/access.cpp
@@ -1036,6 +1036,12 @@ int epicsShareAPI ca_client_status ( unsigned level )
     return ECA_NORMAL;
 }
 
+int epicsShareAPI ca_context_status ( ca_client_context * pcac, unsigned level )
+{
+    pcac->show ( level );
+    return ECA_NORMAL;
+}
+
 /*
  * ca_current_context ()
  *
diff --git a/src/ca/cadef.h b/src/ca/cadef.h
index 687df07c2..1c8225e51 100644
--- a/src/ca/cadef.h
+++ b/src/ca/cadef.h
@@ -929,7 +929,8 @@ epicsShareFunc ca_client_context * epicsShareAPI ca_current_context ();
 epicsShareFunc int epicsShareAPI ca_attach_context ( ca_client_context * context );
 
 
-epicsShareFunc int epicsShareAPI ca_client_status (unsigned level);
+epicsShareFunc int epicsShareAPI ca_client_status ( unsigned level );
+epicsShareFunc int epicsShareAPI ca_context_status ( ca_client_context *, unsigned level );
 
 epicsShareFunc void epicsShareAPI ca_self_test ();