Yeni bir ekran yapmadan SAP’nin standart popup ekranları gibi değer alabileceğimiz bir popup ekranını kullanabiliriz.

lt_fields-tabname = ‘LIKP’ .
lt_fields-fieldname = ‘ZMATBU’ .
concatenate ‘Matbu no:’ ” into lt_fields-fieldtext.
lt_fields-field_obl = ‘X’.
*    lt_fields-value = lv_matbu.
concatenate ‘Teslimatlar için matbu giriniz’ ”
into lv_title separated by space.
append lt_fields .

do.

call function ‘POPUP_GET_VALUES’
exporting
popup_title     = lv_title
importing
returncode      = lv_returncode
tables
fields          = lt_fields
exceptions
error_in_fields = 1
others          = 2.
lv_matbu = lt_fields-value .
if lv_matbu is not initial.
exit.
else.
message i025(zsd).
endif.
enddo.

Serkan AKKAVAK
Bilgisayar Mühendisi
serkurumsal@yandex.com