HEY....CAN ANY BODY CORRECT MY CODE!!!!!

Question

REPORT YTABLEJOIN .
TABLES:YEMPLOYEE,
       YEMPLOYEEDB.
TYPES: BEGIN OF TY_EMPLOYEE,
        EMP_ID TYPE YEMPLOYEE-EMP_ID,
        EMP_NAME TYPE YEMPLOYEE-EMP_NAME,
        EMP_ADDR TYPE YEMPLOYEE-EMP_ADDR,
        EMP_PROFILE TYPE YEMPLOYEE-EMP_PROFILE,
        EMP_AGE TYPE YEMPLOYEEDB-EMP_AGE,
        EMP_GENDER TYPE YEMPLOYEEDB-EMP_GENDER,
      END OF TY_EMPLOYEE.
TYPES: BEGIN OF TY_EMPLOYEEDB,
        EMP_NAME TYPE YEMPLOYEEDB-EMP_NAME,
        EMP_ID TYPE YEMPLOYEEDB-EMP_ID,
        EMP_ADDR TYPE YEMPLOYEE-EMP_ADDR,
        EMP_PROFILE TYPE YEMPLOYEE-EMP_PROFILE,
       END OF TY_EMPLOYEEDB.
*TYPES: BEGIN OF TY_JOIN,
       EMP_ID TYPE YEMPLOYEE-EMP_ID,
       EMP_NAME TYPE YEMPLOYEE-EMP_NAME,
       EMP_ADDR TYPE YEMPLOYEE-EMP_ADDR,
       EMP_PROFILE TYPE YEMPLOYEE-EMP_PROFILE,
       EMP_AGE TYPE YEMPLOYEEDB-EMP_AGE,
       EMP_GENDER TYPE YEMPLOYEEDB-EMP_GENDER,
      END OF TY_JOIN.
DATA:I_EMPLOYEE TYPE STANDARD TABLE OF TY_EMPLOYEE WITH HEADER LINE.
DATA:I_EMPLOYEEDB TYPE STANDARD TABLE OF TY_EMPLOYEEDB WITH HEADER LINE.
*DATA:I_JOIN TYPE STANDARD TABLE OF TY_JOIN WITH HEADER LINE.
*SELECT * FROM YEMPLOYEE INTO CORRESPONDING FIELDS OF TABLE I_EMPLOYEE .
*SELECT * FROM YEMPLOYEEDB INTO CORRESPONDING FIELDS OF TABLE
*I_EMPLOYEEDB.
*USING JOIN STATEMENTS
*SELECT AEMP_ID AEMP_NAME A~EMP_ADDR
*AEMP_PROFILE BEMP_AGE B~EMP_GENDER INTO
*CORRESPONDING FIELDS OF TABLE I_JOIN FROM I_EMPLOYEE AS A JOIN
*I_EMPLOYEEDB  AS B ON AEMP_ID = BEMP_ID.
*USING FOR ALL ENTRIES
SELECT *
FROM YEMPLOYEEDB  INTO
CORRESPONDING FIELDS OF TABLE I_EMPLOYEEDB.
SELECT * FROM YEMPLOYEE INTO
CORRESPONDING FIELDS OF TABLE I_EMPLOYEE
FOR ALL ENTRIES IN I_EMPLOYEEDB
WHERE EMP_ID = I_EMPLOYEEDB-EMP_ID
AND EMP_NAME = I_EMPLOYEEDB-EMP_NAME.
*AND EMP_NAME = I_EMPLOYEE-EMP_NAME.
*LOOP AT I_EMPLOYEE.
*READ TABLE I_EMPLOYEEDB WITH KEY EMP_ID = I_EMPLOYEE-EMP_ID.
*IF SY-SUBRC = 0.
*I_EMPLOYEE-EMP_ADDR= I_EMPLOYEEDB-EMP_ADDR.
*I_EMPLOYEE-EMP_PROFILE = I_EMPLOYEEDB-EMP_PROFILE.
*MODIFY I_EMPLOYEE.
*ENDLOOP.
LOOP AT I_EMPLOYEE.
WRITE:  I_EMPLOYEE-EMP_ID,
        I_EMPLOYEE-EMP_NAME,
        I_EMPLOYEE-EMP_ADDR,
        I_EMPLOYEE-EMP_PROFILE,
        I_EMPLOYEE-EMP_AGE,
        I_EMPLOYEE-EMP_GENDER.
        SKIP.
ENDLOOP.
MY QUESTION IS HOW TO GET THE DISPLAY....?

Answer 1

hi.
just debug your program.
i think select statement not fetching data from table YEMPLOYEE.
use internal table.
just look at this code
TABLES:YEMPLOYEE,
YEMPLOYEEDB.
data: BEGIN OF I_EMPLOYEE occurs 0,
EMP_ID TYPE YEMPLOYEE-EMP_ID,
EMP_NAME TYPE YEMPLOYEE-EMP_NAME,
EMP_ADDR TYPE YEMPLOYEE-EMP_ADDR,
EMP_PROFILE TYPE YEMPLOYEE-EMP_PROFILE,
EMP_AGE TYPE YEMPLOYEEDB-EMP_AGE,
EMP_GENDER TYPE YEMPLOYEEDB-EMP_GENDER,
END OF I_EMPLOYEE.
data: BEGIN OF I_EMPLOYEEDB occurs 0,
EMP_NAME TYPE YEMPLOYEEDB-EMP_NAME,
EMP_ID TYPE YEMPLOYEEDB-EMP_ID,
EMP_ADDR TYPE YEMPLOYEE-EMP_ADDR,
EMP_PROFILE TYPE YEMPLOYEE-EMP_PROFILE,
END OF I_EMPLOYEEDB.
*USING FOR ALL ENTRIES
SELECT *
FROM YEMPLOYEEDB INTO
CORRESPONDING FIELDS OF TABLE I_EMPLOYEEDB.
SELECT * FROM YEMPLOYEE INTO
CORRESPONDING FIELDS OF TABLE I_EMPLOYEE
FOR ALL ENTRIES IN I_EMPLOYEEDB
WHERE EMP_ID = I_EMPLOYEEDB-EMP_ID
AND EMP_NAME = I_EMPLOYEEDB-EMP_NAME.
LOOP AT I_EMPLOYEE.
WRITE: I_EMPLOYEE-EMP_ID,
I_EMPLOYEE-EMP_NAME,
I_EMPLOYEE-EMP_ADDR,
I_EMPLOYEE-EMP_PROFILE,
I_EMPLOYEE-EMP_AGE,
I_EMPLOYEE-EMP_GENDER.
SKIP.
ENDLOOP.
Message was edited by:
        prajwal k