*--create a z table with fields pernr like pa0002-pernr
* vorna like pa0002-vorna
* nachn like pa0002-nachn
* and create entries for the table
report message-id zmsf.
tables:zzz000000 ,DFIES.
DATA: BEGIN OF itab OCCURS 0,
pernr like pa0002-pernr,
vorna like pa0002-vorna,
nachn like pa0002-nachn,
END OF itab.
DATA : LT_FIELDS TYPE TABLE OF DFIES,
LS_FIELD TYPE DFIES.
PARAMETER: pernr LIKE pa0002-pernr .
AT SELECTION-SCREEN ON VALUE-REQUEST FOR pernr.
select pernr
vorna
nachn
from zzz000000
into table itab .
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
RETFIELD = 'PERNR'
DYNPPROG = sy-cprog
DYNPNR = sy-dynnr
DYNPROFIELD = 'PERNR'
VALUE_ORG = 'S'
TABLES
VALUE_TAB = itab
FIELD_TAB = LT_FIELDS .
start-of-selection.
select pernr
vorna
nachn
from zzz000000
into table itab
where pernr = pernr.
loop at itab.
write:/ itab-pernr,
itab-vorna,
itab-nachn.
endloop.
ALSO READ:
- F4 (Value On Request) For A Field Of Ztable On Selection Screen.
- F4 (Value On Request) For Month On Selection Screen.
- F4 (Value On Request) For Month On Selection Screen.
- ListBox From User Values In Selection Screen.
- F4 Help (Value On Request) For Month And Year.
No comments:
Post a Comment