Function Module - E_T_DATA does not return data

Question

Hi
I am trying to create a fuction module Generic extraction, the code belwo dosen't return any data.
when i debug YBW_MAT_STAT does have but after E_T_DATA = YBW_MAT_STAT it dose not return any data
can you help?
Ramesh
FUNCTION YBW_FM_ACTIVE_MATERIAL.
""Local Interface:
*"  IMPORTING
*"     VALUE(I_REQUNR) TYPE  SRSC_S_IF_SIMPLE-REQUNR
*"     VALUE(I_DSOURCE) TYPE  SRSC_S_IF_SIMPLE-DSOURCE OPTIONAL
*"     VALUE(I_MAXSIZE) TYPE  SRSC_S_IF_SIMPLE-MAXSIZE OPTIONAL
*"     VALUE(I_INITFLAG) TYPE  SRSC_S_IF_SIMPLE-INITFLAG OPTIONAL
*"     VALUE(I_READ_ONLY) TYPE  SRSC_S_IF_SIMPLE-READONLY OPTIONAL
*"     VALUE(I_REMOTE_CALL) TYPE  SBIWA_FLAG DEFAULT SBIWA_C_FLAG_OFF
*"  TABLES
*"      I_T_SELECT TYPE  SRSC_S_IF_SIMPLE-T_SELECT OPTIONAL
*"      I_T_FIELDS TYPE  SRSC_S_IF_SIMPLE-T_FIELDS OPTIONAL
*"      E_T_DATA STRUCTURE  YBW_MAT_STAT OPTIONAL
*"  EXCEPTIONS
*"      NO_MORE_DATA
*"      ERROR_PASSED_TO_MESS_HANDLER
Example: DataSource for table SFLIGHT
  TABLES: YBW_MAT_STAT.
Auxiliary Selection criteria structure
DATA: L_S_SELECT TYPE SRSC_S_SELECT.
   DATA : YBW_MAT_STAT type YBW_MAT_STAT occurs 0 with header line.
Maximum number of lines for DB table
  STATICS: S_S_IF TYPE SRSC_S_IF_SIMPLE,
counter
          S_COUNTER_DATAPAKID LIKE SY-TABIX,
cursor
          S_CURSOR TYPE CURSOR.
Select ranges
Comment copy code
RANGES: L_R_CARRID  FOR SFLIGHT-CARRID,
         L_R_CONNID  FOR SFLIGHT-CONNID.
DATA: begin of t_marc occurs 0,
ZMATNR type MATNR,
ZWERKS type WERKS,
end of t_marc.
DATA: begin of t_ytmd_mat_ref occurs 0,
ZMATNR type MATNR,
ZYNA_MATNR_ST type YNA_MATNR_ST,
ZYEAME_MATNR_ST type YEAME_MATNR_ST,
ZYFIN_MATNR_ST type YFIN_MATNR_ST,
end of t_ytmd_mat_ref.
Initialization mode (first call by SAPI) or data transfer mode
(following calls) ?
  IF I_INITFLAG = SBIWA_C_FLAG_ON.
Initialization: check input parameters
                buffer input parameters
                prepare data selection
Check DataSource validity
    CASE I_DSOURCE.
      WHEN 'ZAINV_MAT_STATUS'.
      WHEN OTHERS.
        IF 1 = 2. MESSAGE E009(R3). ENDIF.
this is a typical log call. Please write every error message like this
        LOG_WRITE 'E'                  "message type
                  'R3'                 "message class
                  '009'                "message number
                  I_DSOURCE   "message variable 1
                  ' '.                 "message variable 2
        RAISE ERROR_PASSED_TO_MESS_HANDLER.
    ENDCASE.
    APPEND LINES OF I_T_SELECT TO S_S_IF-T_SELECT.
Fill parameter buffer for data extraction calls
    S_S_IF-REQUNR    = I_REQUNR.
    S_S_IF-DSOURCE = I_DSOURCE.
    S_S_IF-MAXSIZE   = I_MAXSIZE.
Fill field list table for an optimized select statement
(in case that there is no 1:1 relation between InfoSource fields
and database table fields this may be far from beeing trivial)
    APPEND LINES OF I_T_FIELDS TO S_S_IF-T_FIELDS.
  ELSE.                 "Initialization mode or data extraction ?
Data transfer: First Call      OPEN CURSOR + FETCH
               Following Calls FETCH only
First data package -> OPEN CURSOR
    IF S_COUNTER_DATAPAKID = 0.
Fill range tables BW will only pass down simple selection criteria
of the type SIGN = 'I' and OPTION = 'EQ' or OPTION = 'BT'.
Determine number of database records to be read per FETCH statement
from input parameter I_MAXSIZE. If there is a one to one relation
between DataSource table lines and database entries, this is trivial.
In other cases, it may be impossible and some estimated value has to
be determined.
      SELECT MATNR WERKS FROM MARC into table t_marc where MATNR BETWEEN '4233940M1' and '4233950M1'.
      loop at t_marc.
        SELECT MATNR YNA_MATNR_ST YEAME_MATNR_ST FROM YTMD_MAT_REF into table t_ytmd_mat_ref where MATNR = t_marc-zmatnr.
          loop at t_ytmd_mat_ref.
            if t_marc-zwerks = 'GB71' AND t_ytmd_mat_ref-ZYEAME_MATNR_ST = 'A'.
              read table t_ytmd_mat_ref with key zmatnr = t_marc-zmatnr.
              YBW_MAT_STAT-matnr = t_marc-zmatnr.
              YBW_MAT_STAT-plant = t_marc-zwerks.
            append YBW_MAT_STAT.
            clear YBW_MAT_STAT.
            endif.
           endloop.
      endloop.
    ENDIF.                             "First data package ?
     clear E_T_DATA.
     refresh E_T_DATA.
     E_T_DATA = YBW_MAT_STAT.
    S_COUNTER_DATAPAKID = S_COUNTER_DATAPAKID + 1.
  ENDIF.              "Initialization mode or data extraction ?
ENDFUNCTION.

Answer 1

Hi
I have a question,
With the above code i have all my records (450000+) in a single data package.
how do i break this in multiple data packages
regards
Ramesh