Friday, June 21, 2013

Sample Code - Hashed Table ( Internal Table )

PARAMETERS: pernr type pa0002-pernr.

typesbegin of typ_pernr,
       pernr like pa0002-pernr,
       nachn like pa0002-nachn,
       vorna like pa0002-vorna,
       end   of typ_pernr.

data: ls_pernr  type typ_pernr,

      lt_pernr  type  hashed table of typ_pernr  with unique key pernr.

  select pernr nachn vorna into table lt_pernr from pa0002 where pernr eq pernr.

  loop at lt_pernr into ls_pernr.

    write: ls_pernr-pernr, ls_pernr-nachn, ls_pernr-vorna.

  endloop.


Output








 

No comments:

Post a Comment