ABAP EML READ ENTITY, ENTITIES, ASSOCIATIONS IN RAP

ABAP EML READ ENTITY, ENTITIES:

  • Used to perform read-only operations on RAP BO instances. 

----------------------------------------------Read entity---------------------------------------

READ ENTITY

  • Reads single instances by their keys.

            READ ENTITY <EntityName>
              FROM VALUE #( ( %keys ) )
              RESULT <result_table>
              FAILED DATA(<Failed table name>)
              REPORTED DATA(< Reported table name>).
Example:
    
Fetching the above record.
CLASS zcl_ab_eml_crea DEFINITION

PUBLIC

FINAL

CREATE PUBLIC .


PUBLIC SECTION.

INTERFACES if_oo_adt_classrun.

PROTECTED SECTION.

PRIVATE SECTION.

ENDCLASS.


CLASS zcl_ab_eml_crea IMPLEMENTATION.

METHOD if_oo_adt_classrun~main.

DATA: lt_students TYPE TABLE FOR CREATE ziv_ab_hdr_stu13 .

READ ENTITY ziv_ab_hdr_stu13

FROM VALUE #( ( %tky-StuId = '0EA662BBBE9E1FE097B4EF47C07168A9'

%control = VALUE #(

StuName = if_abap_behv=>mk-on

StuAge = if_abap_behv=>mk-on

StuCourse = if_abap_behv=>mk-on

StuCourDur = if_abap_behv=>mk-on

StuStatus = if_abap_behv=>mk-on

StuGender = if_abap_behv=>mk-on

StuDob = if_abap_behv=>mk-on

) ) )

RESULT DATA(lt_data)

FAILED DATA(lt_failed)

REPORTED DATA(lt_reported).

IF lt_failed IS INITIAL.

out->write( EXPORTING data = lt_data ).

ENDIF.


ENDMETHOD.

ENDCLASS.


Output


------------------------------------------------End of Read entity-------------------------------------

------------------------------------------------ Read entities------------------------------------------

READ ENTITIES

  • Reads multiple instances by their keys.
  • Can also read associated data (like to_Items).

        READ ENTITIES OF <RootEntityName>
          ENTITY <EntityName>
          ALL FIELDS
          WITH CORRESPONDING #( <keys_table> )
          RESULT <result_table>
          FAILED DATA(<Failed table name>)
          REPORTED DATA(< Reported table name>).

Example:

Fetching the above record.

CLASS zcl_ab_eml_crea DEFINITION

PUBLIC

FINAL

CREATE PUBLIC .


PUBLIC SECTION.

INTERFACES if_oo_adt_classrun.

PROTECTED SECTION.

PRIVATE SECTION.

ENDCLASS.



CLASS zcl_ab_eml_crea IMPLEMENTATION.

METHOD if_oo_adt_classrun~main.

DATA: lt_students TYPE TABLE FOR CREATE ziv_ab_hdr_stu13,

lt_keys TYPE TABLE FOR READ RESULT ziv_ab_hdr_stu13.


lt_keys = VALUE #( ( StuId = '0EA662BBBE9E1FE097B4EF47C07168A9' )

                       ( StuId = '0EA662BBBE9E1FE097B53C800EB768A9' ) ).

READ ENTITIES OF ziv_ab_hdr_stu13

ENTITY Student

ALL FIELDS WITH CORRESPONDING #( lt_keys )

RESULT DATA(lt_data)

FAILED DATA(lt_failed)

REPORTED DATA(lt_reported).

IF lt_failed IS INITIAL.

out->write( EXPORTING data = lt_data ).

ENDIF.

ENDMETHOD.

ENDCLASS.


Output:

-----------------------------------------------End of Read entities--------------------------------------

--------------------------------------------Read Associations-----------------------------------------

READ_ASSOCIATIONS

        READ ENTITIES OF <BOName>

          ENTITY <ParentEntity>

          BY ASSOCIATION <association_name>

          WITH CORRESPONDING #( <keys_table> )

          RESULT <result_table>

          FAILED DATA(<Failed table name>)

          REPORTED DATA(< Reported table name>).

Example(READ BOTH HEADER AND ITEM):

Fetching the above record.

CLASS zcl_ab_eml_crea DEFINITION

PUBLIC

FINAL

CREATE PUBLIC .


PUBLIC SECTION.

INTERFACES if_oo_adt_classrun.

PROTECTED SECTION.

PRIVATE SECTION.

ENDCLASS.



CLASS zcl_ab_eml_crea IMPLEMENTATION.

METHOD if_oo_adt_classrun~main.

DATA: lt_keys TYPE TABLE FOR READ RESULT ziv_ab_hdr_stu13.

lt_keys = VALUE #( ( StuId = '0EA662BBBE9E1FE097BDAE8EDE7348A9' ) )."( StuId = '0EA662BBBE9E1FE097B53C800EB768A9' ) ).


READ ENTITIES OF ziv_ab_hdr_stu13

ENTITY Student

ALL FIELDS WITH CORRESPONDING #( lt_keys )

RESULT DATA(lt_data)


ENTITY Student BY \_attach

ALL FIELDS WITH CORRESPONDING #( lt_keys )

RESULT data(lt_data1)

FAILED DATA(lt_failed)

REPORTED DATA(lt_reported).


IF lt_failed IS INITIAL.

out->write( EXPORTING data = lt_data ).

out->write( EXPORTING data = lt_data1 ).

ENDIF.

ENDMETHOD.

ENDCLASS.

Output(BOTH HEADER AND ITEM):


Example (READ ITEM only)

CLASS zcl_ab_eml_crea DEFINITION

PUBLIC

FINAL

CREATE PUBLIC .


PUBLIC SECTION.

INTERFACES if_oo_adt_classrun.

PROTECTED SECTION.

PRIVATE SECTION.

ENDCLASS.


CLASS zcl_ab_eml_crea IMPLEMENTATION.

METHOD if_oo_adt_classrun~main.

DATA: lt_keys TYPE TABLE FOR READ RESULT ziv_ab_hdr_stu13.

lt_keys = VALUE #( ( StuId = '0EA662BBBE9E1FE097BDAE8EDE7348A9' ) ).

READ ENTITIES OF ziv_ab_hdr_stu13

ENTITY Student BY \_attach

ALL FIELDS WITH CORRESPONDING #( lt_keys )

RESULT DATA(lt_data)

FAILED DATA(lt_failed)

REPORTED DATA(lt_reported).


IF lt_failed IS INITIAL.

out->write( EXPORTING data = lt_data ).

ENDIF.

ENDMETHOD.

ENDCLASS.


Output (ITEM only)

-------------------------------------------End of Read Association------------------------------------------


******************************Thank you***************************

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+ ).