Open SQL Examples in ABAP - Part 1

 TABLES SCARR.

UPDATE SCARR.

SET CARRNAME = 'india' WHERE CARRID = 'MP'.

IF SY-SUBRC = 0.

MESSAGE 'record is updated successfully' TYPE I.

ELSE.

MESSAGE 'record is not updated' TYPE 'I'.

ENDIF.

TABLES SCARR.

DELETE FROM SCARR WHERE CARRID = 'UP'.

IF SY-SUBRC = 0.

MESSAGE 'record is DELETED successfully' TYPE 'I'.

ELSE.

MESSAGE 'record is not DELETED' TYPE 'I'.

ENDIF.
**--displaying records of MARA table

**with the help of explicit header line

DATA WA TYPE MARA.

**--database table loop

SELECT * FROM MARA INTO WA.

WRITE: / WA-MATNR,              "Material No.

WA-MBRSH,                 "Industry sector

WA-MTART,                   "Material type

WA-MEINS.                   "Unit of Measure

ENDSELECT.
**displaying records of MARA table

**with the help of Implicit header line

TABLES MARA.

**--database table loop

SELECT * FROM MARA.

WRITE: / MARA-MATNR,

MARA-MBRSH,

MARA-MTART,

MARA-MEINS.

ENDSELECT.
**--displaying raw material records only from MARA table

**with the help of Explicit header line.

DATA WA TYPE MARA.

**--WHERE clause is for filtering the records

SELECT * FROM MARA INTO WA WHERE MTART = 'ROH'.

WRITE: / WA-MATNR,

WA-MBRSH,

WA-MTART,

WA-MEINS.

ENDSELECT.
**displaying Raw Material records which are measured in KG

** only from MARA table.

DATA WA TYPE MARA.

**--Where clause is for filtering the Records

SELECT * FROM MARA INTO WA WHERE MTART = 'ROH' AND MEINS = 'KG'.

WRITE:/ WA-MATNR,

WA-MBRSH,

WA-MTART,

WA-MEINS.

ENDSELECT.

Comments

Post a Comment

Popular posts from this blog

Domains and Data Elements

  Domains A domain provided Technical attributes (type, length and possible values) for a field. The definition of domain in ABAP is same as that in Mathematics. In the world of Mathematics, a domain is defined as the set of input values that are valid for a given function. The same holds true for domains in ABAP. To understand this, let us first see what is the role of domains in ABAP data dictionary. Domains -> Data Elements -> (Structures, DB tables, program references etc.)
Read more

How to update exchange rates via process chain in BW

Image
 The exchange rate in the BW system may not be updated one. Also the business wants to see the amounts according to the exchange rates in the source. In such cases, you have to update the exchange rate in the BW system via process chain. Include the step ‘Execute ABAP Program’ in the process chain. Give the program name as ‘RSIMPCURR’. Create a variant for the program.
Read more

Sample ABAP program for Updating notepad file data to Internal table and Sending it to Application server

 *--Structure type TYPES: BEGIN OF TY_STD, RONO TYPE C LENGTH 4, NAME1 TYPE C LENGTH 20, GEN TYPE C LENGTH 6, FEES TYPE C LENGTH 10. END OF TY_STD. *--Header line and internal table DATA WKA TYPE TY_STD. DATA INT_TAB TYPE TABLE OF TY_STD. *--Application server files are known as "Datasets" *--here "fname" is the Dataset DATA FNAME TYPE C LENGTH 40 VALUE "StudentsInfo.txt". *--Convert notepad file data into internal table CALL FUNCTION 'GUI_UPLOAD' EXPORTING FILENAME = 'C:Documents and SettingsAdministratorDesktopstudents.txt' HAS FIELD_SEPARATOR = 'X' TABLES DATA_TAB = INT_TAB. *--Sending data to Application Server OPEN DATASET FNAME FOR OUTPUT IN TEXT MODE ENCODING DEFAULT. LOOP AT INT_TAB INTO WKA. TRANSFER WKA TO FNAME. ENDLOOP. CLOSE DATASET FNAME.
Read more