SAP/ABAP 코드

ABAP - Arithmetic

haramang 2021. 5. 24. 21:46

*&---------------------------------------------------------------------*

*& Report Z_EMPLOYEE_LIST_02

*&---------------------------------------------------------------------*

*&

*&---------------------------------------------------------------------*

 

 

*LINE-SIZE: It determines how many columns to be displayed on the report page.

* 132 characters are default.

REPORT Z_EMPLOYEE_LIST_02.

 

* Arithmetic=============================================================

 

DATA INTEGER01 TYPE I VALUE 22.

DATA PACKED_DECIMAL01 TYPE DECIMALS VALUE '5.5'.

DATA RESULT LIKE PACKED_DECIMAL01.

 

* Addition-----------------------------------------------

WRITE 'Addition'.

RESULT INTEGER01 + PACKED_DECIMAL01.

WRITE / RESULT.

 

RESULT INTEGER01 + 2.

WRITE / RESULT.

 

* SUBTRACTION-----------------------------------------

WRITE 'Subtraction'.

RESULT INTEGER01 PACKED_DECIMAL01.

WRITE / RESULT.

 

* DIVISION--------------------------------------------

WRITE 'Division'.

RESULT INTEGER01 / PACKED_DECIMAL01.

WRITE / RESULT.

 

* MULTIPLICATION--------------------------------------

WRITE 'MULTIPLICATION'.

RESULT INTEGER01 * PACKED_DECIMAL01.

WRITE / RESULT.

 

* ADD, SUBTRACT, DIVIDE, MULTIPLY

 

WRITE 'ADD, SUBTRACT, DIVIDE, MULTIPLY'.

ADD TO RESULT.

WRITE / RESULT.

 

 

* Conversion Rule--------------------------------------

 

DATA NUM1 TYPE DECIMALS VALUE '3.33'.

DATA RESULT1 TYPE I.

 

RESULT1 NUM1.

WRITE / RESULT1" RESULT WILL BE 3

 

 

* DIVISION REMAINDER-----------------------------------

 

*DATA NUM2 TYPE P DECIMALS 2 VALUE '5.45'.

*DATA NUM3 TYPE P DECIMALS 2 VALUE '1.48'.

*RESULT2 = NUM2 DIV NUM3.           INTEGER DIVISION

 

DATA NUM2 TYPE DECIMALS VALUE '5.45'.

DATA NUM3 TYPE DECIMALS VALUE '1.48'.

DATA RESULT2 TYPE DECIMALS 2.

 

RESULT2 NUM2 MOD NUM3.

WRITE / RESULT2.

'SAP > ABAP 코드' 카테고리의 다른 글

ABAP - IF & CASE  (0) 2021.05.24
ABAP - BASIC SQL STATEMENT  (0) 2021.05.24
ABAP - DATE & TIME & CURRENCY & QUANTITY  (0) 2021.05.24
Character & String  (0) 2021.05.24
ABAP - Variable / Constants  (0) 2021.05.24