NAVAPAT_T

ABAP : Internal Table -2

Jul 19th, 2017
206
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ABAP 0.83 KB | None | 0 0
  1. REPORT ZPATMAX_UNIT.
  2. *---------with DB table--------
  3. TABLES ZPAT_STUDENT.
  4. * field{MANDT,ID,NAME,GRADE,SCORE,ID_RALY}
  5. DATA it_student TYPE zpat_student OCCURS 0 WITH HEADER LINE.
  6. it_student-id = '3'.
  7. it_student-name = 'nutchai'.
  8. it_student-grade = '3'.
  9. it_student-score = 78.
  10. it_student-ID_RALLY = '3'.
  11. APPEND it_student.
  12. loop at it_student.
  13.   write : it_student-name.
  14.   ENDLOOP.
  15. *---------with structure --------
  16.   TYPES : BEGIN OF type_stru,
  17.     name(10),
  18.     love(10),
  19.     END OF type_stru.
  20.  DATA it_data TYPE type_stru OCCURS 0 WITH HEADER LINE.
  21.  it_data-name = 'parichut'.
  22.  it_data-love = 'dog'.
  23.  APPEND it_data.
  24.  it_data-name = 'navapat'.
  25.  it_data-love = 'cat'.
  26.  APPEND it_data.
  27.  loop at it_data.
  28.    write :/ 'ROUND : ',sy-tabix,'NAME : ', it_data-name,
  29.           / 'ROUND : ',sy-tabix,'LOVE : ', it_data-love.
  30.  ENDLOOP.
Advertisement
Add Comment
Please, Sign In to add comment