TYPE-POOLS: SLIS.
PARAMETERS : p_vari TYPE slis_vari.
ALV'ye göndereceğimiz parametreyi tanımlayalım. (Ekrandan seçtiğimiz varianti ALV'de kullanabilmek için)
DATA:
IS_VARIANT LIKE DISVARIANT.
Daha sonra raporumuza ait variantları getirmesi için bir fonksiyon çağırmamız gerekiyor. Öncelikle seçim ekranında ilgili parametremiz için F4 tuşuna basılınca çalışacak formları yaratalım.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_VARI.
PERFORM ALV_VARIANT_F4 CHANGING P_VARI.
START-OF-SELECTION.
.
.
.
END-OF-SELECTION.
Formu yazalım.
FORM ALV_VARIANT_F4 CHANGING PA_VARI.
DATA: RS_VARIANT LIKE DISVARIANT.
RS_VARIANT-REPORT = sy-repid.
RS_VARIANT-USERNAME = SY-UNAME.
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
EXPORTING
IS_VARIANT = RS_VARIANT
I_SAVE = 'A'
IMPORTING
ES_VARIANT = RS_VARIANT
EXCEPTIONS
OTHERS = 1.
IF SY-SUBRC = 0.
PA_VARI = RS_VARIANT-VARIANT.
ENDIF.
ENDFORM. "alv_variant_f4
İşlemler bittikten sonra, ALV'yi çağıran formumuzun içinde
is_variant-variant = p_vari.
yazmamız gerekecektir. Bu , ekrandan seçtiğimiz variantı, is_variant değişkenine atacaktır.
ALV'yi çağıran fonksiyonumuzda diğer parametlerin yanında IS_VARIANT değişkenini de gönderdiğimiz zaman, ekrandan seçilen variantın direk ALV'ye atandığını ve raporun ona göre geldiğini göreceğiz :=).
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
.
.
.
IS_VARIANT = IS_VARIANT
TABLES
.
.
.
*******************************************************
Konu ile ilgili detaylı içerik ve örnek ABAP Kodları,daha sonra eklenecektir.
SAP ve ABAP ile ilgili tüm sorularınızı
serkurumsal@yandex.com
E-Mail adresi ile bize ulaşarak sorabilirsiniz.
Serkan AKKAVAK
Bilgisayar Mühendisi
0 Comments