SAP ABAP Call Function SET_TEXTSYMBOL Change Read Text SO10 | ILMU PROGRAMMER
Home » SAP ABAP Call Function SET_TEXTSYMBOL Change Read Text SO10

SAP ABAP Call Function SET_TEXTSYMBOL Change Read Text SO10

SET_TEXTSYMBOL adalah modul fungsi SAP digunakan jika kita sedang membuat standard text pada SAP dan ingin mengganti symbol text tersebut jadi value yang ingin kita set.

Pastikan kamu sudah mengerti dan faham cara membuat standard text pada SAP, jika belum faham bisa membaca artikel cara membuat Standard Text disini, dan pastikan juga kamu sudah memahami cara membuat program ABAP di SAP, jika belum faham bisa baca terlebih dahulu artikel Membuat Program ABAP disini.

Berikut langkah-langkah menggunakan SET_TEXTSYMBOL

  1. Buat Standard Text menggunakan tcode SO10, lalu buat seperti dibawah ini:
Create Standard Text
  1. Ketik isi dari standard text dan buat simbol, Misalkan seperti ini:
Tcode SO10 Create Standard Text With Symbols

Berikut text nya:

Belajar Text Symbol
ILMUPROGRAM.COM

Selamat datang &ilmuprogram& di ilmuprogram
  1. Buat Program ABAP menggunakan tcode SE38, lalu ketik script seperti dibawah ini:
REPORT  ZWAHYU_TEST.

DATA: LD_LINES TYPE TABLE OF  TLINE WITH HEADER LINE,
      LD_ID LIKE  THEAD-TDID,
      LD_name LIKE  THEAD-TDNAME,
      LD_object LIKE  THEAD-TDOBJECT,
      ld_head  TYPE thead.

LD_ID = 'ST'.
ld_name = 'ZWAHYU_STANDARDTEXT'.
LD_object = 'TEXT'.
CALL FUNCTION 'READ_TEXT'
  EXPORTING
    ID                      = LD_ID
    LANGUAGE                = SY-LANGU
    NAME                    = LD_name
    OBJECT                  = LD_object
  IMPORTING
    header                  = ld_head
  TABLES
    LINES                   = LD_LINES
  EXCEPTIONS
    ID                      = 1
    LANGUAGE                = 2
    NAME                    = 3
    NOT_FOUND               = 4
    OBJECT                  = 5
    REFERENCE_CHECK         = 6
    WRONG_ACCESS_TO_ARCHIVE = 7
    OTHERS                  = 8.
IF SY-SUBRC <> 0.
  MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
          WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

CALL FUNCTION 'INIT_TEXTSYMBOL'.

CALL FUNCTION 'SET_TEXTSYMBOL'
  EXPORTING
    header       = ld_head
    name         = '&ilmuprogram&'
    value        = 'WAHYU AMALDI'
    value_length = 0
    replace      = 'X'.


CALL FUNCTION 'TEXT_SYMBOL_REPLACE'
  EXPORTING
    header = ld_head
  TABLES
    lines  = ld_lines.
LOOP AT LD_LINES.
  WRITE / LD_LINES-TDLINE.
ENDLOOP.
  1. Jika program tersebut dijalankan, maka &ilmuprogram& pada simbol standard text akan dirubah menjadi ‘WAHYU AMALDI’
Run Program

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?