... 
      data lt_ihpa like ihpavb occurs 0 with header line.
      field-symbols: <fs_ihpa> type table.

      assign ('(SAPLIPAR)xihpa[]') to <fs_ihpa>.
      if sy-subrc = 0.
         append lines of <fs_ihpa> to lt_ihpa.
         read table lt_ihpa with key parvw = '<НужнаяРольПартнера>'.
         if sy-subrc = 0.
              "
              " Здесь делаем с партнером, то что захотим :)
              "
         endif.

      endif.
...