ABAP/SAP

Sap Abap Egitimi – Case Komutu kullanimi

Merhaba arkada┼člar bu makalemde sizlere┬áSap Abap Egitimi – Case Komutu kullanimi konusundan bahsedece─čim. ├ľncelikle case di─čer programlama dillerinde oldu─ču gibi ABAP programala dilinde de ayn─▒ ┼čekilde kullan─▒l─▒r. CASE i├žerisine bir de─či┼čken verilir ve bu de─či┼čkenin de─čerine g├Âre WHEN ‘ ┬áile kontrol edilir. De─čer do─čru ise WHEN i├žerisindeki kodlar ├žal─▒┼č─▒r do─čru de─čil ise bir sonraki WHEN sat─▒r─▒na gider.

┼×imdi ABAP dilinde CASE kullanarak d├Ârt i┼člem yapan k├╝├ž├╝k bir programc─▒k yapaca─č─▒z. ├ľncelikle de─či┼čkenlerimizi tan─▒mlayarak i┼člemlere ba┼člayal─▒m. ( De─či┼čken tan─▒mlamay─▒ bilmiyorsan─▒z DE─×─░┼×KEN TANIMLAMA makaleme g├Âz atabilirsiniz.)

DATA  :   sayi1 TYPE i DEFAULT 10,
                     sayi2 TYPE i DEFAULT 20,
                     islem TYPE i DEFAULT 1.
                     sonuc TYPE i.

Yukar─▒da g├Ârd├╝─č├╝n├╝z gibi gerekli olan de─či┼čkenlerimizi tan─▒mlad─▒k. Bu arada i┼člem de─či┼čkeni ile i┼člem t├╝r├╝n├╝ se├žece─čiz. T├╝r├╝ne g├Âre de i┼člemi yapt─▒raca─č─▒z , toplama , ├ž─▒karma , ├žarpma , b├Âlme gibi.

CASE yazarak iki kere TAB tu┼čuna bas─▒yoruz ve abap dili bizim i├žin otomatik bir CASE yap─▒s─▒ olu┼čturuyor. ┼×imdi bu CASE yap─▒s─▒n─▒ iste─čimize g├Âre d├╝zenliyoruz.

CASE islem.
  WHEN 1.
    sonuc = sayi1 + sayi2.
┬á┬á┬á┬áWRITE:┬á‘Toplam┬á:┬á‘┬á,┬ásonuc.
  WHEN 2.
    IF sayi2 > sayi1.
┬á┬á┬á┬á┬á┬áWRITE:┬á‘┬á─░kinci┬ásay─▒┬ábirinci┬ásay─▒dan┬áb├╝y├╝k┬áolamaz.’.
      EXIT.
    ENDIF.
┬á┬á┬á┬ásonuc┬á=┬ásayi1┬á–┬ásayi2.
┬á┬á┬á┬áWRITE:┬á‘Fark┬á:┬á‘┬á,┬ásonuc.
  WHEN 3.
    sonuc = sayi1 * sayi2.
┬á┬á┬á┬áWRITE:┬á‘├çarp─▒m┬á:┬á‘┬á,┬ásonuc.
  WHEN 4.
    sonuc = sayi1 / sayi2.
┬á┬á┬á┬áWRITE:┬á‘B├Âl├╝m┬á:┬á‘┬á,┬ásonuc.
  WHEN OTHERS.
    NEW-LINE.
┬á┬á┬á┬áWRITE:┬á‘L├╝tfen┬áDo─čru┬ái┼člem┬át├╝r├╝┬áse├žiniz.’.
ENDCASE.

Yukar─▒daki kodda islem i CASE ┬áde s├╝rekli kontrol ettiriyoruz. ┬áislem 1 oldu─čunda toplama i┼člemi , 2 oldu─čunda ├ž─▒karma i┼člemi 3 oldu─čunda ├žarpma i┼člemi ve 4 oldu─čunda da b├Âlme i┼člemini yapt─▒r─▒yoruz. ─░┼člemi yapt─▒rd─▒ktan sonra hemen bir alt sat─▒rda i┼člemin sonucunu ekrana yazd─▒r─▒yoruz. Bir sonraki makalemde g├Âr├╝┼čmek ├╝zere.

Arkada┼člar yak─▒n zamanda UDEMY ├╝zerinde e─čitim seti yay─▒nlad─▒m. Burada abap ile ilgili b├╝t├╝n konular─▒ ele ald─▒m. Dilerseniz buraya t─▒klayarak sat─▒n alabilirsiniz.┬á