Data: m_SCHKZ type pa0007-schkz.

loop at infocolumn.

select single SCHKZ from pa0007 into m_schkz
  where pernr = infocolumn-pernr
    and begda <= sy-datum
    and endda >= sy-datum.

INFOCOLUMN-INFOTEXT = m_schkz.
modify infocolumn.
endloop.