REPORT zprogram3.
DATA: lv_plvar      TYPE objec-plvar,
      lt_result_tab LIKE TABLE OF swhactor.

PARAMETERS: lv_date1 TYPE objec-begda,
            lv_date2 TYPE objec-endda,
            lv_wegid TYPE gdstr-wegid DEFAULT \'O-S-P\',
            lv_objid TYPE objid DEFAULT \'50000211\',
            lv_otype TYPE otype DEFAULT \'O\'.


CALL FUNCTION \'RH_GET_PLVAR\'
  IMPORTING
    plvar    = lv_plvar
  EXCEPTIONS
    no_plvar = 1
    OTHERS   = 2.
IF sy-subrc <> 0.

ENDIF.


CALL FUNCTION \'RH_STRUC_GET\'
  EXPORTING
    act_otype      = lv_otype
    act_objid      = lv_objid
    act_wegid      = lv_wegid
    act_plvar      = lv_plvar
    act_begda      = lv_date1
    act_endda      = lv_date2
  TABLES
    result_tab     = lt_result_tab
  EXCEPTIONS
    no_plvar_found = 1
    no_entry_found = 2
    OTHERS         = 3.
IF sy-subrc <> 0.