From 618471e3e72640d5fd2437119244c600a16841d1 Mon Sep 17 00:00:00 2001
From: RixarSAP <168567887+RixarSAP@users.noreply.github.com>
Date: Thu, 2 May 2024 11:12:55 +0200
Subject: [PATCH] Update zcl_excel_comment.clas.abap: Add SIZE to comments

New Methods SET_SIZE and GET_SIZE.
New attributes: WIDHT, HEIGHT, DEFAULT_WIDTH, DEFAULT_HEIGHT

The size of the comments will be read in class ZCL_EXCEL_WRITER_2007, method CREATE_XL_DRAWING_FOR_COMMENTS
---
 src/zcl_excel_comment.clas.abap | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)

diff --git a/src/zcl_excel_comment.clas.abap b/src/zcl_excel_comment.clas.abap
index ca2abca..69b4498 100644
--- a/src/zcl_excel_comment.clas.abap
+++ b/src/zcl_excel_comment.clas.abap
@@ -81,4 +81,33 @@ CLASS zcl_excel_comment IMPLEMENTATION.
       me->ref = ip_ref.
     ENDIF.
   ENDMETHOD.
+
+METHOD set_size.
+
+  IF ip_width IS SUPPLIED.
+    width = ip_width.
+  ENDIF.
+
+  IF ip_height IS SUPPLIED.
+    height = ip_height.
+  ENDIF.
+
+ENDMETHOD.
+
+method GET_SIZE.
+
+  IF width IS NOT INITIAL.
+    ep_width = width.
+  ELSE.
+    ep_width = default_width. "Default width
+  ENDIF.
+
+  IF height IS NOT INITIAL.
+    ep_height = height.
+  ELSE.
+    ep_height = default_height. "Default height
+  ENDIF.
+
+endmethod.
+
 ENDCLASS.