Graphical Organizational Structure

DATA  lt_object    TYPE STANDARD TABLE OF hrealo.

CALL FUNCTION 'PD_STRUCTURAL_GRAPHICS'
     EXPORTING
       context_id                       = 'GENERAL'
       eval_path                         = 'SBESX'
       statuses                            = '1'
       begin_date                      = sy-datum
       end_date                         =  sy-datum
       activate                            = ' '
       load_pd_toolbox            = 'X'
       load_pd_profiles           = 'X'
       callback_program          = 'SAPLRHGB'
       callback_objects            = 'MODIFY_OBJ'
     TABLES
       pd_objects                     = lt_object
     EXCEPTIONS
       no_objects_available = 01.