Category: Abap

Alv , standart rapor 0

Alv , standart rapor

*&———————————————————————* *& Report ZSTANDART *& *&———————————————————————* *& *& *&———————————————————————* REPORT ZSTANDART. TABLES : ztest. DATA: er_layout TYPE slis_layout_alv, er_fieldcat TYPE slis_t_fieldcat_alv, er_sp_group TYPE slis_t_sp_group_alv, e_save(1) TYPE c, e_variant LIKE disvariant, er_events TYPE slis_t_event, ex_fieldcat...

Abap , Web Client 0

Abap , Web Client

Aşağıdaki kodlar ile url request yaparak, bir web servise requet edilmiş ve dönen değer gösterilmiştir.   REPORT zvalidate_email. PARAMETERS: p_mail(100) LOWER CASE. ” E-Mail id to be verified DATA: http_client TYPE REF TO if_http_client...

Abap , kullanıcı adına göre bilgileri bulan fonksiyon 0

Abap , kullanıcı adına göre bilgileri bulan fonksiyon

call function ‘SUSR_USER_ADDRESS_READ’ exporting user_name                    = gv_pr_name *     READ_DB_DIRECTLY             = ‘ ‘ *     CACHE_RESULTS                = ‘X’ importing *     USER_ADDRESS                 = user_usr03                   = gs_usr03 *   EXCEPTIONS *     USER_ADDRESS_NOT_FOUND       = 1 *     OTHERS                       = 2 . if sy-subrc <> 0. * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO *         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4. endif.     kaynak : https://sapnotlarim.wordpress.com/

Abap , kullanıcı adından mail adresini almak 0

Abap , kullanıcı adından mail adresini almak

Merhaba mail gönderimlerinde işinize yarayabilecek bir fonksiyon.   data : lv_address type ad_smtpadr. call function ‘LWE_GET_EMAIL’ exporting username      = sy-uname importing email_address = lv_address. veya call function ‘EFG_GEN_GET_USER_EMAIL’ exporting i_uname           = lv_uname importing e_email_address   = lv_mailadres exceptions not_qualified     = 1 user_not_found    = 2 address_not_found = 3 others            = 4.

Abap , help view , (search help için view oluşturma) 0

Abap , help view , (search help için view oluşturma)

Merhaba search helpde çıkacak verileri bazı koşullar ile  getirmek isteyebilirsiz bunun için help viwer oluşturmanız gerekcektir.   Konu ile ilgili incelemeniz gereken bağlantı şöyle : http://www.saptechnical.com/Tutorials/ABAP/View/Help.htm  

Abap, yetki nesnesinin kod ile kullanımı 0

Abap, yetki nesnesinin kod ile kullanımı

Örnek olarak güncelleme için verilmiş bir yetki nesnesi ,   AUTHORITY-CHECK OBJECT ‘ZONERI_YTK’                 ID ‘ACTVT’ FIELD ’02’ “                 ID ‘ZONERI_YTK’ FIELD ’02’.   IF sy–subrc EQ 0.     LOOP AT SCREEN.       IF screen–name = ‘BTNDGS’.         screen–active = 0.       ENDIF.       MODIFY SCREEN.     ENDLOOP.   ENDIF.

Abap , parameter 0

Abap , parameter

Abap parametre kullanımı örnek ; Bu örnek parametre zorunlu giriş , search help ve , parametrede ki değeri hafızada tutma örneği içerir.   report  z_parametre_yaratma. selection-screen begin of screen 100. * OBLIGATORY zorunlu giriş * VISIBLE LENGTH 10 , 10 karakter uzunluğunda olabilir * MEMORY ID M_I hafızada tutma * MATCHCODE OBJECT A_KUNNR arama yardımı parameters: kid(29) type c DEFAULT sy–uname, ad_soyad(50) type c obligatory matchcode object a_kunnr, il(15) type c default ‘MALATYA’ memory id m_i visible length 10, d_tarih type d memory id m_d....

Abap , search helpten formları oto doldurma 0

Abap , search helpten formları oto doldurma

REPORT  ZRICH_002. parameters: p_bukrs type t001–bukrs, p_butxt type t001–butxt, p_ort01 type t001–ort01, p_land1 type t001–land1. data: dynfields type table of dynpread with header line. data: return type table of ddshretval with header line. at selection-screen on value-request for p_bukrs. call function ‘F4IF_FIELD_VALUE_REQUEST’ exporting tabname           = ‘T001’ fieldname         = ‘BUKRS’ dynpprog          = sy–cprog dynpnr            = sy–dynnr dynprofield       = ‘P_BUKRS’ tables return_tab        = return exceptions field_not_found   = 1 no_help_for_field = 2 inconsistent_help = 3 no_values_found   = 4 others            = 5. read table return with key fieldname = ‘P_BUKRS’. * Add it back to the dynpro. dynfields–fieldname = return–retfield. dynfields–fieldvalue =  return–fieldval. append dynfields. * Get the company code from db and add to dynpro data: xt001 type t001. clear xt001. select single * into xt001 from t001 where bukrs = return–fieldval....

Abap , domain değerlerini almak. 0

Abap , domain değerlerini almak.

data: idd07v type table of  dd07v with header line. call function ‘DD_DOMVALUES_GET’      exporting           domname        = ‘RFBSK’   “<– Domain Adı Buraya           text           = ‘X’           langu          = sy-langu      tables           dd07v_tab     ...