using inner join to print through class

 REPORT ZRP_STUDENT.


TYPES: BEGIN OF TY_ZST_DET,

        ZST_ID   TYPE ZST_DET-ZST_ID,

        ZST_NAME TYPE ZST_DET-ZST_NAME,

        ZST_DEPT TYPE ZST_DET-ZST_DEPT,

        ZST_FEE  TYPE ZST_DET-ZST_FEE,

      END OF TY_ZST_DET.

TYPES: BEGIN OF TY_ZST_DET1,

        ZST_ID    TYPE ZST_DET1-ZST_ID,

        ZST_MARKS TYPE ZST_DET1-ZST_MARKS,

      END OF TY_ZST_DET1.

TYPES: BEGIN OF TY_FINAL ,

        ZST_ID   TYPE ZST_DET-ZST_ID,

        ZST_NAME TYPE ZST_DET-ZST_NAME,

        ZST_DEPT TYPE ZST_DET-ZST_DEPT,

        ZST_FEE  TYPE ZST_DET-ZST_FEE,

        ZST_MARKS TYPE ZST_DET1-ZST_MARKS,

        END OF TY_FINAL.

DATA: IT_ST TYPE TABLE OF TY_ZST_DET,

      WA_ST TYPE TY_ZST_DET,

      IT_ST1 TYPE TABLE OF TY_ZST_DET1,

      WA_ST1 TYPE TY_ZST_DET1,

      IT_FINAL TYPE table of TY_FINAL,

      WA_FINAL TYPE TY_FINAL,

      wa_fieldcat   TYPE slis_fieldcat_alv,

      it_fieldcat   TYPE slis_t_fieldcat_alv,

      wa_layout TYPE slis_layout_alv.


PARAMETERS: P_ID TYPE ZST_DET-ZST_ID.

IF P_ID IS NOT INITIAL.

  SELECT a~zst_id,

        a~zst_name,

        a~zst_dept,

        a~zst_fee,

        b~zst_marks

        from zst_det as a

        LEFT OUTER join zst_det1 as b

        on a~zst_id = b~zst_id

        into table @DATA(it_final1)

        where a~zst_id = @p_id.



ENDIF.

cl_demo_output=>display( it_final1 ).

Input



Output






Comments

Popular posts from this blog

New syntax for append- VALUE (new syntax 7.4+) in ABAP

Read statement new syntax in ABAP. (7.4+).

Concatenation new syntax( 7.4+ ).