пошел_погулять написал(а):
Была такая тема на форуме -
http://sapboard.ru/forum/viewtopic.php?t=14645&highlight=%E7%E0%E2%E8%F1%E8%EC%FB%E5+%EF%EE%EB%FFЕсть подобная проблема (селекционный экран), на одном поле выбираем какое-нибудь значение, а на другом по F4, чтоб были доступны только значения соответствующие выбранному выше....
Лови
БЛЕДНОЛИЦЫЙ ДРУГ:
Code:
*&--------------------------------------------------*
*& Report ZTEST_F4HELP *
*& *
*&--------------------------------------------------*
*& AUTOR : ROKO *
*& POSTED : 14/06/2007 *
*& MADE IN RUSSIA * *& *&---------------------------------------------------*
REPORT ztest_f4help .
PARAMETERS: p_vbeln TYPE vbak-vbeln,
p_posnr TYPE vbap-posnr.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_posnr.
DATA: BEGIN OF help_item OCCURS 0,
posnr TYPE vbap-posnr,
matnr TYPE vbap-matnr,
arktx TYPE vbap-arktx,
END OF help_item.
DATA: dynfields TYPE TABLE OF dynpread WITH HEADER LINE.
dynfields-fieldname = 'P_VBELN'.
APPEND dynfields.
CALL FUNCTION 'DYNP_VALUES_READ'
EXPORTING
dyname = sy-cprog
dynumb = sy-dynnr
translate_to_upper = 'X'
TABLES
dynpfields = dynfields
EXCEPTIONS
invalid_abapworkarea = 1
invalid_dynprofield = 2
invalid_dynproname = 3
invalid_dynpronummer = 4
invalid_request = 5
no_fielddescription = 6
invalid_parameter = 7
undefind_error = 8
double_conversion = 9
stepl_not_found = 10
OTHERS = 11.
READ TABLE dynfields WITH KEY fieldname = 'P_VBELN'.
p_vbeln = dynfields-fieldvalue.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
input = p_vbeln
IMPORTING
output = p_vbeln.
SELECT posnr matnr arktx INTO TABLE help_item
FROM vbap
WHERE vbeln = p_vbeln.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield = 'POSNR'
dynprofield = 'P_POSNR'
dynpprog = sy-cprog
dynpnr = sy-dynnr
value_org = 'S'
TABLES
value_tab = help_item.
Вход
Регистрация
FAQ пользователя
Поиск
