Starter #3 Sample Code Abap - Memulai Belajar Abap dari Nol | ILMU PROGRAMMER
Home » Starter #3 Sample Code Abap – Memulai Belajar Abap dari Nol

Starter #3 Sample Code Abap – Memulai Belajar Abap dari Nol

Hai, Sebelum memulai pastikan kamu memiliki server SAP, Atau kamu bisa berkonsultasi dengan kami secara gratis / bisa mengikuti kursus intensif yang kami sediakan.
Dapatkan Akses masuk server SAP secara gratis hanya di ilmuprogram.com

Sample Code #1 – Membuat Tulisan Text-Symbols

Pada sample ini kita akan membuat tulisan ILMUPROGRAM.COM mengunakan text symbols
Pertama buka tcode SE38, kemudian buat program abap, pergi kemenu goto > Text Elements > Text Symbols.

Ketik “001” kemudian isi “ILMUPROGRAM.COM”, Kemudia Active kan

Kembali ke editor abap, Kemudian ketik code berikut ini:

REPORT  YWAHYU_TEST.

WRITE TEXT-001.

Sample Code #2 – Menampilkan System Field

Pada sample ini kita akan menampilkan field system dari SAP, seperti menampilkan user login, jam server dst.
Berikut ini merupakan sample code nya:

REPORT  YWAHYU_TEST.

WRITE:/ 'SY-ABCDE', SY-ABCDE,
      / 'SY-DATUM', SY-DATUM,
      / 'SY-DBSYS', SY-DBSYS,
      / 'SY-HOST ', SY-HOST,
      / 'SY-LANGU', SY-LANGU,
      / 'SY-MANDT', SY-MANDT,
      / 'SY-OPSYS', SY-OPSYS,
      / 'SY-REPID', SY-REPID,
      / 'SY-SAPRL', SY-SAPRL,
      / 'SY-SYSID', SY-SYSID,
      / 'SY-TCODE', SY-TCODE,
      / 'SY-UNAME', SY-UNAME,
      / 'SY-UZEIT', SY-UZEIT.

Ketika di execute maka akan tampil seperti berikut ini:

Sample Code #3 – Element Data Object

Pada sample #03 ini kita akan belajar bagaimana menampilkan data dari Element Data Object, Sederhananya pada sample #03 ini kita akan belajar membuat data variable.
Berikut sample codenya:

REPORT  YWAHYU_TEST.

DATA: CNAME(25)      TYPE C VALUE 'ILMUPROGRAM.COM',
      TODAY          TYPE D VALUE '04112021',
      FNUM           TYPE F VALUE '1135.6789',
      COUNT          TYPE I VALUE 1815654329,
      ECODE(7)       TYPE N VALUE 2113778,
      BASIC_SAL(4)   TYPE P DECIMALS 2 VALUE 22200,
      NOW            TYPE T VALUE '094500',
      HEXA(8)        TYPE X VALUE '01231789ABCDEF',
      STRNG          TYPE STRING VALUE 'WAHYU AMALDI',
      XSTRNG         TYPE XSTRING.

WRITE:/ 'TYPE C      :', CNAME,
      / 'TYPE D      :', TODAY,
      / 'TYPE F      :', FNUM,
      / 'TYPE I      :', COUNT,
      / 'TYPE N      :', ECODE,
      / 'TYPE P      :', BASIC_SAL,
      / 'TYPE T      :', NOW,
      / 'TYPE X      :', HEXA,
      / 'TYPE STRING :', STRNG.

Berikut merupakan hasilnya jika kita execute program tsb

Semoga membantu.

Leave a Comment

 
Open chat
Perlu Bantuan Konsultasi ?
Hallo Pembaca.
Telp (021) 55670115 untuk terhubung langsung dengan kami.

Apakah ada yang bisa kami bantu?