ABAP 물타기/Report
Possible Entry
물타기
2010. 10. 26. 16:07
- Create Date : 2010-10-26
- Change Date : 2010-10-26
잡담 -ㅂ-;
스키샀다! 노르디카 스핏파이어 10/11 162~ ㅋㅋ
Possible Entry를 설정하는 방법은 여러가지가 있다.
요기에 정리해봤당~
1. MATCHCODE OBJECT
- SEARCH HELP를 직접 적용해줌.
SELECT-OPTIONS : S_ANLN1 FOR ZMMT0110-ANLN1
MATCHCODE OBJECT ZMMH0080 .
MATCHCODE OBJECT ZMMH0080 .
2. F4IF_INT_TABLE_VALUE_REQUEST
at selection-screen on value-request for SO_wwz04-LOW.
perform f4_wwz04_help USING 'SO_WWZ04-LOW'.
at selection-screen on value-request for SO_wwz04-HIGH.
perform f4_wwz04_help USING 'SO_WWZ04-HIGH'.
form F4_WWZ04_HELP using PV_FIELDNAME TYPE DYNFNAM..
DATA: BEGIN OF LT_HELP OCCURS 0,
KEY TYPE t25a3-wwz04,
BEZEK TYPE t25a3-BEZEK,
END OF LT_HELP.
select wwz04 as key
BEZEK
into CORRESPONDING FIELDS OF TABLE lt_help
from t25a3.
SORT LT_HELP BY KEY.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
RETFIELD = 'KEY'
DYNPPROG = SY-CPROG
DYNPNR = SY-DYNNR
DYNPROFIELD = Pv_FIELDNAME
* WINDOW_TITLE = 'XXXX'
VALUE_ORG = 'S'
TABLES
VALUE_TAB = LT_HELP
EXCEPTIONS
PARAMETER_ERROR = 1
NO_VALUES_FOUND = 2
OTHERS = 3.
endform.
perform f4_wwz04_help USING 'SO_WWZ04-LOW'.
at selection-screen on value-request for SO_wwz04-HIGH.
perform f4_wwz04_help USING 'SO_WWZ04-HIGH'.
form F4_WWZ04_HELP using PV_FIELDNAME TYPE DYNFNAM..
DATA: BEGIN OF LT_HELP OCCURS 0,
KEY TYPE t25a3-wwz04,
BEZEK TYPE t25a3-BEZEK,
END OF LT_HELP.
select wwz04 as key
BEZEK
into CORRESPONDING FIELDS OF TABLE lt_help
from t25a3.
SORT LT_HELP BY KEY.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
RETFIELD = 'KEY'
DYNPPROG = SY-CPROG
DYNPNR = SY-DYNNR
DYNPROFIELD = Pv_FIELDNAME
* WINDOW_TITLE = 'XXXX'
VALUE_ORG = 'S'
TABLES
VALUE_TAB = LT_HELP
EXCEPTIONS
PARAMETER_ERROR = 1
NO_VALUES_FOUND = 2
OTHERS = 3.
endform.