DATA(lv_title) = CONV text70( 'GANTT Demo' ).
DATA(lv_subtitle) = CONV text70( 'Subtitle' ).
DATA(lv_cattitle) = CONV text70( 'Cattitle' ).
DATA(lv_custob) = CONV w3objid( '/ISDFPS/GC200' ). "/ISDFPS/GC250, /ISDFPS/GC300
DATA(it_gantt_serie_data) = VALUE /isdfps/gantt_serie_tab( ( serie = 'SERIES1' serie_label = 'Person 1' )
( serie = 'SERIES2' serie_label = 'Person 2' ) ).
DATA(it_gantt_value_data) = VALUE /isdfps/gantt_value_tab( ( bartext = 'Host Müller' category = '1' sub_category = '1' serie = 'SERIES1' begda = '20250101' begti = '080000' endda = '20250102' endti = '100000' objkey = '1' )
( bartext = 'Ina Meier' category = '2' sub_category = '2' serie = 'SERIES2' begda = '20250101' begti = '100000' endda = '20250103' endti = '110000' objkey = '2' ) ).
* Gantt Chart Anzeige
CALL FUNCTION '/ISDFPS/GANTT_CHART_DISPLAY'
EXPORTING
title = lv_title
subtitle = lv_subtitle
category_title = lv_cattitle
gantt_serie_data = it_gantt_serie_data
gantt_value_data = it_gantt_value_data
customizing_object = lv_custob
* begda = '20250101'
* endda = '20250103'
* 3dview = abap_true
EXCEPTIONS
no_serie_data = 1
no_value_data = 2
no_customizing_data = 3
OTHERS = 4.
IF sy-subrc <> 0.
ENDIF.