From d16af940647ab32506c36403790f090b85a32a8c Mon Sep 17 00:00:00 2001
From: RixarSAP <168567887+RixarSAP@users.noreply.github.com>
Date: Thu, 2 May 2024 11:10:35 +0200
Subject: [PATCH] Update zcl_excel_comment.clas.abap: Change size of comment

Add methods SET_SIZE and GET_SIZE to add the posibility to change the size of the comments.

These methods modify the new attributes of the class WIDTH and HEIGHT.
These attributes will be read in CREATE_XL_DRAWING_FOR_COMMENTS of class ZCL_EXCEL_WRITER_2007 when the XML of the excel sheet is being gnerated
---
 src/zcl_excel_comment.clas.abap | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/src/zcl_excel_comment.clas.abap b/src/zcl_excel_comment.clas.abap
index d25310e..ca2abca 100644
--- a/src/zcl_excel_comment.clas.abap
+++ b/src/zcl_excel_comment.clas.abap
@@ -5,6 +5,9 @@ CLASS zcl_excel_comment DEFINITION
 
   PUBLIC SECTION.
 
+  constants DEFAULT_WIDTH type I value 2. "#EC NOTEXT
+  constants DEFAULT_HEIGHT type I value 15. "#EC NOTEXT
+
     METHODS constructor .
     METHODS get_name
       RETURNING
@@ -22,12 +25,23 @@ CLASS zcl_excel_comment DEFINITION
       IMPORTING
         !ip_text TYPE string
         !ip_ref  TYPE string OPTIONAL .
+  methods SET_SIZE
+    importing
+      !IP_WIDTH type I optional
+      !IP_HEIGHT type I optional .
+  methods GET_SIZE
+    exporting
+      !EP_WIDTH type I
+      !EP_HEIGHT type I .
+
   PROTECTED SECTION.
   PRIVATE SECTION.
 
     DATA index TYPE string .
     DATA ref TYPE string .
     DATA text TYPE string .
+  data WIDTH type I .
+  data HEIGHT type I .
 ENDCLASS.