Abap , Excelden kayıt okuma işlemi
TYPE-POOLS slis. DATA : BEGIN OF itab OCCURS 0, tarih TYPE string, adsoyad TYPE string, bolum TYPE string, sayi TYPE i. DATA : END OF itab. * Excel kayıtlarını programda tutacak internal tablonun tanımlanması DATA gt_excel_kayitlari TYPE TABLE OF alsmex_tabline. DATA gv_repid TYPE sy–repid. DATA gt_fieldcat TYPE slis_t_fieldcat_alv. FIELD-SYMBOLS <fs_excel_kayit> LIKE LINE OF gt_excel_kayitlari. * selection screen üzerinde son kullanıcının dosya adını *girecegi alanin tanimlanmasi. PARAMETERS pa_dosya TYPE c LENGTH 128 DEFAULT ‘C:\Users\TEKIN.PEKCAN\Desktop\D\TEST.XLSX’. *kullanici imleci ekranda pa_dosya alanına getirip F4 tuşuna * basınca atılacak olayın programlanması AT SELECTION-SCREEN ON VALUE-REQUEST FOR pa_dosya. * F4_FILENAME fınksiyon modülü çağrılarak dosya seçme * diyalog ekranının gösterilmesi. CALL FUNCTION ‘F4_FILENAME’ EXPORTING field_name = ‘PA_DOSYA’ IMPORTING file_name = pa_dosya. START-OF-SELECTION. gv_repid = sy–repid. * fonksiyon modülünü kullanarak excel dosyasındaki kayıtları * gt_excel_kayitlari itabına oku. CALL FUNCTION ‘ALSM_EXCEL_TO_INTERNAL_TABLE’ EXPORTING filename = pa_dosya i_begin_col = 1 ” başlanacak sütun...