topic Re: F4 HELP FOR SELECT OPTION in Application Development and Automation Discussions

F4 HELP FOR SELECT OPTION

Former Member — Fri, 23 Nov 2007 06:03:18 GMT

Hai,

How to crete f4 help for a Select optation(GL Account) field which has to display z Table values in program..

Expecting in steps.......

Regards,

Laxmi

Re: F4 HELP FOR SELECT OPTION

former_member386202 — Fri, 23 Nov 2007 06:06:10 GMT

Hi,

Use FM "F4if_FIELD_VALUE_REQUEST".

At selection-screen on value request of glaccount.

call function F4if_FIELD_VALUE_REQUEST

Regards,

Prashant

Message was edited by:

Prashant Patil

Re: F4 HELP FOR SELECT OPTION

Former Member — Fri, 23 Nov 2007 06:08:09 GMT

like this


TYPES : BEGIN OF ST_OBJID_SH,
         OTYPE TYPE HRP1000-OTYPE,
         OBJID TYPE HRP1000-OBJID,
        END OF ST_OBJID_SH.

DATA : IT_OBJID_SH TYPE STANDARD TABLE OF ST_OBJID_SH.
DATA : WA_OBJID_SH TYPE ST_OBJID_SH.

************SELECTION SCREEN DESIGN************************

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.

*SELECT-OPTIONS : S_OTYPE FOR HRP1001-OTYPE NO INTERVALS .
SELECT-OPTIONS : S_OBJID FOR HRP1001-OBJID NO INTERVALS .
SELECT-OPTIONS : DATE FOR SY-DATUM NO-EXTENSION OBLIGATORY.

SELECTION-SCREEN END OF BLOCK B1.

***********END OF SELECTION SCREEN DESIGN******************

AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_OBJID-LOW.

*  IF S_OBJID IS NOT INITIAL.

    SELECT OTYPE OBJID FROM HRP1000
                 INTO TABLE IT_OBJID_SH
                 WHERE OTYPE = 'D'.

 IF SY-SUBRC EQ 0.

* SEARCH HELP FOR QUALIFICATION.

    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
      EXPORTING
*              DDIC_STRUCTURE         = ' '
        RETFIELD               =  'OBJID'
*              PVALKEY                = ' '
       DYNPPROG               = SY-REPID
       DYNPNR                 = SY-DYNNR
       DYNPROFIELD            = 'S_OBJID'
*              STEPL                  = 0
*              WINDOW_TITLE           =
*              VALUE                  = ' '
       VALUE_ORG              = 'S'
*              MULTIPLE_CHOICE        = ' '
*              DISPLAY                = ' '
*              CALLBACK_PROGRAM       = ' '
*              CALLBACK_FORM          = ' '
*              MARK_TAB               =
*            IMPORTING
*              USER_RESET             =
      TABLES
        VALUE_TAB              =  IT_OBJID_SH
*              FIELD_TAB              =
*              RETURN_TAB             = RETURN_TAB
*              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.
  ENDIF.

              .

<b>Reward if usefull</b>

Re: F4 HELP FOR SELECT OPTION

Former Member — Fri, 23 Nov 2007 06:08:20 GMT

Check the following code to get the F4 help in select options for G/L Account

AT SELECTION-SCREEN ON VALUE-REQUEST FOR HKONT-LOW.

SELECT KSTAR KTEXT INTO TABLE IT_HKONT FROM CSKU WHERE SPRAS EQ 'EN'.

SORT IT_HKONT BY KSTAR.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

RETFIELD = 'HKONT'

VALUE_ORG = 'S'

TABLES

VALUE_TAB = IT_HKONT

RETURN_TAB = IT_RETURN.

IF SY-SUBRC = 0.

READ TABLE IT_RETURN INDEX 1.

MOVE IT_RETURN-FIELDVAL TO HKONT-LOW.

ENDIF.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR HKONT-HIGH.

SELECT KSTAR KTEXT INTO TABLE IT_HKONT FROM CSKU WHERE SPRAS EQ 'EN'.

SORT IT_HKONT BY KSTAR.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

RETFIELD = 'HKONT'

VALUE_ORG = 'S'

TABLES

VALUE_TAB = IT_HKONT

RETURN_TAB = IT_RETURN.

IF SY-SUBRC = 0.

READ TABLE IT_RETURN INDEX 1.

MOVE IT_RETURN-FIELDVAL TO HKONT-HIGH.

ENDIF.

Rewards if useful.

Re: F4 HELP FOR SELECT OPTION

Former Member — Fri, 23 Nov 2007 06:08:25 GMT

parameters gi_para type gl_type.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_MATNR.

SELECT MATNR

FROM MARA

INTO TABLE ITAB

UP TO 10 ROWS.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

RETFIELD = 'MATERIAL NUMBER'

DYNPPROG = SY-REPID

DYNPNR = SY-DYNNR

DYNPROFIELD = 'P_MATNR'

VALUE_ORG = 'S'

TABLES

VALUE_TAB = ITAB

EXCEPTIONS

PARAMETER_ERROR = 1

NO_VALUES_FOUND = 2

OTHERS = 3.

Re: F4 HELP FOR SELECT OPTION

Former Member — Fri, 23 Nov 2007 06:10:32 GMT

Hi Laxmi,

Try this..

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_account.

PERFORM get_account.

form get_account.

FORM get_account .

SELECT facc

FROM <table>

INTO TABLE t_acc

WHERE <>.

CALL FUNCTION 'POPUP_WITH_TABLE_DISPLAY'

EXPORTING

endpos_col = 75

endpos_row = 20

startpos_col = 30

startpos_row = 05

titletext = 'ACCOUNT'

IMPORTING

choise = w_lineno

TABLES

valuetab = t_ACCOUNT

EXCEPTIONS

break_off = 1

OTHERS = 2.

IF sy-subrc EQ 0 .

READ TABLE t_acc INDEX w_lineno.

IF sy-subrc EQ 0.

s_account-low = t_acc-facc.

ENDIF .

CLEAR t_acc .

REFRESH t_acc.

ENDIF .

ENDFORM .

Regards,

Kaveri

Re: F4 HELP FOR SELECT OPTION

Former Member — Fri, 23 Nov 2007 06:11:46 GMT

Hi,

Create search help for ur table in the se11

and assign that search help in the program.

select-options:

s_help type domain match-code object "seach help name'.

reward points if it helps

Re: F4 HELP FOR SELECT OPTION

Former Member — Fri, 23 Nov 2007 07:28:25 GMT

Hi,

field - select option

at selection screen on value-request for field.

use function module popup_with_table.

pass ur internal table in this FM.

CALL FUNCTION 'POPUP_WITH_TABLE'

EXPORTING

endpos_col = 50

endpos_row = sy-srows

startpos_col = 10

startpos_row = 10

titletext = 'record'

IMPORTING

CHOICE = field

tables

valuetab = itab

EXCEPTIONS

BREAK_OFF = 1

OTHERS = 2

IF sy-subrc <> 0.

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

ENDIF.

Re: F4 HELP FOR SELECT OPTION

Former Member — Fri, 23 Nov 2007 08:09:00 GMT

hi,

<b>problem solved</b>

thanks for posting answers

regards

laxmi