REPORT Z06_01.
TYPES:
BEGIN OF T_PRODUCT,
PRODUCT_NAME TYPE C LENGTH 20,
PRICE TYPE I,
END OF T_PRODUCT.
TYPES: T_PRODUCT_LIST TYPE STANDARD TABLE OF T_PRODUCT WITH EMPTY KEY.
DATA(GT_PRODUCTS) = VALUE T_PRODUCT_LIST(
( PRODUCT_NAME = 'APPLE' PRICE = 100 )
( PRODUCT_NAME = 'BANANA' PRICE = 200 )
( PRODUCT_NAME = 'ORANGE' PRICE = 300 ) ).
TYPES:
BEGIN OF T_PRODUCT_WITH_VAT,
PRODUCT_NAME TYPE C LENGTH 20,
PRICE TYPE I,
PRICE_WITH_VAT TYPE I,
END OF T_PRODUCT_WITH_VAT.
TYPES: T_PRODUCT_WITH_VAT_LIST TYPE STANDARD TABLE OF T_PRODUCT_WITH_VAT WITH EMPTY KEY.
DATA(GT_PRODUCTS_WITH_VAT) = VALUE T_PRODUCT_WITH_VAT_LIST(
FOR WA IN GT_PRODUCTS
( PRODUCT_NAME = WA-PRODUCT_NAME
PRICE = WA-PRICE
PRICE_WITH_VAT = WA-PRICE * '1.1' ) ).
CL_DEMO_OUTPUT=>DISPLAY( GT_PRODUCTS_WITH_VAT ).
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
670 | REPORT Z99_24. | sapjoy | 2024.05.21 | 34 |
» | REPORT Z06_01. | sapjoy | 2024.04.20 | 38 |
668 | REPORT z05_36 | sapjoy | 2023.02.07 | 254 |
667 | API | sapjoy | 2022.11.02 | 331 |
666 | z15_21_drag | sapjoy | 2022.02.24 | 283 |
665 | Z18_06_DRAGCLASS | sapjoy | 2022.02.22 | 307 |
664 | REPORT Z21_01 | sapjoy | 2015.10.28 | 2259 |
663 | subroutine pool | sapjoy | 2013.11.15 | 3290 |
662 | REPORT Z20_01. | sapjoy | 2012.08.01 | 5073 |
661 | REPORT Z19_02. | sapjoy | 2012.08.01 | 3935 |
660 | REPORT z19_01. | sapjoy | 2012.08.01 | 3538 |
659 | REPORT z18_06. | sapjoy | 2012.08.01 | 3168 |
658 | REPORT z18_05 | sapjoy | 2012.08.01 | 3343 |
657 | REPORT z18_04 . | sapjoy | 2012.08.01 | 3367 |
656 | REPORT z18_03. | sapjoy | 2012.08.01 | 4572 |
655 | REPORT z18_02. | sapjoy | 2012.08.01 | 3102 |
654 | REPORT z18_01. | sapjoy | 2012.08.01 | 3124 |
653 | REPORT z17_23 | sapjoy | 2012.08.01 | 2520 |
652 | REPORT z17_22 | sapjoy | 2012.08.01 | 2272 |
651 | REPORT z17_21 . | sapjoy | 2012.08.01 | 2486 |