*** Translate ***
gs_text type yilsdzz15,
REP_TIT CHAR100 CHAR 100 0 Character 100
PAGE_NO CHAR15 CHAR 15 0 Char 15
PRINT_DATE CHAR15 CHAR 15 0 Char 15
PHONE CHAR15 CHAR 15 0 Char 15
ADDRESS CHAR40 CHAR 40 0 Character field of length 40
COMP_NAME CHAR20 CHAR 20 0 Char 20
COMPANY_CODE CHAR20 CHAR 20 0 Char 20
INV_LIST_NO CHAR20 CHAR 20 0 Char 20
INV_DATE CHAR15 CHAR 15 0 Char 15
PAYER_NAME CHAR15 CHAR 15 0 Char 15
PAYER_NO CHAR15 CHAR 15 0 Char 15
CUST_NO CHAR15 CHAR 15 0 Char 15
STORE_NO CHAR15 CHAR 15 0 Char 15
DATE CHAR10 CHAR 10 0 Character Field Length = 10
INVOICE CHAR15 CHAR 15 0 Char 15
DOC_TYPE CHAR10 CHAR 10 0 Character Field Length = 10
BUL CHAR10 CHAR 10 0 Character Field Length = 10
NET_VAT CHAR15 CHAR 15 0 Char 15
VAT CHAR15 CHAR 15 0 Char 15
NET_VALUE CHAR15 CHAR 15 0 Char 15
EO CHAR10 CHAR 10 0 Character Field Length = 10
BBT CHAR10 CHAR 10 0 Character Field Length = 10
***** Standart Text***
Oncelıkle SO10 'dan bir standart text yaratıyoruz . Daha sonra smartformdan addtext yapıyoruz tipini ise include text yapıyoruz .
Textlerı programda yaratıyoruz structure seklınde
gs_text type yilsdzz15,
REP_TIT CHAR100 CHAR 100 0 Character 100
PAGE_NO CHAR15 CHAR 15 0 Char 15
PRINT_DATE CHAR15 CHAR 15 0 Char 15
PHONE CHAR15 CHAR 15 0 Char 15
ADDRESS CHAR40 CHAR 40 0 Character field of length 40
COMP_NAME CHAR20 CHAR 20 0 Char 20
COMPANY_CODE CHAR20 CHAR 20 0 Char 20
INV_LIST_NO CHAR20 CHAR 20 0 Char 20
INV_DATE CHAR15 CHAR 15 0 Char 15
PAYER_NAME CHAR15 CHAR 15 0 Char 15
PAYER_NO CHAR15 CHAR 15 0 Char 15
CUST_NO CHAR15 CHAR 15 0 Char 15
STORE_NO CHAR15 CHAR 15 0 Char 15
DATE CHAR10 CHAR 10 0 Character Field Length = 10
INVOICE CHAR15 CHAR 15 0 Char 15
DOC_TYPE CHAR10 CHAR 10 0 Character Field Length = 10
BUL CHAR10 CHAR 10 0 Character Field Length = 10
NET_VAT CHAR15 CHAR 15 0 Char 15
VAT CHAR15 CHAR 15 0 Char 15
NET_VALUE CHAR15 CHAR 15 0 Char 15
EO CHAR10 CHAR 10 0 Character Field Length = 10
BBT CHAR10 CHAR 10 0 Character Field Length = 10
gs_text-rep_tit = text-001.
gs_text-page_no = text-002.
gs_text-print_date = text-003.
gs_text-phone = text-004.
gs_text-address = text-005.
gs_text-comp_name = text-006.
gs_text-company_code = text-007.
gs_text-inv_list_no = text-008.
gs_text-inv_date = text-009.
gs_text-payer_name = text-010.
gs_text-payer_no = text-011.
*--headers
gs_text-dt_document = text-029.
gs_text-cust_no = text-012.
gs_text-store_no = text-013.
gs_text-date = text-015.
gs_text-invoice = text-016.
gs_text-doc_type = text-017.
gs_text-bul = text-018.
gs_text-net_vat = text-019.
gs_text-vat = text-020.
gs_text-net_value = text-021.
gs_text-eo = text-022.
gs_text-bbt = text-023.
gs_text-ot = text-024.
gs_text-gsv = text-025.
gs_text-total_lines = text-026.
gs_text-total = text-027.
*--total
gs_text-total_c75 = text-028."c75
endform. "f_get_texts
smartformsda form interface IS_TEXT TYPE YILSDZZ15 tanımlıyorsun ve sonrada is_textteki
degerlerı kullanıyorsun.
****Reverse ters cevirme ****
form f_reverse_for_hebrew changing p_ustext.
data : v_temp_text(70) type c.
v_temp_text = p_ustext.
call function '/ATL/L_STRING_REVERSE'
exporting
string = v_temp_text
importing
rstring = v_temp_text
exceptions
too_small = 1
others = 2.
if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
else.
p_ustext = v_temp_text.
endif.
endform.
perform f_reverse_for_hebrew changing gs_header-comp_phone.
***** Standart Text***
Oncelıkle SO10 'dan bir standart text yaratıyoruz . Daha sonra smartformdan addtext yapıyoruz tipini ise include text yapıyoruz .
Text name olarak so10 'dan yarattıgımız textı verıyorum . Language olarak ıse alanı tıklayıp genısletıp sy-langu yapabılırız .
Sfsy-page of sy-formpages . Smartformda page olayı .