data: ls_detail type bapibranch.

rp_provide_from_last p0001 space pn-begda pn-endda.
if pnp-sw-found eq 0.
  "Recupera Grupo de Filiais a partir de Área e Subárea do funcionário
  select single grpbr from t7br0p
    into @data(lv_grpbr)
    where werks eq @p0001-werks
      and btrtl eq @p0001-btrtl.

  if sy-subrc eq 0.
    "Recupera filial para o Grupo de Filiais encontrado
    select single filia from t7brap
      into @data(lv_filia)
      where grpbr eq @lv_grpbr.

    if sy-subrc eq 0.
      "Com Empresa e Filial do empregado, recupera CNPJ
      call function 'HRCA_BRANCH_GETDETAIL'
        exporting
          company       = p0001-bukrs
          branch        = lv_filia
        importing
          branch_detail = ls_detail.

      if sy-subrc eq 0.
        data(lv_cnpj) = ls_detail-cgc_number.
      endif.
    endif.
  endif.
endif.