Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- *&---------------------------------------------------------------------*
- *& Report Z_GLOBALVERITURLERI
- *&
- *&---------------------------------------------------------------------*
- *&
- *&
- *&---------------------------------------------------------------------*
- REPORT Z_GLOBALVERITURLERI.
- TABLES :zdeneme.
- TYPES: BEGIN OF kisi_bilgileri,
- mandt type mandt,
- ogrno TYPE char8,
- ad TYPE char20,
- soyad TYPE char20,
- tarih TYPE d,
- END OF kisi_bilgileri,
- bilgiler TYPE STANDARD TABLE OF kisi_bilgileri.
- DATA: kisi_listesi TYPE bilgiler ,
- kisi TYPE kisi_bilgileri.
- kisi-mandt = sy-MANDT.
- kisi-ad = 'Elif Damla2'.
- kisi-soyad = 'KÜÇÜK2'.
- kisi-tarih = '199505212'.
- kisi-OGRNO = '4'.
- APPEND kisi to kisi_listesi.
- kisi-mandt = sy-MANDT.
- kisi-ad = 'Yiğit Arda2'.
- kisi-soyad = 'KÜÇÜK2'.
- kisi-tarih = '200507162'.
- kisi-OGRNO = '5'.
- APPEND kisi to kisi_listesi.
- kisi-mandt = sy-MANDT.
- kisi-ad = 'Oya2'.
- kisi-soyad = 'KÜÇÜK2'.
- kisi-tarih = '197106262'.
- kisi-OGRNO = '6'.
- APPEND kisi to kisi_listesi.
- "modify zdeneme FROM TABLE kisi_listesi.
- insert zdeneme from TABLE kisi_listesi.
- IF sy-subrc eq 0.
- MESSAGE 'tebrikler oldu !' type 'I'.
- ENDIF.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement