16-Open SQL Statements in SAP ABAP
16-Open SQL Statements in SAP ABAP
INSERT
Is used to insert data into a database table, data can be inserted into database table using two
ways.
Insert record from internal table
Syntax: INSERT <DB TABLE> FROM TABLE <INTERNAL TABLE>.
UPDATE
Is used to update data in database table, data can be inserted into database table using two
ways.
Update record from internal table
Syntax: UPDATE <DB TABLE> FROM TABLE <INTERNAL TABLE>.
MODIFY
Is used to modify data in database table, data can be inserted into database table using two
ways.
Update record from internal table
DELETE
Is used to delete data from database table, data can be inserted into database table using two
ways.
Update record from internal table
Syntax: DELETE <DB TABLE> FROM TABLE <INTERNAL TABLE>.
*HERE <LOCK OBJECT NAME> IS THE LOCK OBJECT NAME WHICH IS CREATED IN DATA
DICTIONARY
Provide short description, select tables tab, provide table name and lock mode, save and
activate.
When ever we create a lock object two function modules will be created, go to SE37, check FM`s
DEQUEUE_EZSTUDENT and ENQUEUE_EZSTUDENT.
WA_STUDENT-STUDENTID = '09'.
WA_STUDENT-NAME = 'SAPNuts'.
WA_STUDENT-LASTNAME = 'SAPNuts'.
WA_STUDENT-FATHER = 'SAP'.
WA_STUDENT-DOB = '25/09/2013'.
WA_STUDENT-GENDER = 'Male'.
WA_STUDENT-COURSE = 'SAP ABAP'.
WA_STUDENT-EMAIL = '[email protected]'.
WA_STUDENT-FEE = '0000'.
MODE_ZSTUDENT = 'E'
MANDT
= SY-MANDT
STUDENTID
= '2'
=''
* _COLLECT
=''
* EXCEPTIONS
* FOREIGN_LOCK = 1
* SYSTEM_FAILURE
* OTHERS
=2
=3
.
IF SY-SUBRC = 0.
MODIFY ZSTUDENT FROM WA_STUDENT.
ENDIF.
= SY-MANDT
STUDENTID
= '3'
=''
=''
REPORT ZSAN_LOCKOBJECT.
DATA : IT_STUDENT TYPE TABLE OF ZSTUDENT,
WA_STUDENT TYPE ZSTUDENT.
WA_STUDENT-STUDENTID = '10'.
WA_STUDENT-NAME = 'SAPNuts'.
WA_STUDENT-LASTNAME = 'SAPNuts'.
WA_STUDENT-FATHER = 'SAP'.
WA_STUDENT-DOB = '25/09/2013'.
WA_STUDENT-GENDER = 'Male'.
WA_STUDENT-COURSE = 'SAP ABAP'.
WA_STUDENT-EMAIL = '[email protected]'.
WA_STUDENT-FEE = '0000'.
CALL FUNCTION 'ENQUEUE_EZSTUDENT' "add lock
EXPORTING
MODE_ZSTUDENT = 'E'
MANDT
= SY-MANDT
STUDENTID
= WA_STUDENT-STUDENTID.
IF SY-SUBRC = 0.
INSERT ZSTUDENT FROM WA_STUDENT. "insert record
IF SY-SUBRC = 0.
WRITE:/ 'Record inserted'.
ENDIF.
UPDATE ZSTUDENT FROM WA_STUDENT. "update record
IF SY-SUBRC = 0.
WRITE:/ 'Record updated'.
ENDIF.
DELETE ZSTUDENT FROM WA_STUDENT. "delete record
IF SY-SUBRC = 0.
= SY-MANDT
= WA_STUDENT-STUDENTID.