Extraction from VBFA table

Hi All,
How can I create extractor on the VBFA table supporting delta mode?
Thanks in advance
Regards

To make data source which support just go in RSO2.
Using Table you can make the data source now for on which filed you like to take Delta that you have to maintained in Tab Generic Delta in this select for ex AEDAT.
and then after save both.
But i suggest please make a view on this table and then after make the data source. It will be helpful in future.

Similar Messages

I NEED FIELDS FROM VBFA TABLE

HI ALL,
I NEED FIELDS FROM VBFA TABLE
THE FIELDS I WANT IS :
CUSTOMER-ID
CUSTOMER NAME
CONTACT NAME
PROJECTID
ORDER NO
SALES MAN ID
ORDER PROCESS DATE
INVOICE DATE
GROSS AMOUNT
NET AMOUNT POSTAL CODE.
THANKS & REGARDS,
R.VINOD.

Hi Vinod..
Try this Code. I made all the modifications in your code .. It will solve ur issues..
REPORT zsdr_omvsa40.
TYPE-POOLS
TYPE-POOLS: slis.
TABLE DECLARATIONS
TABLES : vbak, vbkd,
zzvbak,
kna1, vbrk, vbrp, knvp .
INTERNALTABLE DECLARATION *
DATA: BEGIN OF i_vbak OCCURS 0,
vbelv LIKE vbfa-vbelv, " Sales Order no
vbeln like vbfa-vbeln, "Invoice No
erdat LIKE vbak-erdat, " Date on Which Record Was Created
kunnr LIKE vbak-kunnr,
ps_psp_pnr LIKE vbak-ps_psp_pnr, " Work Breakdown Structure Element
END OF i_vbak.
*DATA : BEGIN OF i_zzvbak OCCURS 0,
*vbeln LIKE zzvbak-vbeln,
*zssidc LIKE zzvbak-zssidc, "Salesman ID
*END OF i_zzvbak.
DATA : BEGIN OF i_vbrk OCCURS 0,
vbeln LIKE vbrk-vbeln,
fkdat LIKE vbrk-fkdat, "Invoice Date
END OF i_vbrk.
DATA : BEGIN OF i_kna1 OCCURS 0,
kunnr LIKE kna1-kunnr , " Customer Number 1
name1 LIKE kna1-name1, " Customer Name
pstlz LIKE kna1-pstlz , " Postal Code
END OF i_kna1.
DATA : BEGIN OF i_vbrp OCCURS 0,
vbeln LIKE vbrp-vbeln,
aubel LIKE vbrp-aubel,
netwr LIKE vbrp-netwr , " Net Value in Document Currency
kzwi1 LIKE vbrp-kzwi1, " Subtotal 1 from pricing procedure for condition
erdat LIKE vbrp-erdat, "Billing document.
END OF i_vbrp.
DATA : BEGIN OF i_knvp OCCURS 0,
parvw LIKE knvp-parvw , " Partner Function
kunnr LIKE knvp-kunnr ,
parnr LIKE knvp-parnr , " Number of contact person
END OF i_knvp .
DATA : BEGIN OF i_data OCCURS 0,
erdat LIKE vbak-erdat, " Date on Which Record Was Created
vbeln LIKE vbak-vbeln, " Sales Order no
fkdat LIKE vbrk-fkdat, " Invoice date.
kunnr LIKE kna1-kunnr , " Customer Number
ps_psp_pnr LIKE vbak-ps_psp_pnr, " Work Breakdown Structure Element
name1 LIKE kna1-name1, " Customer Name
netwr LIKE vbrp-netwr , " Net Value in Document Currency
kzwi1 LIKE vbrp-kzwi1, " Subtotal 1 from pricing procedure for condition
parvw LIKE knvp-parvw , " Partner Function
parnr LIKE knvp-parnr , " Number of contact person
*zssidc LIKE zzvbak-zssidc, "Salesman ID
pstlz LIKE kna1-pstlz , " Postal Code
END OF i_data.
ALV Declaraton
DATA: fieldcatalog TYPE slis_t_fieldcat_alv WITH HEADER LINE,
gd_tab_group TYPE slis_t_sp_group_alv,
gd_layout TYPE slis_layout_alv,
it_listheader TYPE slis_t_listheader,
gd_repid LIKE sy-repid.
Selection - Screen
SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS creation FOR vbak-erdat . " Sales Order Date
SELECT-OPTIONS period FOR vbrk-fkdat . " Invoice Date
SELECT-OPTIONS order FOR vbak-vbeln . " Sales order no
SELECT-OPTIONS name FOR kna1-name1 . " Customer Name
SELECT-OPTIONS contact FOR knvp-parnr . " Contact Name.
*SELECT-OPTIONS ssid FOR zzvbak-zssidc . " Salesman ID
SELECT-OPTIONS project FOR vbak-ps_psp_pnr . " Work Breakdown Structure Element
SELECTION-SCREEN : END OF BLOCK b1.
START-OF-SELECTION
START-OF-SELECTION.
PERFORM data_retrieval.
PERFORM build_fieldcatalog.
PERFORM BUILD_LAYOUT.
PERFORM top_of_page.
PERFORM fill_listheader USING it_listheader.
PERFORM display_alv_report.
END-OF-SELECTION.
*TOP-OF-PAGE.
TOP-OF-PAGE.
END-OF-PAGE.
*& Form BUILD_FIELDCATALOG
text
FORM build_fieldcatalog.
fieldcatalog-fieldname = 'KUNNR'.
fieldcatalog-seltext_m = 'Sold to Party'.
fieldcatalog-col_pos = 0.
fieldcatalog-outputlen = 10.
fieldcatalog-emphasize = 'X'.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'NAME1'.
fieldcatalog-seltext_m = 'Hlev Customer'.
fieldcatalog-col_pos = 1.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'PARNR'.
fieldcatalog-seltext_m = 'Contact name'.
fieldcatalog-col_pos = 2.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'PS_PSP_PNR'.
fieldcatalog-seltext_m = 'Project ID'.
fieldcatalog-col_pos = 3.
fieldcatalog-do_sum = 'X'.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'VBELN'.
fieldcatalog-seltext_m = 'Sales Document Type'.
fieldcatalog-col_pos = 4.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'ZSSIDC'.
fieldcatalog-seltext_m = 'SSID'.
fieldcatalog-col_pos = 5.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'ERDAT'.
fieldcatalog-seltext_m = 'so date'.
fieldcatalog-col_pos = 6.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'FKDAT'.
fieldcatalog-seltext_m = 'inv date'.
fieldcatalog-col_pos = 7.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'KWZI1'.
fieldcatalog-seltext_m = 'gross amt'.
fieldcatalog-col_pos = 8.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'NETWR'.
fieldcatalog-seltext_m = 'net amt'.
fieldcatalog-col_pos = 9.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'PSTLZ'.
fieldcatalog-seltext_m = 'Postal code'.
fieldcatalog-col_pos = 10.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
ENDFORM. "BUILD_FIELDCATALOG
*& Form DATA_RETRIEVAL
text
FORM data_retrieval.
SELECT VBFAvbelv VBFAvbeln
         VBAKerdat VBAKkunnr VBAK~ps_psp_pnr
         INTO TABLE i_vbak
FROM VBFA
INNER JOIN vbak
ON VBFAVBELV = VBAKVBELN
WHERE VBAK~erdat IN creation
AND VBFA~vbelV IN ORDER
AND VBAK~ps_psp_pnr IN project
AND VBFA~VBTYP_N = 'M' "Subsequent doc is Invoice
AND VBFA~VBTYP_V = 'C' "Prec doc is Sales order
IF NOT i_vbak[] IS INITIAL.
**Change of ORDER in SELECTS HERE
    SELECT vbeln fkdat FROM vbrk INTO TABLE i_vbrk
    FOR ALL ENTRIES IN i_vbak
    WHERE vbeln = i_vbak-vbeln
    AND fkdat IN period.
    IF NOT i_vbrk[] IS INITIAL.
      SELECT vbeln aubel netwr kzwi1 FROM vbrp INTO TABLE i_vbrp
      FOR ALL ENTRIES IN i_vbrk
      WHERE VBELN = i_vbrk-vbeln.
    endif.
    SELECT kunnr name1 pstlz FROM kna1 INTO TABLE i_kna1 FOR ALL ENTRIES IN i_vbak
    WHERE kunnr = i_vbak-kunnr
    AND name1 IN name.
*SELECT vbeln zssidc FROM zzvbak INTO TABLE i_zzvbak FOR ALL ENTRIES IN i_vbak
*WHERE vbeln = i_vbak-vbeln
*AND zssidc IN ssid .
select netwr kzwi1 erdat from vbrp into table i_vbrp for all entries in i_vbak
where erdat = i_vbak-erdat.
    SELECT kunnr parnr parvw FROM knvp INTO CORRESPONDING FIELDS OF TABLE i_knvp FOR ALL ENTRIES IN i_vbak
    WHERE kunnr = i_vbak-kunnr
    AND parvw = 'AP'
    AND parnr IN contact.
ENDIF .
SORT I_VBAK BY VBELN .
SORT I_VBRK BY VBELN .
LOOP AT i_vbrp. "Invoice Item data
    MOVE i_vbrp-netwr TO i_data-netwr .
    MOVE i_vbrp-kzwi1 TO i_data-kzwi1.
    READ table I_VBAK WITH KEY VBELN = I_VBRP-VBELN BINARY SEARCH. "Sales Order info
    IF SY-SUBRC = 0.
      MOVE I_VBAK-VBELV TO I_DATA-VBELN.   "Sales Order no
      MOVE I_VBAK-erdat TO I_DATA-erdat.   " Date on Which Record Was Created
      MOVE I_VBAK-kunnr TO I_DATA-KUNNR.    "Customer No
      MOVE I_VBAK-ps_psp_pnr TO I_DATA-ps_psp_pnr. " Work Breakdown Structure Element
    endif.
    READ TABLE I_VBRK WITH KEY VBELN = I_VBRP-VBELN BINARY SEARCH.   "Invoice header info
    IF SY-SUBRC = 0.
      MOVE i_vbrk-fkdat TO i_data-fkdat.
    endif.
    READ TABLE I_KNA1 WITH KEY KUNNR = I_VBAK-KUNNR BINARY SEARCH.   "Customer info
    IF SY-SUBRC = 0.
      MOVE i_kna1-kunnr TO i_data-kunnr.
      MOVE i_kna1-name1 TO i_data-name1.
      MOVE i_kna1-pstlz TO i_data-pstlz .
    endif.
    READ TABLE I_KNvp WITH KEY KUNNR = I_VBAK-KUNNR BINARY SEARCH.   "Partner info
    IF SY-SUBRC = 0.
      MOVE i_knvp-parnr TO i_data-parnr.
    endif.
    APPEND i_data.
ENDLOOP.
ENDFORM. "DATA_RETRIEVAL
*& Form DISPLAY_ALV_REPORT
text
FORM display_alv_report.
GD_REPID = SY-REPID.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
I_BYPASSING_BUFFER = ' '
I_BUFFER_ACTIVE = ' '
i_callback_program = sy-repid
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
i_callback_top_of_page = 'TOP_OF_PAGE'
I_CALLBACK_HTML_TOP_OF_PAGE = ' '
I_CALLBACK_HTML_END_OF_LIST = ' '
I_STRUCTURE_NAME =
I_BACKGROUND_ID = ' '
I_GRID_TITLE =
I_GRID_SETTINGS =
IS_LAYOUT =
it_fieldcat = fieldcatalog[]
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT =
IT_FILTER =
IS_SEL_HIDE =
I_DEFAULT = 'X'
I_SAVE = ' '
IS_VARIANT =
IT_EVENTS =
IT_EVENT_EXIT =
IS_PRINT =
IS_REPREP_ID =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
I_HTML_HEIGHT_TOP = 0
I_HTML_HEIGHT_END = 0
IT_ALV_GRAPHICS =
IT_HYPERLINK =
IT_ADD_FIELDCAT =
IT_EXCEPT_QINFO =
IR_SALV_FULLSCREEN_ADAPTER =
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
TABLES
t_outtab = i_data.
EXCEPTIONS
PROGRAM_ERROR = 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.
ENDFORM. "DISPLAY_ALV_REPORT
FORM FOR FILLING LISTHEADER *
FORM fill_listheader USING it_listheader TYPE slis_t_listheader.
DATA : wa_listheader TYPE slis_listheader.
wa_listheader-typ = 'H'.
wa_listheader-info = 'Noel Gifts International Limited '.
APPEND wa_listheader TO it_listheader.
wa_listheader-typ = 'S'.
wa_listheader-info = 'CUSTOMER CREDIT EXCEPTION REPORT' .
APPEND wa_listheader TO it_listheader.
CLEAR wa_listheader.
ENDFORM. "fill_listheader
*& Form top_of_page
text
FORM top_of_page.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = it_listheader.
ENDFORM. "top_of_page
REWARD IF HELPFUL.

Read data from VBFA table

hi gurus;
     I want to read data from VBFA table nd pass its VBELV to VBAK table to get VBAK values, Iam using FM SD_DOCUMENT_FLOW_GET ND RV_ORDER_FLOW_INFORMATION, BUT i am not getting desire result. WHEN iam using FM SD_DOCUMENT_FLOW_GET, it will give result only for last row of data, its not considering body part, so tell me how to used this FM properly.
data: l_docflow type tdt_docflow.
data lw_docflow type tds_docflow OCCURS 1 WITH HEADER LINE .
SELECT VBELN KNUMV BUKRS KUNRG REGIO NETWR FKSTO FKDAT FKART INTO CORRESPONDING FIELDS OF TABLE T_VBRK
      FROM VBRK WHERE BUKRS IN P_BUKRS AND FKDAT IN P_FKDAT AND VKORG IN P_VKORG AND REGIO = '07'
    ORDER BY VBELN KNUMV.
SORT T_VBRK BY vbeln.
LOOP AT T_VBRK.
    IF T_VBRK-FKART = 'F2' OR T_VBRK-FKART = 'YF2' OR T_VBRK-FKART = 'ZF2' OR
        T_VBRK-FKART = 'ZG2' OR T_VBRK-FKART = 'ZL2' OR T_VBRK-FKART = 'YG2' OR T_VBRK-FKART = 'YL2' .
      IF T_VBRK-FKSTO IS INITIAL.
    CALL FUNCTION 'SD_DOCUMENT_FLOW_GET'
EXPORTING
    IV_DOCNUM              = T_VBRK-vbelN
IV_ITEMNUM             =
IV_ALL_ITEMS           =
IV_SELF_IF_EMPTY       = ' '
IMPORTING
   ET_DOCFLOW             = l_docflow
LOOP AT l_docflow INTO lw_docflow   .
IF lw_docflow-vbtyp_V = 'C' OR lw_docflow-vbtyp_V = 'K' OR lw_docflow-vbtyp_V = 'L' OR lw_docflow-vbtyp_V = 'E'.
T_VBFA-vbelv = lW_docflow-vbelv.
T_VBFA-VBELN = lW_docflow-VBELN.
T_VBFA-vbtyp_V = lW_docflow-vbtyp_V.
APPEND t_vbfa.
endif.
endloop.
ENDIF.
endloop.
loop at t_vbfa.
if t_vbfa-vbtyp_V = 'C' OR t_vbfa-vbtyp_V = 'K' OR t_vbfa-vbtyp_V = 'L' OR t_vbfa-vbtyp_V = 'E' .
SELECT VBELN BSTNK BSTDK FROM VBAK INTO CORRESPONDING FIELDS OF TABLE T_VBAK FOR ALL ENTRIES IN T_VBFA
          WHERE VBELN = T_VBFA-VBELV .
endif.
ENDLOOP.

Hello
Use the below function module
RV_ORDER_FLOW_INFORMATION pass the type as C and pass the number.You will get all the flow.
SELECT VBELN KNUMV BUKRS KUNRG REGIO NETWR FKSTO FKDAT FKART INTO CORRESPONDING FIELDS OF TABLE T_VBRK FROM VBRK WHERE BUKRS IN P_BUKRS AND FKDAT IN P_FKDAT AND VKORG IN P_VKORG AND REGIO = '07'
    ORDER BY VBELN KNUMV.
SORT T_VBRK BY vbeln.
LOOP AT T_VBRK.
    IF T_VBRK-FKART = 'F2' OR T_VBRK-FKART = 'YF2' OR T_VBRK-FKART = 'ZF2' OR
        T_VBRK-FKART = 'ZG2' OR T_VBRK-FKART = 'ZL2' OR T_VBRK-FKART = 'YG2' OR T_VBRK-FKART = 'YL2' .
      IF T_VBRK-FKSTO IS INITIAL.
i_vbco6-vbeln = t_vbrk-vbeln.
CALL FUNCTION 'RV_ORDER_FLOW_INFORMATION'
EXPORTING
AUFBEREITUNG        = '2'
BELEGTYP            = ' '
    COMWA               = i_vbco6
NACHFOLGER          = 'X'
N_STUFEN            = '50'
VORGAENGER          = 'X'
V_STUFEN            = '50'
IMPORTING
BELEGTYP_BACK       =
TABLES
    VBFA_TAB            = t_vbfa
EXCEPTIONS
   NO_VBFA             = 1
   NO_VBUK_FOUND       = 2
   OTHERS              = 3
endif.
ENDIF.
endloop.
loop at t_vbfa.
if t_vbfa-vbtyp_V = 'C' OR t_vbfa-vbtyp_V = 'K' OR t_vbfa-vbtyp_V = 'L' OR t_vbfa-vbtyp_V = 'E' .
*clear t_vbfa.
SELECT VBELN BSTNK BSTDK FROM VBAK INTO CORRESPONDING FIELDS OF TABLE T_VBAK FOR ALL ENTRIES IN T_VBFA WHERE VBELN = T_VBFA-VBELV .
endif.
ENDLOOP.
In case of any more help is required do let me know
Regards,
Nabheet Madan

Function Module Extraction from KONV Table taking lot of time for extractio

Hi
I have a requirement wherein i need to get records from KONV Table (Conditions (Transaction Data) ). i need the data corresponding to Application (KAPPL) = 'F'.
For this i had written one function module but it is taking lot of time (@ 2.5 hrs) for fetching records as there are large number of records in KONV Table.
I am pasting the Function Module code for reference.
<b>kindly guide me as to how the extraction performance can be improved.</b>
<b>Function Module Code:</b>
FUNCTION ZBW_SHPMNT_COND.
""Local interface:
*" IMPORTING
*"     VALUE(I_REQUNR) TYPE SBIWA_S_INTERFACE-REQUNR
*"     VALUE(I_ISOURCE) TYPE SBIWA_S_INTERFACE-ISOURCE OPTIONAL
*"     VALUE(I_MAXSIZE) TYPE SBIWA_S_INTERFACE-MAXSIZE OPTIONAL
*"     VALUE(I_INITFLAG) TYPE SBIWA_S_INTERFACE-INITFLAG OPTIONAL
*"     VALUE(I_UPDMODE) TYPE SBIWA_S_INTERFACE-UPDMODE OPTIONAL
*"     VALUE(I_DATAPAKID) TYPE SBIWA_S_INTERFACE-DATAPAKID OPTIONAL
*"     VALUE(I_PRIVATE_MODE) OPTIONAL
*"     VALUE(I_CALLMODE) LIKE ROARCHD200-CALLMODE OPTIONAL
*" TABLES
*"      I_T_SELECT TYPE SBIWA_T_SELECT OPTIONAL
*"      I_T_FIELDS TYPE SBIWA_T_FIELDS OPTIONAL
*"      E_T_DATA STRUCTURE ZBW_SHPMNT_COND OPTIONAL
*"      E_T_SOURCE_STRUCTURE_NAME OPTIONAL
*" EXCEPTIONS
*"      NO_MORE_DATA
*"      ERROR_PASSED_TO_MESS_HANDLER
The input parameter I_DATAPAKID is not supported yet !
TABLES: KONV.
Auxiliary Selection criteria structure
DATA: l_s_select TYPE sbiwa_s_select.
Maximum number of lines for DB table
STATICS: l_maxsize TYPE sbiwa_s_interface-maxsize.
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
RANGES: L_R_KNUMV FOR KONV-KNUMV,
          L_R_KSCHL FOR KONV-KSCHL,
          L_R_KDATU FOR KONV-KDATU.
Declaring internal tables
DATA : I_KONV LIKE KONV OCCURS 0 WITH HEADER LINE.
DATA : Begin of I_KONV occurs 0,
         MANDT LIKE konv-mandt,
         KNUMV LIKE konv-knumv,
         KPOSN LIKE konv-kposn,
         STUNR LIKE konv-stunr,
         ZAEHK LIKE konv-zaehk,
         KAPPL LIKE konv-kappl,
         KSCHL LIKE konv-kschl,
         KDATU LIKE konv-kdatu,
         KBETR LIKE konv-kbetr,
         WAERS LIKE konv-waers,
         END OF I_KONV.
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
The input parameter I_DATAPAKID is not supported yet !
Invalid second initialization call -> error exit
    IF NOT g_flag_interface_initialized IS INITIAL.
      IF
        1 = 2.
        MESSAGE e008(r3).
      ENDIF.
      log_write 'E'                    "message type
                'R3'                   "message class
                '008'                  "message number
                ' '                    "message variable 1
                ' '.                   "message variable 2
      RAISE error_passed_to_mess_handler.
    ENDIF.
Check InfoSource validity
    CASE i_isource.
      WHEN 'X'.
     WHEN 'Y'.
     WHEN 'Z'.
      WHEN OTHERS.
       IF 1 = 2. MESSAGE e009(r3). ENDIF.
       log_write 'E'                  "message type
                 'R3'                 "message class
                 '009'                "message number
                 i_isource            "message variable 1
                 ' '.                 "message variable 2
       RAISE error_passed_to_mess_handler.
    ENDCASE.
Check for supported update mode
    CASE i_updmode.
For full upload
      WHEN 'F'.
      WHEN 'D'.
      WHEN OTHERS.
       IF 1 = 2. MESSAGE e011(r3). ENDIF.
       log_write 'E'                  "message type
                 'R3'                 "message class
                 '011'                "message number
                 i_updmode            "message variable 1
                 ' '.                 "message variable 2
       RAISE error_passed_to_mess_handler.
    ENDCASE.
    APPEND LINES OF i_t_select TO g_t_select.
Fill parameter buffer for data extraction calls
    g_s_interface-requnr    = i_requnr.
    g_s_interface-isource   = i_isource.
    g_s_interface-maxsize   = i_maxsize.
    g_s_interface-initflag = i_initflag.
    g_s_interface-updmode   = i_updmode.
    g_s_interface-datapakid = i_datapakid.
    g_flag_interface_initialized = sbiwa_c_flag_on.
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 g_t_fields.
Interpretation of date selection for generic extraktion
   CALL FUNCTION 'RSA3_DATE_RANGE_CONVERT'
     TABLES
       i_t_select = g_t_select.
ELSE.                 "Initialization mode or data extraction ?
   CASE g_s_interface-updmode.
     WHEN 'F' OR 'C' OR 'I'.
First data package -> OPEN CURSOR
    IF g_counter_datapakid = 0.
   L_MAXSIZE = G_S_INTERFACE-MAXSIZE.
      LOOP AT g_t_select INTO l_s_select WHERE fieldnm = 'KNUMV'.
        MOVE-CORRESPONDING l_s_select TO l_r_knumv.
        APPEND l_r_knumv.
      ENDLOOP.
      LOOP AT g_t_select INTO l_s_select WHERE fieldnm = 'KSCHL'.
        MOVE-CORRESPONDING l_s_select TO l_r_kschl.
        APPEND l_r_kschl.
      ENDLOOP.
      Loop AT g_t_select INTO l_s_select WHERE fieldnm = 'KDATU'.
        MOVE-CORRESPONDING l_s_select TO l_r_kdatu.
        APPEND l_r_kdatu.
      ENDLOOP.
*In case of full upload
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.
      OPEN CURSOR G_CURSOR FOR
        SELECT MANDT
               KNUMV
               KPOSN
               STUNR
               ZAEHK
               KAPPL
               KSCHL
               KDATU
               KBETR
               WAERS
        FROM   KONV
        WHERE KNUMV IN l_r_knumv
        AND   KSCHL IN l_r_kschl
        AND   KDATU IN l_r_kdatu
        AND   KAPPL EQ 'F'.
    ENDIF.
    Refresh I_KONV.
    FETCH NEXT CURSOR G_CURSOR
               APPENDING CORRESPONDING FIELDS OF TABLE I_KONV
               PACKAGE SIZE S_S_IF-MAXSIZE.
    IF SY-SUBRC <> 0.
      CLOSE CURSOR G_CURSOR.
      RAISE NO_MORE_DATA.
    ENDIF.
    LOOP AT I_KONV.
     IF I_KONV-KAPPL EQ 'F'.
      CLEAR :E_T_DATA.
      E_T_DATA-MANDT = I_KONV-MANDT.
      E_T_DATA-KNUMV = I_KONV-KNUMV.
      E_T_DATA-KPOSN = I_KONV-KPOSN.
      E_T_DATA-STUNR = I_KONV-STUNR.
      E_T_DATA-ZAEHK = I_KONV-ZAEHK.
      E_T_DATA-KAPPL = I_KONV-KAPPL.
      E_T_DATA-KSCHL = I_KONV-KSCHL.
      E_T_DATA-KDATU = I_KONV-KDATU.
      E_T_DATA-KBETR = I_KONV-KBETR.
      E_T_DATA-WAERS = I_KONV-WAERS.
      APPEND E_T_DATA.
   ENDIF.
    ENDLOOP.
    g_counter_datapakid = g_counter_datapakid + 1.
ENDIF.
ENDFUNCTION.
Thanks in Advance
Regards
Swapnil.

Hi,
one option to investigate is to select the data with a condition on KNUMV (primary IDX).
Since shipment costs are store in VFKP I would investigate if all your F condition records are used in this table (field VFKP-KNUMV).
If this is the case then something like
SELECT *
FROM KONV
WHERE KNUMV IN (SELECT DISTINCT KNUMV FROM VFKP)
or
SELECT DISTINCT KNUMV
INTO CORRESPONDING FIELD OF <itab>
FROM VFKP
and then
SELECT *
FROM KONV
FOR ALL ENTRIES IN <itab>
WHERE...
will definitively speed it up.
hope this helps....
Olivier

Get sales documetn of the invoice from VBFA table

In my user exit, i use to get the sales document from the table.

Hi Kranthi Kumar ,
If u want to know the sales document no of a invoice document from VBFA.
u have a fields VBELV (Preceding sales and distribution document) for this document if you want to know whether it is a
invoice or delivery or etc you can know using the field VBTYP_V (Document category of preceding SD document).
Similarly,
u have a fields VBELN (Subsequent sales and distribution document) for this document if you want to know whether it is a
invoice or delivery or etc you can know using the field VBTYP_N (Subsequent category of preceding SD document).
for ex if vbeln is a invoice docu then preceding document(VBELV) is a delivery.
check again the VBELV docu no in VBELN field
which is a delivery
check the preceeding docu for that delivery docu in VBELV which obviously would be a sales order.
*Else if you want to know directly the corresponding sales document go to VF02 enter that particular invoice number and then go to the document flow.(F5).
Hope its useful.
Revert back to me for any other queries on the same.
Reward points if useful.
Thanks ,
Surya Pydikondala.

Performance Tunning- data extraction from FMGLFLEXA table

Hi,
Need to fetch data from FMGLFLEXA table based on below condtion.
       WHERE rfund IN s_rfund
           AND rgrant_nbr IN s_rgnbr
           AND rbusa IN s_rbusa
           AND budat LE v_hbudat.
Please tell me how can i optimize this extaraction b'coz in production system there are lacks of records.
Regards,
Shweta.

create a index on these fields due to which data extraction from table will be fast.

Data extract from huge table

Hi,
I am extracting data from a table which has more than 25 million records without using any where condition.
45000 records in a file, in multiple files.
What is the best way to write the select statement.
Thanks,
fract

Don't know why you're extracting 25,000,000 records, but package size would be my first choice....something like:
types: gtyp_int type i.
data: itab type table of <dbtab>.
parameters: p_pkg type i default 45000.
start-of-selection.
perform myform.
form myform.
data: file_cnt type gtyp_int.
select * from <dbtab> into table <itab>
package size p_pkg.
file_cnt = file_cnt + 1.
do something with itab contents
case file_cnt.
when 1.
append lines of itab to .... "or do a table copy.
when 2.
endcase.
endselect.
endform.

Data extract from hr-tables to sybase

hello Gurus
i am extracting data from hr-tables to flatfile . i have data in pa0001 ,pa0002,pa0006,hrp1208,hrp1000,t513s data .
i am extracting data from pa0001 to pa0006 with the help of select query but where as with hrp tables i am facing a problem with the relationship between pa0001 and hrp1208 tables.
plz help me in this regard with some sample code.so that i can solve my problem
thanks
rad

Rad,
May be you should use 'object type', 'begin date' and 'end date' as the key combination. Try this. May be helpful.
Thanks,

Create Big XML files ( extract ) from Relational Tables

Experts: I need to create a big XML extract more than 5Gb , from relations tables using SQLX. I read the excellent FAQ given by MDrake in the following thread.
https://forums.oracle.com/thread/418001
Question
1) Is it better to use XML schema, My XML output format is pretty much going to be static, so I can register an XML schema .
2) Does Registering the XMLschema help with better memory management. I recall I used to get out of memory exception when I generated xml documents on oracle 10g using DBMS_XMLGEN.
3) Can I generate this 5 Gb of XML file using oracle's default DOM parser?
Thanks
Kevin

Hi Kevin,
1) Is it better to use XML schema, My XML output format is pretty much going to be static, so I can register an XML schema .
2) Does Registering the XMLschema help with better memory management. I recall I used to get out of memory exception when I generated xml documents on oracle 10g using DBMS_XMLGEN.
No, an XML schema won't help for the generation.
It is useful though if you're looking for the opposite task, i.e. loading an XML file into database tables.
3) Can I generate this 5 Gb of XML file using oracle's default DOM parser?
What is the default DOM parser ? Do you mean DBMS_XMLDOM APIs?
Since you want to generate XML, there's not much to parse.
Generally, using SQL/XML functions is the way to go.
You may still hit some performance/memory issues while reaching such a size, especially with large XMLAgg aggregation context.
If you do, you may switch to chunk generation instead. I've got some pretty good result with this approach and the parallel query feature.

How to Extract From Pool Tables

Hi All,
Can Somebody help with the Detailed Description how to extract the Data from Pool Tables from ECC to SAP BW
Thanks
Sam

Option 1
Create Infoset SQ02 on those tables and RSO2 - create generic ds
Option 2 :Create functional Module and create generic ds using FM
Replicate DS to BW and Build objects and map them in transformations and create dtp and IP
Start extraction! .. please search for detailed steps in forum

How I can extract from the table KONM?

Hi Experts,
I need to extract information from the table KONM.
Somebody know any standard extractor?
Thanks a lot!

Hi Leticia,
I think SAP does'nt deliver any standard extractor or Datasource related to the table KONM. The datasources delivered by SAP and related to the pricing are 2lis_11_VAKON and 2lis_13_VDKON but linked to the table KOMV.
In your case you have to create a generic datasource using the T-Code RSO2 and you link it to the table KONM with a View, Infoset query or a function module.
Regards.
Yacine

Data extraction from shared table

Hello All,
    I have a scenario where I have two different software systems (SAP and xyz systems), where a intermediate table will be created in between the two systems that is shared. Data will be updated by the xyz systems into this shared table. Now, my questions regarding this shared table.
   1) Can we write some program or something to get the data from shared table to update the SAP?
   2) If possible send me the suggestions
   3) Please also send me the sample code to get the data from the shared table
Thanks in advance,
SDN powered

HI,
Where will this shared table resides ? In SAP system ? or any database ?
If any database, you can extract the data from there and update/insert the data into SAP table thru XI. For this you need to query the shared table with JDBC adapter and post the information...
It is easy, if you give the informations about shared system ..
Regards,
moorthy

HOW WE EXTRACT SALES FLOW DATA FROM VBFA TABLE TO BI THROUGH FUNCTION MODUL

HI EXPERTS,
i am working on SD. i need how VBFA data extrcted into BI using function module. how to report relationship between SALESORDER- PGI-INVOICE. can anyone help me.
thanks in advance

Hi,
If you are looking for standard extractor then check the metadata repository, and if you want generic extractor then you can take help of RSAX_BIW_GET_DATA_SIMPLE extractor for writing your own extractors.
Regards,
Durgesh.

Extract from multiple tables

Hi,
I need to extract data from my leagcy source system which is on oracle.
I need to extract 50 records from each of my table in the my schema to a flat file with the same name as of table.
I have around 500 tables in my schema. So is there any way to do this.
Thanks,
Yeswanth

possibly you also want to consider referential integrity otherwise when you import to your new solution, it's unlikely any of the data will match up.
if you do want to consider this, then it will be very difficult for someone who doesn't know your data structure to write the queries for you.
consider using a data migration tool of some sort perhaps?

Data extraction from CO tables

Hi,
How does the accounting document no in bseg table related to the co-pa table ie. ce1***table.
The fields paobjnr pasubnr in the bseg table for my accounting document no is not available. Then how can i get the data from co-pa table for that accounting document number.
Regards,
Nagendra Prasad.J

Hi Nagendra,
To find the CO-PA data, you must go with paobjnr field in bseg to the ce4***_acct table and use ce4key field to extract details in ce4**. Please don´t use ce1** table.
regards,
Rodrigo Ramirez

Extraction from VBFA table

Similar Messages

Maybe you are looking for