tables: y76ft_nalog_ns.

data: begin of bseg1 occurs 0,
lifnr like y76ft_nalog_ns-lifnr,
regn  like y76ft_nalog_ns-regn,
end of bseg1.

data: begin of avan occurs 0,
bukrs like y76ft_nalog_ns-bukrs,
lifnr like y76ft_nalog_ns-lifnr,
kpp   like y76ft_nalog_ns-kpp,
regn  like y76ft_nalog_ns-regn,
bankn(20) type c ,
end of avan.

select lifnr regn from y76ft_nalog_ns
into corresponding fields of table bseg1
where lifnr like '11%' or lifnr like '33%'
or lifnr like '14%'.


loop at bseg1.
         select bukrs lifnr kpp regn from y76ft_nalog_ns
         appending table avan
         where lifnr = bseg1-lifnr.
endloop.

  loop at avan.
          select single bankn from y76ft_nalog_pf into avan-bankn
          where lifnr = avan-lifnr.
          modify avan.
endloop.

loop at avan.
          select single bankn from y76ft_nalog_pf into avan-bankn
          where lifnr = avan-lifnr.

          if sy-subrc = 0.
            modify avan.
          else.
            message i368(00) with
              'Нет записей в таблице y76ft_nalog_pf для кредитора'
              avan-lifnr.
          endif.
endloop.