Function Module in a Generic Function Module Extractor

Question

I want to use a generic function module (ZFM_CONNECTION_DETAIL) in a Generic Function Module based Extractor.
After Creating, I have checked it in RSA3... Data is showing properly on the Extractor Check.
And replicated on BW side, after triggering the extractor using infopackageu2026 only one record is coming on the target side (BW).
And one job is running endless on the source system.
Generic extractor on the normal code is working properly on both sides.
But problem occurs while I was using Function Module in the Generic function Module extractor.
Waiting for a Reply with solution...........
Hi Siegfried Szameitat,
I have searched a lot to find out the solution of my Question (Problem). But there is no solution for the problem I have.
Please let me to find out a proper solution of my issue....
Thanks

Answer 1

FUNCTION zcrm_questionnaire.
Its a full Load...
Codes are as followed..........
  DATA:lv_times     TYPE i.
  DATA:lv_datapakid TYPE numc4.
  CLEAR:lv_datapakid,lv_times .
  STATICS: s_s_if TYPE srsc_s_if_simple,
           sd_no_more_data  TYPE flag.
  DATA: l_s_select TYPE srsc_s_select.
  DATA :  s_counter_datapakid LIKE sy-tabix,
          s_cursor TYPE cursor.
  RANGES :  date  FOR  zresult_lt-date.
  DATA: lv_count TYPE i VALUE 1.
  IF i_initflag = sbiwa_c_flag_on.
Initialization: check input parameters
                buffer input parameters
                prepare data selection
Check InfoSource validity
    CASE i_dsource.
      WHEN 'ZCRM_QUESTIONNAIRE'.
      WHEN OTHERS.
        IF 1 = 2. MESSAGE e009(r3). ENDIF.
        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.
    s_s_if-requnr    = i_requnr.
    s_s_if-dsource   = i_dsource.
    s_s_if-maxsize   = i_maxsize.
    APPEND LINES OF i_t_fields TO s_s_if-t_fields.
  ELSE.                 "Initialization mode or data extraction
    IF NOT sd_no_more_data IS INITIAL.
      RAISE no_more_data.
    ENDIF.
    LOOP AT s_s_if-t_select INTO l_s_select .
      MOVE-CORRESPONDING l_s_select TO date.
    ENDLOOP.
    DATA : v_questionire  TYPE  crm_svy_db_sid.
    DATA : itab_questionire TYPE zsurveyid.
    DATA : e_tt_data_get TYPE  zresult_lt OCCURS 10.
    v_questionire = 'CALL CENTER'.
    APPEND v_questionire TO itab_questionire.
    v_questionire = 'METER INSTALLATION TEAM'.
    APPEND v_questionire TO itab_questionire.
    v_questionire = 'METER READING & BILLING'.
    APPEND v_questionire TO itab_questionire.
    v_questionire = 'NO SUPPLY'.
    APPEND v_questionire TO itab_questionire.
    v_questionire = 'CASH COLLECTION CENTER'.
    APPEND v_questionire TO itab_questionire.
    v_questionire = 'STREET LIGHT'.
    APPEND v_questionire TO itab_questionire.
    v_questionire = 'CONSUMER CARE CENTER'.
    APPEND v_questionire TO itab_questionire.
    v_questionire = 'WEBSITE'.
    APPEND v_questionire TO itab_questionire.
    DATA : counter TYPE i,
          high  LIKE sy-datum,
           low LIKE sy-datum.
    CONCATENATE
    l_s_select-high+6(4)
    l_s_select-high+3(2)
    l_s_select-high+0(2)
    INTO
    high.
    CONCATENATE
    l_s_select-low+6(4)
    l_s_select-low+3(2)
    l_s_select-low+0(2)
    INTO
    low.
    BREAK-POINT.
   do i_maxsize times.
    CALL FUNCTION 'ZCRM_SURVEY_REPORTING'
      EXPORTING
        e_date_frm    = low
        e_date_to     = high
        e_questionire = itab_questionire
      CHANGING
        it_result     = e_tt_data_get.
    IF sy-subrc IS INITIAL.
      e_t_data[] = e_tt_data_get[].
      APPEND e_t_data.
    ELSE.
      EXIT.
    ENDIF.
     sd_no_more_data = 'X'.
  ENDIF.              "Initialization mode or data extraction ?
ENDFUNCTION.
lk