Build and run a simple ABAP program in BTP ABAP Environment
PreviousConnect Eclipse to BTP ABAP Env.NextConnect to Your On-Premise System from SAP BTP, ABAP Environment (Remote Function Call(RFC))
Last updated
Last updated
@EndUserText.label : 'Database Table - Travel'
@AbapCatalog.enhancement.category : #NOT_EXTENSIBLE
@AbapCatalog.tableCategory : #TRANSPARENT
@AbapCatalog.deliveryClass : #A
@AbapCatalog.dataMaintenance : #RESTRICTED
define table zemp {
key client : abap.clnt not null;
key emp_id : abap.char(10) not null;
emp_name : abap.char(30);
}
CLASS zemp_class DEFINITION
PUBLIC
FINAL
CREATE PUBLIC .
PUBLIC SECTION.
INTERFACES if_oo_adt_classrun.
PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.
CLASS zemp_class IMPLEMENTATION.
METHOD if_oo_adt_classrun~main.
DATA:itab TYPE TABLE OF zemp.
* fill internal table (itab)
itab = VALUE #(
( emp_id = '101' emp_name = 'Partha' )
).
* delete existing entries in the database table
DELETE FROM zemp.
* insert the new table entries
INSERT zemp FROM TABLE @itab.
* check the result
SELECT * FROM zemp INTO TABLE @itab.
out->write( sy-dbcnt ).
out->write( 'Travel data inserted successfully!').
ENDMETHOD.
ENDCLASS.