Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 9052

Re: How to use - F4IF_INT_TABLE_VALUE_REQUEST

$
0
0

Hi,

could you try this program, may it help you,

 

REPORT  z_ibo_f4_3.
PARAMETERS:
         p_carrid  
TYPE spfli-carrid,
         p_cname   
TYPE scarr-carrname,
         p_url     
TYPE scarr-url.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_carrid.

 
TYPES: t_return_tab  TYPE ddshretval.

 
TYPES: BEGIN OF ty_line,
           carrid  
TYPE spfli-carrid,
           carrname
TYPE scarr-carrname,

        
END OF ty_line.

 
DATA: it_list TYPE STANDARD TABLE OF ty_line,
        w_return_tab
TYPE t_return_tab,
        i_return_tab
TYPE  TABLE OF ddshretval,
        v_repid
TYPE sy-repid,
        v_dynnr
TYPE sy-dynnr.

 
DATA:
        it_map
TYPE STANDARD TABLE OF dselc,
        wa_map
TYPE dselc.

  v_repid
= sy-repid.
  v_dynnr
= sy-dynnr.

 
SELECT carrid carrname
             
FROM scarr
             
INTO CORRESPONDING FIELDS OF TABLE it_list.

 
IF sy-subrc = 0.

    wa_map
-fldname = 'F0001'. "Field for Position 1
    wa_map
-dyfldname = 'P_CARRID'.
   
APPEND wa_map TO it_map.

    wa_map
-fldname = 'F0002'. "Field for Position 2
    wa_map
-dyfldname = 'P_CNAME'.
   
APPEND wa_map TO it_map.

    wa_map
-fldname = 'F0003'. "Field for Position 2
    wa_map
-dyfldname = 'URL'.
   
APPEND wa_map TO it_map.

   
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
     
EXPORTING
        retfield              
= 'CARRID'
       dynpprog              
= v_repid
       dynpnr                
= v_dynnr
       dynprofield           
= 'P_CARRID'
       value_org             
= 'S'
     
TABLES
       value_tab             
= it_list
        RETURN_TAB           
= i_return_tab

       dynpfld_mapping       
= it_map
    
EXCEPTIONS
       parameter_error       
= 1
       no_values_found       
= 2
      
OTHERS                 = 3.
   
IF sy-subrc = 0.
*      READ TABLE it_map
   
ENDIF.

 
ENDIF.

Regards

Ebrahim




Viewing all articles
Browse latest Browse all 9052

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>