Advertisement
SocialkingPL

Adam poprawa

Jun 13th, 2019
865
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ABAP 1.05 KB | None | 0 0
  1. ------------------ ZADANIE_1 ------------------
  2. TYPES: BEGIN OF pacjent,
  3.     pesel TYPE N,
  4.     imie TYPE C,
  5.     nazwisko TYPE C,
  6.     wiek TYPE C,
  7.     data_wizyty TYPE D,
  8. END OF pacjent.
  9.  
  10. pesel = 123123121.
  11. imie = 'Maciek'.
  12. nazwisko = 'Lech'.
  13. wiek = 21.
  14. data_wizyty = 21022019.
  15.  
  16. ------------------ ZADANIE_2 ------------------
  17. DATA:
  18.     imie TYPES C VALUE 'Maciek',
  19.     nazwisko TYPE C VALUE 'Lech',
  20.     wynik TYPE C.
  21.  
  22. CONCATENATE imie nazwiskio INTO wynik SEPARATED BY ' '.
  23.  
  24. ------------------ ZADANIE_3 ------------------
  25. DATA:
  26.     wiek TYPES N VALUE 21,
  27.     ile_prawo_jazdy TYPE N.
  28.  
  29. ile_prawo_jazdy = (sy-datum+0(4) - wiek).
  30.  
  31. IF ile_prawo_jazdy == 1.
  32.     WRITE:/ 'Posiadasz: 10% Zniżek'.
  33. ELSEIF ile_prawo_jazdy == 1.
  34.     WRITE:/ 'Posiadasz: 20% Zniżek'.
  35. ELSEIF ile_prawo_jazdy == 1.
  36.     WRITE:/ 'Posiadasz: 30% Zniżek'.
  37. ELSEIF ile_prawo_jazdy == 1.
  38.     WRITE:/ 'Posiadasz: 40% Zniżek'.
  39. ELSEIF ile_prawo_jazdy == 1.
  40.     WRITE:/ 'Posiadasz: 50% Zniżek'.
  41. ELSEIF ile_prawo_jazdy == 1.
  42.     WRITE:/ 'Posiadasz: 60% Zniżek'.
  43. ENDIF.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement