From 69f5daeb27d0b6efec99110ccf6b4864c1039128 Mon Sep 17 00:00:00 2001
From: D070615 <olena.timrova@sap.com>
Date: Thu, 19 Dec 2024 12:38:19 +0100
Subject: [PATCH] restore CodeList aspect

---
 db/books.cds           | 5 ++---
 srv/admin-service.cds  | 1 +
 srv/cat-service.cds    | 3 ---
 srv/review-service.cds | 3 ---
 4 files changed, 3 insertions(+), 9 deletions(-)

diff --git a/db/books.cds b/db/books.cds
index 1fd06ae9..e7aa3928 100644
--- a/db/books.cds
+++ b/db/books.cds
@@ -2,6 +2,7 @@ namespace my.bookshop;
 
 using {
     Currency,
+    sap,
     managed,
     cuid
 } from '@sap/cds/common';
@@ -47,10 +48,8 @@ annotate Authors with
 /**
  * Hierarchically organized Code List for Genres
  */
-entity Genres {
+entity Genres : sap.common.CodeList {
     key ID       : Integer;
-        name     : localized String(255);
-        descr    : localized String(1000);
         parent   : Association to Genres;
         children : Composition of many Genres
                        on children.parent = $self;
diff --git a/srv/admin-service.cds b/srv/admin-service.cds
index 4d3b93f3..fd32cde6 100644
--- a/srv/admin-service.cds
+++ b/srv/admin-service.cds
@@ -21,6 +21,7 @@ service AdminService @(requires: 'admin') {
   entity Authors        as projection on my.Authors;
   entity Orders         as select from my.Orders;
   extend my.Genres with Hierarchy;
+  @cds.odata.valuelist: false
   entity GenreHierarchy as projection on my.Genres;
 
   @cds.persistence.skip
diff --git a/srv/cat-service.cds b/srv/cat-service.cds
index c83eb432..e887271f 100644
--- a/srv/cat-service.cds
+++ b/srv/cat-service.cds
@@ -13,9 +13,6 @@ service CatalogService @(requires: 'any') {
     @readonly
     entity Authors     as projection on my.Authors;
 
-    @readonly
-    entity Genres     as projection on my.Genres;
-
     @readonly
     entity Reviews     as projection on my.Reviews;
 
diff --git a/srv/review-service.cds b/srv/review-service.cds
index 0afa2e92..9ef98df7 100644
--- a/srv/review-service.cds
+++ b/srv/review-service.cds
@@ -15,9 +15,6 @@ service ReviewService {
     @readonly
     entity Authors as projection on my.Authors;
 
-    @readonly
-    entity Genres  as projection on my.Genres;
-
     // access control restrictions
     annotate Reviews with @restrict: [
         {