harvey chart

Author: oblomov-dev

src/z2ui5_cl_demo_app_000.clas.abap

@@ -2021,6 +2021,12 @@ CLASS z2ui5_cl_demo_app_000 IMPLEMENTATION.
             class     = 'sapUiTinyMarginEnd sapUiTinyMarginBottom'
         ).
 
+       panel->generic_tile(
+            header    = 'Harvey Chart'
+            press     =  client->_event( 'Z2UI5_CL_DEMO_APP_308' )
+            mode      = 'LineMode'
+            class     = 'sapUiTinyMarginEnd sapUiTinyMarginBottom'
+        ).
 
         panel->generic_tile(
         header    = 'Process Flow'

src/z2ui5_cl_demo_app_308.clas.abap

@@ -0,0 +1,65 @@
+CLASS z2ui5_cl_demo_app_308 DEFINITION
+  PUBLIC
+  CREATE PUBLIC .
+
+  PUBLIC SECTION.
+
+    INTERFACES z2ui5_if_app.
+
+
+  PROTECTED SECTION.
+  PRIVATE SECTION.
+ENDCLASS.
+
+
+CLASS z2ui5_cl_demo_app_308 IMPLEMENTATION.
+
+  METHOD z2ui5_if_app~main.
+
+    IF client->check_on_init( ).
+
+      DATA(view) = z2ui5_cl_xml_view=>factory( ).
+      DATA(page) = view->shell(
+          )->page( title          = 'Harvey Chart'
+                   navbuttonpress = client->_event( 'BACK' )
+                   shownavbutton  = xsdbool( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL ) ).
+
+      page->harvey_ball_micro_chart(
+*                                   colorpalette  =
+*                                   press         =
+                                     size          = 'L'
+*                                   height        =
+*                                   width         =
+                                     total         = '10'
+                                     totallabel    = '11'
+*                                   aligncontent  =
+*                                   hideonnodata  =
+*                                   formattedlabel =
+                                     showfractions = abap_true
+                                     showtotal     = abap_true
+                                     totalscale    = abap_true
+*  RECEIVING
+*                                   result        =
+      )->harveyballmicrochartitem(
+*                                 id            =
+                                   color         = 'Good'
+                                   fraction      = '8'
+                                   fractionscale = 'Mrd'
+*                                 class         =
+*  RECEIVING
+*                                 result        =
+      ).
+
+      client->view_display( view->stringify( ) ).
+
+    ENDIF.
+
+
+    CASE client->get( )-event.
+      WHEN 'BACK'.
+        client->nav_app_leave( ).
+    ENDCASE.
+
+  ENDMETHOD.
+
+ENDCLASS.

src/z2ui5_cl_demo_app_308.clas.xml

@@ -0,0 +1,16 @@
+<?xml version="1.0" encoding="utf-8"?>
+<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
+ <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
+  <asx:values>
+   <VSEOCLASS>
+    <CLSNAME>Z2UI5_CL_DEMO_APP_308</CLSNAME>
+    <LANGU>E</LANGU>
+    <DESCRIPT>Harvey Chart</DESCRIPT>
+    <STATE>1</STATE>
+    <CLSCCINCL>X</CLSCCINCL>
+    <FIXPT>X</FIXPT>
+    <UNICODE>X</UNICODE>
+   </VSEOCLASS>
+  </asx:values>
+ </asx:abap>
+</abapGit>