SAP Script
SAP den çıktı almak için kullanılan standart sisteme verilen isimdir. Sık kullanılan beş işlem kodu vardır:
SE71 : Form Çizimi
SE72 : Stil Hazırlama
SE73 : Font Hazırlama
SE78 : SAPscript Grafik Yönetimi
RSTXLDMC : Grafikleri text olarak sisteme aktarma

SAP Script Kodlama

Çerçeve Oluştur: 
POSITION WINDOW
POSITION XORIGIN '-0.5' CH YORIGIN '-0.25' LN
SIZE WIDTH '+0.4' CH HEIGHT +1 LN
BOX HEIGHT '4' LN FRAME 10 TW
Resim Tanımla: 
IF &EKKO-BUKRS& EQ 'HT03'
INCLUDE ZHEX-MACRO-Z_TARIM5 OBJECT GRAPHICS IDBMON LANGUAGE TR
ELSE
INCLUDE ZHEX-MACRO-Z_OTOMOTIV OBJECT GRAPHICSID BCOL LANGUAGE TR
ENDIF
Perform: 
DEFINE &LV_TEXT&
PERFORM FORM1 IN PROGRAM ZRIPRJT00
USING &CAUFVD-AUART&
CHANGING &LV_TEXT&
ENDPERFORM

Sipariş No   ,,&CAUFVD-AUFNR&,,Sip.Tipi ,,&CAUFVD-AUART&
&LV_TEXT&

**************ZRIPRJT00 İçerisindeki Kod*************
FORM form1 TABLES in_tab STRUCTURE itcsy
                  out_tab STRUCTURE itcsy.

DATA: lv_auart LIKE CAUFVD-AUART,
      lv_text  LIKE T003P-TXT .

READ TABLE in_tab INDEX 1 INTO in_tab.

SELECT SINGLE TXT FROM T003P
       INTO   lv_text
       WHERE  AUART EQ in_tab-value AND
              SPRAS EQ sy-langu.
IF sy-subrc NE 0 .
  lv_text = space .
ENDIF .

READ TABLE out_tab WITH KEY = 'LV_TEXT'.
out_tab-value = lv_text.
CONDENSE out_tab-value.
MODIFY out_tab INDEX 1.

ENDFORM.
 
Serkan AKKAVAK
Bilgisayar Mühendisi
serkurumsal@yandex.com