report zlmn_den_str_con.
data: lv_degisken0 type c length 50,
lv_degisken1 type c length 50,
lv_degisken2 type c length 50.
lv_degisken0 = 'bu1'.
lv_degisken1 = 'metin'.
lv_degisken2 = 'Değerler bu metin içerisinde kontrol edilecek.'.
IF lv_degisken1 CO lv_degisken2.
WRITE: 'CO: Koşul doğru.', 'Pozisyon', 30 sy-fdpos.
ELSE.
WRITE: 'CO: Koşul yanlış.', 30 sy-fdpos.
ENDIF.
ULINE.
if lv_degisken1 cn lv_degisken2 and lv_degisken0 cn lv_degisken2.
write: / 'CN: Koşul doğru.', 'Pozisyon', 30 sy-fdpos.
else.
write: / 'CN: Koşul yanlış.', 30 sy-fdpos.
endif.
skip.
lv_degisken1 = 'Değerler bu metin içerisinde kontrol edilecek.'.
lv_degisken2 = 'bmik'.
IF lv_degisken1 CA lv_degisken2.
WRITE: / 'CA: Koşul doğru.', 'Pozisyon', 30 sy-fdpos.
ELSE.
WRITE: / 'CA: Koşul yanlış.', 30 sy-fdpos.
ENDIF.
IF lv_degisken1 NA lv_degisken2.
WRITE: / 'NA: Koşul doğru.', 'Pozisyon', 30 sy-fdpos.
ELSE.
WRITE: / 'NA: Koşul yanlış.', 30 sy-fdpos.
ENDIF.
SKIP.
lv_degisken1 = 'Değerler bu metin içerisinde kontrol edilecek.'.
lv_degisken2 = 'Edi'.
IF lv_degisken1 CS lv_degisken2.
WRITE: / 'CS: Koşul doğru.', 'Pozisyon', 30 sy-fdpos.
ELSE.
WRITE: / 'CS: Koşul yanlış.', 30 sy-fdpos.
ENDIF.
IF lv_degisken1 NS lv_degisken2.
WRITE: / 'NS: Koşul doğru.', 'Pozisyon', 30 sy-fdpos.
ELSE.
WRITE: / 'NS: Koşul yanlış.', 30 sy-fdpos.
ENDIF.
lv_degisken1 = 'Değerler bu metin içerisinde kontrol edilecek.'.
lv_degisken2 = 'ONTR'.
IF lv_degisken1 CS lv_degisken2.
WRITE: / 'CS: Koşul doğru.', 'Pozisyon', 30 sy-fdpos.
ELSE.
WRITE: / 'CS: Koşul yanlış.', 30 sy-fdpos.
ENDIF.
IF lv_degisken1 NS lv_degisken2.
WRITE: / 'NS: Koşul doğru.', 'Pozisyon', 30 sy-fdpos.
ELSE.
WRITE: / 'NS: Koşul yanlış.', 30 sy-fdpos.
ENDIF.
SKIP.
lv_degisken2 = '*EK.'.
IF lv_degisken1 CP lv_degisken2.
WRITE: / 'CP: Koşul doğru.', 'Pozisyon', 30 sy-fdpos.
ELSE.
WRITE: / 'CP: Koşul yanlış.', 30 sy-fdpos.
ENDIF.
IF lv_degisken1 NP lv_degisken2.
WRITE: / 'NP: Koşul doğru.', 'Pozisyon', 30 sy-fdpos.
ELSE.
WRITE: / 'NP: Koşul yanlış.', 30 sy-fdpos.
ENDIF.
***********************************************************
Serkan AKKAVAK
Bilgisayar Mühendisi
serkurumsal@yandex.com
SAP ve ABAP konusunda tüm sorun ve sorularınızı gönderebilirsiniz.
Social Plugin