‎2008 Aug 28 7:07 AM
hi all,
i craeted a strcutre with name 'ZSSS'.
its in module pool programming:
in top include i declared a internal table name like
DATA: i_s type standard table of Zsss with initial size 10,
wa_s type zsss.
on screen 100 two fields i created. one is F and another one is mat.
and i written the query like bleow.
select matnr
zeifo
from mara
into corresponding fields into table i_s where zeifo = F.
data is fetching correctly.
but if i press f4 button on mat i need to diaply the values stored in i_s.
how to do? pls help me
but mat field attributes i declared zsss-matnr.
pls help me
‎2008 Aug 28 7:27 AM
Hi,
try like this.
in screen flow logic.
process on value-request.
field mara-matnr module mod1.in PAI.
module mod1 input.
data: dynpro_table like dynpread occurs 0 with header line,
values_tab type table of itab with header line.
dynpro_table-fieldname = 'MARA-ZEIFO'.
append dynpro_table.
clear dynpro_table.
call function 'DYNP_VALUES_READ'
exporting
dyname = sy-repid
dynumb = sy-dynnr
translate_to_upper = 'X'
tables
dynpfields = dynpro_table.
select matnr from mara into corresponding fields of table values_tab
where zeifo = dynpro_table-fieldvalue.
call function 'F4IF_INT_TABLE_VALUE_REQUEST'
exporting
retfield = 'MATNR'
dynpprog = sy-repid
dynpnr = sy-dynnr
dynprofield = 'MARA-MATNR'
value_org = 'S'
tables
value_tab = values_tab.
endmodule. " mod1 INPUTRegards,
Sathish Reddy.
‎2008 Aug 28 7:23 AM
REFRESH I_CUSNAME.
SELECT ZCUST_NAME INTO TABLE I_CUSNAME
FROM ZBANK_GUARANTEE.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
RETFIELD = 'ZBANK_GUARANTEE'
DYNPPROG = SY-REPID
DYNPNR = SY-DYNNR
DYNPROFIELD = 'D_CUSTOMER_NAME'
VALUE_ORG = 'S'
TABLES
VALUE_TAB = I_CUSNAME
RETURN_TAB = I_RETURN_NAM
EXCEPTIONS
PARAMETER_ERROR = 1
NO_VALUES_FOUND = 2
OTHERS = 3.
IF SY-SUBRC EQ 0.
D_CUSTOMER_NAME = I_RETURN_NAM-FIELDVAL.
REFRESH I_RETURN_NAM.
ENDIF.
‎2008 Aug 28 7:27 AM
Hi,
try like this.
in screen flow logic.
process on value-request.
field mara-matnr module mod1.in PAI.
module mod1 input.
data: dynpro_table like dynpread occurs 0 with header line,
values_tab type table of itab with header line.
dynpro_table-fieldname = 'MARA-ZEIFO'.
append dynpro_table.
clear dynpro_table.
call function 'DYNP_VALUES_READ'
exporting
dyname = sy-repid
dynumb = sy-dynnr
translate_to_upper = 'X'
tables
dynpfields = dynpro_table.
select matnr from mara into corresponding fields of table values_tab
where zeifo = dynpro_table-fieldvalue.
call function 'F4IF_INT_TABLE_VALUE_REQUEST'
exporting
retfield = 'MATNR'
dynpprog = sy-repid
dynpnr = sy-dynnr
dynprofield = 'MARA-MATNR'
value_org = 'S'
tables
value_tab = values_tab.
endmodule. " mod1 INPUTRegards,
Sathish Reddy.