*&---------------------------------------------------------------------*
*& Report YEMP_REPORT1 *
*& *
*&---------------------------------------------------------------------*
*& *
*& *
*&---------------------------------------------------------------------*
REPORT YEMP_REPORT1.
TYPES: BEGIN OF ST_EMP,
EMP_NO LIKE YEMP-EMP_NO,
EMP_NAME LIKE YEMP-EMP_NAME,
CITY LIKE YEMP-CITY,
END OF ST_EMP.
DATA: WA_EMP TYPE ST_EMP.
DATA: IT_EMP LIKE SORTED TABLE OF WA_EMP WITH UNIQUE KEY EMP_NO.
WA_EMP-EMP_NO = '0001'.
WA_EMP-EMP_NAME ='xyz'.
WA_EMP-CITY = 'pune'.
APPEND WA_EMP TO IT_EMP.
Loop at it_emp into wa_emp.
Write :/5 wa_emp-emp_no,
20 wa_emp-emp_name,
45 wa_emp-city.
endloop.
No comments:
Post a Comment