diff --git a/p/GPLCCR.m b/p/GPLCCR.m
index de5bdb2..db9f0f7 100644
--- a/p/GPLCCR.m
+++ b/p/GPLCCR.m
@@ -194,8 +194,3 @@ TLIST  ; LIST THE TESTS
  ;;><TRIM>
  ;;>>>D ZTEST^GPLCCR("CCR")
  ;;>>>W $$TRIM^GPLXPATH(CCRGLO)
- ;;><CCD>
- ;;>>>K GPL S GPL=""
- ;;>>>D CCRRPC^GPLCCR(.GPL,"2","CCD","","","")
- ;;>>?@GPL@(@GPL@(0))["</ContinuityOfCareRecord>"
- ;;></TEST>