                                                          AND NOT(m.name IN [
                                                                              {in-clause-values}
                                                                            ])
-                                                      RETURN n.name as UsedBy, COLLECT(DISTINCT m.name) AS BlacklistedAlfrescoAPIs
+                                                      RETURN n.name AS UsedBy, COLLECT(DISTINCT m.name) AS BlacklistedAlfrescoAPIs
                                                        ORDER BY n.name
                                                      ", alfresco-public-java-api)
         res                      (cy/tquery cypher-query)
         message                  (if (empty? res)
-                                   ""
+                                   nil
                                    (s/join "\n"
                                            (map #(str (get % "UsedBy")
                                                       " uses "
                                                       (s/join ", " (get % "BlacklistedAlfrescoAPIs")))
                                                 res)))]
-    (build-bookmark-map "API01" message "The technology only uses Alfresco's Public Java APIs.")))
+    (build-bookmark-map "API01" (empty? res) message "The technology only uses Alfresco's Public Java APIs.")))
 
 (defn- api06-service-locator
   []

    (s/replace query "{in-clause-values}" comma-delimited-string-quoted-in-values)))

(defn- build-bookmark-map
  ([criteria-id evidence] (build-bookmark-map criteria-id evidence ""))
  ([criteria-id evidence non-evidence]
   (if (and evidence (not (empty? (s/trim evidence))))
     { (str criteria-id "_Evidence")    evidence
       (str criteria-id "_Meets")       ""
       (str criteria-id "_NoRemedy")    "" }
     { (str criteria-id "_Evidence")    non-evidence
       (str criteria-id "_DoesNotMeet") ""
       (str criteria-id "_Remedy")      "" } )))

(defn- api01-public-alfresco-java-api
  []

                                                                'org.springframework.context.ApplicationContextAware',
                                                                'org.springframework.context.ApplicationContext'
                                                              ]
                                             RETURN n.name AS UsedBy, COLLECT(DISTINCT m.name) AS BlacklistedSpringAPIs
                                              ORDER BY n.name
                                            ")
        message                  (if (empty? res)
                                   nil
                                   (s/join "\n"
                                           (map #(str (get % "UsedBy")
                                                      " uses "
                                                      (s/join ", " (get % "BlacklistedSpringAPIs")))
                                                res)))]
    (build-bookmark-map "API06" (empty? res) message "The technology does not use the service locator pattern.")))

(defn- com06-compiled-jvm-version
  []
