topic Re: F4 help in Application Development and Automation Discussions

F4 help

madan_ullasa — Thu, 15 Dec 2005 11:37:09 GMT

frnds,

below code does not work for parameter, but its working fine for select-options. y????

tables : mara , marc.

data : begin of itab occurs 0,

mat_no like mara-matnr,

end of itab.

data : matnr type matnr.

data t_return like ddshretval occurs 0 with header line.

select-options :
plant for marc-werks,
mat_no for mara-matnr.

parameters : plant like marc-werks,

mat_no like mara-matnr.

select matnr from marc into table itab where werks = plant.

at selection-screen on value-request for mat_no.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

DDIC_STRUCTURE = ''

retfield = ''

tables

value_tab = itab

FIELD_TAB =

RETURN_TAB = t_return

DYNPFLD_MAPPING =
EXCEPTIONS
PARAMETER_ERROR = 1
NO_VALUES_FOUND = 2
OTHERS = 3

IF sy-subrc <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

READ TABLE t_return INDEX 1.

mat_no = t_return-fieldval.

start-of-selection.

write:/ mat_no.

Re: F4 help

Former Member — Thu, 15 Dec 2005 11:41:42 GMT

for parameter give user-command 'ABC'.

parameters: p_matnr like mara-matnr user-command 'ABC'.

and try..

Re: F4 help

Former Member — Thu, 15 Dec 2005 12:00:51 GMT

either use user-command 'ABC'

declare like this

select-options: p_matnr for mara-matnr no-extension no intervals.

and chnage the select query by changing it in where clause ie. MATNR in p_MATNR.

PLZ REWARD POINTS IF IT HELPS!!

Thanks and Regards

Gunjan

Re: F4 help

Former Member — Thu, 15 Dec 2005 12:20:13 GMT

hi madan

i have made a some changes to ur code

hope this works fine just check out...

tables : mara , marc.

data : begin of itab occurs 0,

mat_no like mara-matnr,

end of itab.

data : matnr type matnr.

data t_return like ddshretval occurs 0 with header line.

select-options :
plant for marc-werks,
mat_no for mara-matnr.

parameters : plant like marc-werks,

mat_no like mara-matnr.

select matnr from marc into table itab where werks = plant.

at selection-screen on value-request for mat_no.

DATA: L_RETFIELD TYPE DFIES-FIELDNAME.

DATA: T_FIELD like DFIES occurs 0 with header line,

T_RETURN like DDSHRETVAL occurs 0 with header line.

*Populate table t_values with matnr values

Select matnr

Into table itab

From mara.

POPULATE THE FIELD TABLE...

MOVE: 'MARA' TO T_FIELD-TABNAME,

'MATNR' TO T_FIELD-FIELDNAME.

APPEND T_FIELD. CLEAR T_FIELD.

L_RETFIELD = 'MATNR'.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

RETFIELD = L_RETFIELD

TABLES

VALUE_TAB = itab

FIELD_TAB = t_Field

RETURN_TAB = t_return

EXCEPTIONS

PARAMETER_ERROR = 1

NO_VALUES_FOUND = 2

OTHERS = 3.

READ TABLE t_return INDEX 1.

mat_no = t_return-fieldval.

start-of-selection.

write:/ mat_no.

Regards

Hari