From ce73529559ad2b76532a5ae7f9317e9e95a44aac Mon Sep 17 00:00:00 2001
From: Katharina Wurz <katharina.wurz@sap.com>
Date: Fri, 17 Feb 2023 16:23:52 +0100
Subject: [PATCH] Give enum default and title case (#487)

---
 file-formats/clas/clas-v1.json                | 33 ++++++++++---------
 .../clas/type/zif_aff_clas_v1.intf.abap       | 31 ++++++++---------
 2 files changed, 33 insertions(+), 31 deletions(-)

diff --git a/file-formats/clas/clas-v1.json b/file-formats/clas/clas-v1.json
index fdeac6aca..d2606c84a 100644
--- a/file-formats/clas/clas-v1.json
+++ b/file-formats/clas/clas-v1.json
@@ -81,21 +81,21 @@
         "webDynproRuntimeObject"
       ],
       "enumTitles": [
-        "General object type",
-        "Exit class",
-        "Test class (ABAP Unit)",
-        "Behavior class (behavior implementations)",
-        "Entity event handler class",
-        "Persistent class",
-        "Factory for persistent class",
-        "Status class for persistent class",
-        "RFC proxy class",
-        "Exception class",
-        "Area class (shared objects)",
-        "Business class",
-        "BSP application class",
-        "Basis class for BSP element handlers",
-        "Web Dynpro runtime object"
+        "General Object Type",
+        "Exit Class",
+        "Test Class (ABAP Unit)",
+        "Behavior Class (Behavior Implementations)",
+        "Entity Event Handler Class",
+        "Persistent Class",
+        "Factory for Persistent Class",
+        "Status Class for Persistent Class",
+        "RFC Proxy Class",
+        "Exception Class",
+        "Area Class (Shared Objects)",
+        "Business Class",
+        "BSP Application Class",
+        "Basis Class For BSP Element Handlers",
+        "Web Dynpro Runtime Object"
       ],
       "enumDescriptions": [
         "General object type",
@@ -113,7 +113,8 @@
         "BSP application class",
         "Basis class for BSP element handlers",
         "Web Dynpro runtime object"
-      ]
+      ],
+      "default": "generalObjectType"
     },
     "fixPointArithmetic": {
       "title": "Fix Point Arithmetic",
diff --git a/file-formats/clas/type/zif_aff_clas_v1.intf.abap b/file-formats/clas/type/zif_aff_clas_v1.intf.abap
index 050f423dd..18d6f154e 100644
--- a/file-formats/clas/type/zif_aff_clas_v1.intf.abap
+++ b/file-formats/clas/type/zif_aff_clas_v1.intf.abap
@@ -3,55 +3,56 @@ INTERFACE zif_aff_clas_v1 PUBLIC.
   "! <p class="shorttext">Class Category</p>
   "! Category of the class
   "! $values {@link zif_aff_clas_v1.data:co_category}
+  "! $default {@link zif_aff_clas_v1.data:co_category.general_object_type}
   TYPES ty_category TYPE n LENGTH 2.
 
   CONSTANTS:
     "! <p class="shorttext">Class Category</p>
     "! Category of the class
     BEGIN OF co_category,
-      "! <p class="shorttext">General object type</p>
+      "! <p class="shorttext">General Object Type</p>
       "! General object type
       general_object_type            TYPE ty_category VALUE '00',
-      "! <p class="shorttext">Exit class</p>
+      "! <p class="shorttext">Exit Class</p>
       "! Exit class
       exit_class                     TYPE ty_category VALUE '01',
-      "! <p class="shorttext">Test class (ABAP Unit)</p>
+      "! <p class="shorttext">Test Class (ABAP Unit)</p>
       "! Test class (ABAP Unit)
       testclass_abap_unit            TYPE ty_category VALUE '05',
-      "! <p class="shorttext">Behavior class (behavior implementations)</p>
+      "! <p class="shorttext">Behavior Class (Behavior Implementations)</p>
       "! Behavior class (behavior implementations)
       behavior_class                 TYPE ty_category VALUE '06',
-      "! <p class="shorttext">Entity event handler class</p>
+      "! <p class="shorttext">Entity Event Handler Class</p>
       "! Entity event handler class
       entity_event_handler           TYPE ty_category VALUE '07',
-      "! <p class="shorttext">Persistent class</p>
+      "! <p class="shorttext">Persistent Class</p>
       "! Persistent class
       persistent_class               TYPE ty_category VALUE '10',
-      "! <p class="shorttext">Factory for persistent class</p>
+      "! <p class="shorttext">Factory for Persistent Class</p>
       "! Factory for persistent class
       factory_for_persistent_class   TYPE ty_category VALUE '11',
-      "! <p class="shorttext">Status class for persistent class</p>
+      "! <p class="shorttext">Status Class for Persistent Class</p>
       "! Status class for persistent class
       status_class_for_persist_class TYPE ty_category VALUE '12',
-      "! <p class="shorttext">RFC proxy class</p>
+      "! <p class="shorttext">RFC Proxy Class</p>
       "! RFC proxy class
       rfc_proxy_class                TYPE ty_category VALUE '35',
-      "! <p class="shorttext">Exception class</p>
+      "! <p class="shorttext">Exception Class</p>
       "! Exception class
       exception_class                TYPE ty_category VALUE '40',
-      "! <p class="shorttext">Area class (shared objects)</p>
+      "! <p class="shorttext">Area Class (Shared Objects)</p>
       "! Area class (shared objects)
       area_class_shared_objects      TYPE ty_category VALUE '45',
-      "! <p class="shorttext">Business class</p>
+      "! <p class="shorttext">Business Class</p>
       "! Business class
       business_class                 TYPE ty_category VALUE '50',
-      "! <p class="shorttext">BSP application class</p>
+      "! <p class="shorttext">BSP Application Class</p>
       "! BSP application class
       bsp_application_class          TYPE ty_category VALUE '60',
-      "! <p class="shorttext">Basis class for BSP element handlers</p>
+      "! <p class="shorttext">Basis Class For BSP Element Handlers</p>
       "! Basis class for BSP element handlers
       basis_class_bsp_element_hdlr   TYPE ty_category VALUE '70',
-      "! <p class="shorttext">Web Dynpro runtime object</p>
+      "! <p class="shorttext">Web Dynpro Runtime Object</p>
       "! Web Dynpro runtime object
       web_dynpro_runtime_object      TYPE ty_category VALUE '80',
     END OF co_category.