004_comission/_resources
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

update,

Browse Source
This commit is contained in:
louiscklaw
2025-02-01 01:58:47 +08:00
parent b3da7aaef5
commit 04dbefcbaf
1259 changed files with 280657 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
it114105/itp4512/Lab02/Z_02_CHECKDATE.abap Normal file
View File

@@ -0,0 +1,15 @@
*&---------------------------------------------------------------------*
*& Report  Z_02_CHECKDATE *
*& *
*&---------------------------------------------------------------------*
*& *
*& *
*&---------------------------------------------------------------------*
REPORT Z_02_CHECKDATE
WRITE 'Check Date'.
SKIP.
WRITE: 'Today is ',
SY-DATUM,
/ 'My User ID is',
SY-UNAME.

21
it114105/itp4512/Lab02/Z_02_COUNTER.abap Normal file
View File

@@ -0,0 +1,21 @@
*&---------------------------------------------------------------------*
*& Report  Z_02_COUNTER *
*& *
*&---------------------------------------------------------------------*
*& *
*& *
*&---------------------------------------------------------------------*
*
* FROM.............
*
*-----------------------------------------------------------------------
*
* text
*
*-----------------------------------------------------------------------
REPORT Z_02_COUNTER
DATA COUNT_X TYPE I.
COUNT_X = 4 + 7 + 9.
WRITE: 'The value is',
COUNT_X. "display result

21
it114105/itp4512/Lab02/Z_02_FORMAT..abap Normal file
View File

@@ -0,0 +1,21 @@
*&---------------------------------------------------------------------*
*& Report  Z_02_FORMAT *
*& *
*&---------------------------------------------------------------------*
*& *
*& *
*&---------------------------------------------------------------------*
REPORT Z_02_FORMAT
DATA: f1(4) TYPE P VALUE 1234,
p TYPE I VALUE 5,
q TYPE I VALUE 8.
WRITE: / '----+----|----+--',
/ '12345678901234567'.
SKIP.
WRITE /(2) 'XYZ'.
WRITE /(4) 'XYZ'.
WRITE 'ABC'.
WRITE /5(4) f1.
WRITE AT /p(q) f1.