Data extraction taking long time in source system.

Hi all,
I have created one custom datasource which is full update (not delta).
we are extracting data using function module in the source system.
it works well in Dev system but when I try to pull even 10 days data from source system to BW in production environment it generates huge log in source system. job log gets full & we have to cancel the job.
Job log looks as follows
Job started
Step 001 started (program SBIE0001, variant &0000000642922, user ID ALEREMOTE)
Asynchronous transmission of info IDoc 2 in task 0001 (0 parallel tasks)
DATASOURCE = ZDSHIPTRACKN
*          Current Values for Selected Profile Parameters               *
* abap/heap_area_nondia......... 2000000000                              *
* abap/heap_area_total.......... 2000000000                              *
* abap/heaplimit................ 40000000                                *
* zcsa/installed_languages...... DE                                      *
* zcsa/system_language.......... E                                       *
* ztta/max_memreq_MB............ 2048                                    *
* ztta/roll_area................ 6500000                                 *
* ztta/roll_extension........... 2000000000                              *
Call customer enhancement BW_BTE_CALL_BW204010_E (BTE) with 3,858 records
Result of customer enhancement: 3,858 records
Call customer enhancement EXIT_SAPLRSAP_001 (CMOD) with 3,858 records
Result of customer enhancement: 3,858 records
PSA=0 USING & STARTING SAPI SCHEDULER
Asynchronous send of data package 1 in task 0002 (1 parallel tasks)
IDOC: Info IDoc 2, IDoc No. 7775180, Duration 00:00:00
IDoc: Start = 28.01.2011 11:26:36, End = 28.01.2011 11:26:36
Call customer enhancement BW_BTE_CALL_BW204010_E (BTE) with 0 records
Result of customer enhancement: 0 records
Call customer enhancement EXIT_SAPLRSAP_001 (CMOD) with 0 records
Can someone plz tell me what can be the issue.?
Thank you

Hi
Whats logic for datasource?
can you share code here?
it might work fine after some ABAP tuning.
Regards
Sudeep

Similar Messages

I am extracting the data from ECC To bw .but Data Loading taking long tim

Hi All,
i am extracting the data from ECC To BI Syatem..but Data Loading Taking Long time. from last 6 hoursinfopackage is running.still it is showing yellow.Manually i made the red.and delete again i applied repeat of the last delta.but same proble is coming .in the status job is showing bckground job is not finished at source system.we requested to basis.basis people killed that job.again we schedule the chain also again same problem is coming.how can i solve this issue.
Thanks ,
chandu

Hi,
There are different places to track your job. Once your job is triggered in BW, you can track your load job where exactly it is taking more time and why. Follow below steps:
1) After InfoPackage is triggered, then take the request number and go to source system to check your extraction job status.
You can get the job status by taking the request number from BW and go to transaction SM37 in ECC. Then give the request number with begining '' and ending ''. Also give '*' to user name.
Job name: REQ_XXXXXX
User Name: *
Check the job status whether job is completed or cancelled or short dump. If the job is still running check in SM66 whether you can see any process. If not accordingly you got to check in ST22 or SM21 in ECC. If the job is complete, then the same in BW side now.
2) Check the data arrived in PSA, if not check whether Transfer routines or start routines are having bad SQL or code. Similarly in update rules.
3) Once it is through in Source system (ECC), Transfer rules , Update Rules, then the next task is updating the data might some time take more time which might be based on some parameters ( Number of parallel process to update database ). Check whether updating the database is taking more time and may be you got to check with the DBA guy also.
At all the times you should see minimum of atleast once process running all the time in SM66 till the time your job gets complete. If not you will see a log in ST22.
Let me know if you still have questions.
Assigning points is the only way of saying thanks in SDN.
Thanks,
Kumar.

How data extraction influence other processes in source system?

hi,
does data extraction influence other functions of source system (e.g. some background jobs can not be executed due to tables lock)?
Regards,
Andrzej

Hi andrzej,
The extraction process will not have much impact on the source system's other processes. But if u have got lots of data , it might have some effect while transferring the IDOCS. but as such, there should not be a problem of not data getting extracted. Is there any particular problem which ur phasing?
Rewgards
Sriram

Report Taking long time in QA system

Gurus,
I have developed a report which works fine in dev.Though in QA system its performance is not okay.Please go through th ecode and help me through.
TABLES: REGUH,BSAK,BSIS,LFA1,LFB1,BSAS.
****    Internal table declaration starts.
***    To Store Vendor clearing Document.
***    Internal table for credit card sub total.
DATA : BEGIN OF I_BSAK OCCURS 0,
       XBLNR LIKE BSAK-XBLNR,
       LIFNR LIKE REGUH-LIFNR,
       PRCTR LIKE BSEG-PRCTR,
       NAME1 LIKE LFA1-NAME1,
       AUGDT LIKE BSAK-AUGDT,
       AUGBL LIKE BSAK-AUGBL,
       XBLNR1 LIKE BSAK-XBLNR,
       GJAHR LIKE BSAK-GJAHR,
       BELNR LIKE BSAK-BELNR,
       BLDAT LIKE BSAK-BLDAT,
       BLART LIKE BSAK-BLART,
       SHKZG LIKE BSAK-SHKZG,
       DMBTR LIKE BSAK-DMBTR,
       AUGGJ LIKE BSAK-AUGGJ,
       CPUDT LIKE BSAK-CPUDT,
       LAUFD LIKE REGUH-LAUFD,
       KTOKK LIKE LFA1-KTOKK,
       RWBTR LIKE REGUH-RWBTR,
       VBLNR LIKE REGUH-VBLNR,
       HKONT LIKE BSEG-HKONT,
       END OF I_BSAK.
***    Internal table for Vendor sub total.
DATA : BEGIN OF I_BSAK_LIFNR OCCURS 0,
       LIFNR LIKE REGUH-LIFNR,
       XBLNR LIKE BSAK-XBLNR,
       PRCTR LIKE BSEG-PRCTR,
       NAME1 LIKE LFA1-NAME1,
       AUGDT LIKE BSAK-AUGDT,
       AUGBL LIKE BSAK-AUGBL,
       XBLNR1 LIKE BSAK-XBLNR,
       GJAHR LIKE BSAK-GJAHR,
       BELNR LIKE BSAK-BELNR,
       BLDAT LIKE BSAK-BLDAT,
       BLART LIKE BSAK-BLART,
       SHKZG LIKE BSAK-SHKZG,
       DMBTR LIKE BSAK-DMBTR,
       AUGGJ LIKE BSAK-AUGGJ,
       CPUDT LIKE BSAK-CPUDT,
       LAUFD LIKE REGUH-LAUFD,
       KTOKK LIKE LFA1-KTOKK,
       RWBTR LIKE REGUH-RWBTR,
       VBLNR LIKE REGUH-VBLNR,
       HKONT LIKE BSEG-HKONT,
       END OF I_BSAK_LIFNR.
***    Internal table for Profit center sub total.
DATA : BEGIN OF I_BSAK_PRCTR OCCURS 0,
       PRCTR LIKE BSEG-PRCTR,
       BELNR LIKE BSAK-BELNR,
       GJAHR LIKE BSAK-GJAHR,
       LIFNR LIKE REGUH-LIFNR,
       XBLNR LIKE BSAK-XBLNR,
       HKONT LIKE BSEG-HKONT,
       NAME1 LIKE LFA1-NAME1,
       AUGDT LIKE BSAK-AUGDT,
       AUGBL LIKE BSAK-AUGBL,
       XBLNR1 LIKE BSAK-XBLNR,
       BLDAT LIKE BSAK-BLDAT,
       BLART LIKE BSAK-BLART,
       SHKZG LIKE BSAK-SHKZG,
       DMBTR LIKE BSAK-DMBTR,
       AUGGJ LIKE BSAK-AUGGJ,
       CPUDT LIKE BSAK-CPUDT,
       LAUFD LIKE REGUH-LAUFD,
       KTOKK LIKE LFA1-KTOKK,
       RWBTR LIKE REGUH-RWBTR,
       VBLNR LIKE REGUH-VBLNR,
       END OF I_BSAK_PRCTR.
*** Work area for sub totals.
DATA: WA LIKE I_BSAK.
DATA : I_BSAK_INIT LIKE I_BSAK OCCURS 0 WITH HEADER LINE.
***    To store line item.
DATA : BEGIN OF I_BSEG OCCURS 0,
       BELNR LIKE BSEG-BELNR,
       GJAHR LIKE BSEG-GJAHR,
       BUZEI LIKE BSEG-BUZEI,
       HKONT LIKE BSEG-HKONT,
       SHKZG LIKE BSEG-SHKZG,
       DMBTR LIKE BSEG-DMBTR,
       PRCTR LIKE BSEG-PRCTR,
       LIFNR LIKE REGUH-LIFNR,
       AUGDT LIKE BSAK-AUGDT,
       AUGBL LIKE BSAK-AUGBL,
       XBLNR LIKE BSAK-XBLNR,
       XBLNR1 LIKE BSAK-XBLNR,
       BLDAT LIKE BSAK-BLDAT,
       BLART LIKE BSAK-BLART,
       NAME1 LIKE LFA1-NAME1,
       END OF I_BSEG.
DATA : BEGIN OF I_BSEG_COPY OCCURS 0,
      PRCTR LIKE BSEG-PRCTR,
      BELNR LIKE BSEG-BELNR,
      GJAHR LIKE BSEG-GJAHR,
      BUZEI LIKE BSEG-BUZEI,
      HKONT LIKE BSEG-HKONT,
      SHKZG LIKE BSEG-SHKZG,
      DMBTR LIKE BSEG-DMBTR,
      LIFNR LIKE REGUH-LIFNR,
      AUGDT LIKE BSAK-AUGDT,
      AUGBL LIKE BSAK-AUGBL,
      XBLNR LIKE BSAK-XBLNR,
      XBLNR1 LIKE BSAK-XBLNR,
      BLDAT LIKE BSAK-BLDAT,
      BLART LIKE BSAK-BLART,
      NAME1 LIKE LFA1-NAME1,
      END OF I_BSEG_COPY.
***    To store GL account name
DATA: BEGIN OF I_SKAT OCCURS 0,
      SAKNR LIKE SKAT-SAKNR,
      TXT50 LIKE SKAT-TXT50,
      END OF I_SKAT.
***   To store Vendor detail
DATA: BEGIN OF I_LFA1 OCCURS 0,
      LIFNR LIKE LFA1-LIFNR,
      NAME1 LIKE LFA1-NAME1,
      KTOKK LIKE LFA1-KTOKK,
      END OF I_LFA1.
DATA: I_INACT TYPE TABLE OF SY-UCOMM.
*** End of Internal table declaration.
*** Constant for company code
CONSTANTS : C_BUKRS(4) VALUE '0010'.
*** Data declaration.
DATA: FR_LAUFDT LIKE REGUH-LAUFD,
      TO_LAUFDT LIKE REGUH-LAUFD,
      COL,
      HEADING(80),
      HEADING1(10),
      HEADING2(80),
      AUTH_RESTRICT,
      G_DETAIL,
      G_SORTV,
      G_SORTP,
      G_SORTC,
      G_FLAG,
      V_XBLNR LIKE BSAK-XBLNR,
      V_UCOMM LIKE SY-UCOMM,
      V_AUGBL LIKE BSAS-AUGBL,
      V_BELNR LIKE BSAS-BELNR.
DATA : BEGIN OF I_SEL OCCURS 0 ,
       AUGBL LIKE BSAK-AUGBL,
       END OF I_SEL.
DATA: PROGNAME TYPE SY-REPID,
      DYNNUM   TYPE SY-DYNNR,
      DYNPRO_VALUES TYPE TABLE OF DYNPREAD,
      FIELD_VALUE LIKE LINE OF DYNPRO_VALUES,
      VALUES_TAB LIKE I_SEL OCCURS 0 WITH HEADER LINE.
DATA : RETURN_TAB LIKE DDSHRETVAL OCCURS 0 WITH HEADER LINE.
*** Selection screen.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(30) TXT_PD FOR FIELD P_LAUFDF.
SELECTION-SCREEN POSITION POS_LOW.
PARAMETERS P_LAUFDF LIKE REGUH-LAUFD OBLIGATORY.
SELECTION-SCREEN COMMENT 52(5) TXT_TO FOR FIELD P_LAUFDT.
SELECTION-SCREEN POSITION POS_HIGH.
PARAMETERS P_LAUFDT LIKE REGUH-LAUFD.
SELECTION-SCREEN END OF LINE.
SELECT-OPTIONS: S_KTOKK FOR LFA1-KTOKK.
PARAMETERS: P_RWBTR LIKE REGUH-RWBTR.
SELECT-OPTIONS: S_LIFNR FOR REGUH-LIFNR.
* S_XBLNR FOR BSAK-XBLNR MATCHCODE OBJECT ZXBLNR.
**** Added By Rajesh On 17 OCT 08 (DEVK914797) ****
SELECT-OPTIONS: S_BELNR FOR BSAK-BELNR.
**** End of Addition By Rajesh *****
*** Added By Samir On 04 Sep 08 (DEVK914623) ***
SELECTION-SCREEN SKIP.
PARAMETERS: CHK_REC AS CHECKBOX.
*** End Of Addition By Samir ***
SELECTION-SCREEN END OF BLOCK B1.
*** Initialization.
INITIALIZATION.
TXT_PD = 'Payment Date'.
TXT_TO = 'to' .
G_SORTC = 'X'.
*** At selection-screen.
AT SELECTION-SCREEN.
FR_LAUFDT = P_LAUFDF.
IF P_LAUFDT IS INITIAL.
    TO_LAUFDT = FR_LAUFDT.
ELSE.
    IF P_LAUFDT LT P_LAUFDF.
      MESSAGE E000(ZMSG) WITH 'To Date is less than From date'.
    ENDIF.
    TO_LAUFDT = P_LAUFDT.
ENDIF.
*** Heading.
WRITE FR_LAUFDT TO HEADING1.
WRITE TO_LAUFDT TO HEADING2.
IF HEADING1 <> HEADING2.
    CONCATENATE 'Vendor Credit Card(s) Report for the Payment Date'
    HEADING1 'To' HEADING2 INTO HEADING2 SEPARATED BY SPACE.
ELSE.
    CONCATENATE 'Vendor Credit Card(s) Report for the Payment Date'
    HEADING1 INTO HEADING2 SEPARATED BY SPACE.
ENDIF.
*** Start of selection.
START-OF-SELECTION.
G_DETAIL = 'X'.
PERFORM GET_DATA.
PERFORM MODIFY_ITAB.                          "Process and for authority check.
*** Added By Samir On 04 Sep 08 (DEVK914623) ***
**** Changed By Rajesh On 17 OCT 08 (DEVK914797) ****
IF CHK_REC = 'X'.
    LOOP AT I_BSAK.
      SELECT SINGLE BELNR
      INTO   V_BELNR
      FROM   BSAS
      WHERE BUKRS = C_BUKRS
        AND HKONT = '0000002012'
        AND BELNR = I_BSAK-AUGBL
        AND BUDAT = I_BSAK-AUGDT
        AND BELNR IN S_BELNR.               " For displaying only reconciled items.
**** End of Addition By Rajesh *****
      IF SY-SUBRC <> 0.
        DELETE I_BSAK.
      ENDIF.
    ENDLOOP.
ENDIF.
*** End Of Addition By Samir ***
LOOP AT I_BSAK.
    MOVE-CORRESPONDING I_BSAK TO: I_BSAK_LIFNR.
    APPEND: I_BSAK_LIFNR.
    CLEAR: I_BSAK_LIFNR.
ENDLOOP.
LOOP AT I_BSAK.
    MOVE-CORRESPONDING I_BSAK TO: I_BSAK_PRCTR.
    READ TABLE I_BSEG WITH KEY BELNR = I_BSAK-BELNR.
    I_BSAK_PRCTR-HKONT = I_BSEG-HKONT.
    APPEND: I_BSAK_PRCTR.
    CLEAR: I_BSAK_PRCTR.
ENDLOOP.
*loop at i_bseg.
*   MOVE-CORRESPONDING I_BSAK TO: I_BSAK_PRCTR.
*endloop.
*perform write_data.
PERFORM DISPLAY_OUTPUT.
AT USER-COMMAND.
CASE SY-UCOMM.
    WHEN 'EXPA'.
      G_DETAIL = 'X'.
    WHEN 'COLL'.
      CLEAR G_DETAIL.
    WHEN 'SORTV'.
      CLEAR: V_UCOMM.
      V_UCOMM = 'SORTV'.
      G_SORTV = 'X'.
      CLEAR G_SORTP.
      CLEAR G_SORTC.
    WHEN 'SORTC'.
      CLEAR: V_UCOMM.
      V_UCOMM = 'SORTC'.
      CLEAR G_SORTV.
      CLEAR G_SORTP.
      G_SORTC = 'X'.
    WHEN 'SORTP'.
      CLEAR: V_UCOMM.
      V_UCOMM = 'SORTP'.
      CLEAR G_SORTV.
      CLEAR G_SORTC.
      G_SORTP = 'X'.
ENDCASE.
PERFORM DISPLAY_OUTPUT.
*perform write_data.
*** To get the header text in the output.
TOP-OF-PAGE.
PERFORM TOP_OF_PAGE.
TOP-OF-PAGE DURING LINE-SELECTION.
PERFORM TOP_OF_PAGE.
*&      Form GET_DATA
*       text
* --> p1        text
* <-- p2        text
FORM GET_DATA .
SY-LSIND = 0.
P_RWBTR = P_RWBTR * -1.
REFRESH I_BSAK_INIT.
CLEAR I_BSAK_INIT.
SELECT A~LIFNR A~LAUFD A~VBLNR A~RWBTR
          B~KTOKK B~NAME1
            FROM REGUH AS A INNER JOIN LFA1 AS B
            ON   A~LIFNR = B~LIFNR
            INTO CORRESPONDING FIELDS OF TABLE I_BSAK_INIT
            WHERE A~LAUFD BETWEEN FR_LAUFDT AND TO_LAUFDT AND
                  A~XVORL <> 'X' AND
                  A~ZBUKR = C_BUKRS AND
                  A~LIFNR IN S_LIFNR AND
                  A~RZAWE = 'X' AND
                  A~RWBTR LE P_RWBTR AND
                  B~KTOKK IN S_KTOKK.
IF SY-SUBRC <> 0.
    MESSAGE 'Records Not Found' TYPE 'I'.
    LEAVE LIST-PROCESSING.
ENDIF.
*---------------------PERFORMANCE ISSUE--------------------------
delete adjacent duplicates from i_bsak_init.
IF NOT I_BSAK_INIT[] IS INITIAL.
   SELECT LIFNR AUGDT AUGBL GJAHR BELNR CPUDT BLDAT XBLNR
           BLART SHKZG DMBTR AUGGJ
              FROM BSAK
              INTO CORRESPONDING FIELDS OF TABLE I_BSAK
              FOR ALL ENTRIES IN I_BSAK_INIT
              WHERE BUKRS = C_BUKRS AND
              AUGBL = I_BSAK_INIT-VBLNR AND
              XZAHL <> 'X'.
ENDIF.
*** Selecting all line item records from BSEG table.
IF I_BSAK[] IS NOT INITIAL.
    SELECT BELNR GJAHR BUZEI HKONT SHKZG DMBTR PRCTR
           FROM BSEG
           INTO CORRESPONDING FIELDS OF TABLE I_BSEG
           FOR ALL ENTRIES IN I_BSAK
           WHERE BUKRS = C_BUKRS      AND
                 BELNR = I_BSAK-BELNR AND
                 GJAHR = I_BSAK-GJAHR AND
                 BELNR <> I_BSAK-AUGBL AND
                 KOART <> 'K'.
ENDIF.
*** Selecting gl account name from SKAT table.
IF I_BSEG[] IS NOT INITIAL.
    SELECT SAKNR TXT50
           FROM SKAT
           INTO CORRESPONDING FIELDS OF TABLE I_SKAT
           FOR ALL ENTRIES IN I_BSEG
           WHERE SPRAS = 'E'     AND
                 KTOPL = C_BUKRS AND
                 SAKNR = I_BSEG-HKONT.
ENDIF.
SORT I_BSAK BY BELNR.
SORT I_BSAK_INIT BY VBLNR.
SORT I_BSEG BY BELNR GJAHR.
*** Selecting Credit Card No. into I_XBLNR table.
LOOP AT I_BSAK.
    I_BSAK-XBLNR1 = I_BSAK-XBLNR.
    CLEAR: V_XBLNR.
    SELECT SINGLE XBLNR FROM BKPF INTO V_XBLNR
                          WHERE BUKRS = C_BUKRS AND
                          BELNR = I_BSAK-AUGBL.
    IF SY-SUBRC EQ 0.
      I_BSAK-XBLNR = V_XBLNR.
    ENDIF.
    READ TABLE I_BSEG WITH KEY BELNR = I_BSAK-BELNR
                               GJAHR = I_BSAK-GJAHR
                               BINARY SEARCH.
    IF SY-SUBRC EQ 0.
      I_BSAK-PRCTR = I_BSEG-PRCTR.
    ENDIF.
    READ TABLE I_BSAK_INIT WITH KEY VBLNR = I_BSAK-AUGBL BINARY SEARCH.
    IF SY-SUBRC EQ 0.
      I_BSAK-NAME1 = I_BSAK_INIT-NAME1.
      I_BSAK-LAUFD = I_BSAK_INIT-LAUFD.
      I_BSAK-KTOKK = I_BSAK_INIT-KTOKK.
    ENDIF.
    MODIFY I_BSAK TRANSPORTING XBLNR XBLNR1 PRCTR NAME1 LAUFD KTOKK.
ENDLOOP.
ENDFORM.                    " GET_DATA
*&      Form MODIFY_ITAB
*       text
* --> p1        text
* <-- p2        text
FORM MODIFY_ITAB .
*** Process on internal table
LOOP AT I_BSAK.
    AUTHORITY-CHECK OBJECT 'F_LFA1_GRP'
                         ID 'KTOKK'
                      FIELD I_BSAK-KTOKK.
    IF SY-SUBRC NE 0.
      DELETE I_BSAK WHERE KTOKK EQ I_BSAK-KTOKK.
      AUTH_RESTRICT = 'X'.
      CONTINUE.
    ENDIF.
ENDLOOP.
IF AUTH_RESTRICT EQ 'X'.
    MESSAGE S005(ZMSG).
ENDIF.
LOOP AT I_BSAK.
    IF I_BSAK-SHKZG = 'S'.
      I_BSAK-DMBTR = I_BSAK-DMBTR * -1.
      MODIFY I_BSAK .
    ENDIF.
ENDLOOP.
LOOP AT I_BSEG.
    IF I_BSEG-SHKZG = 'H'.
      I_BSEG-DMBTR = I_BSEG-DMBTR * -1.
      MODIFY I_BSEG .
    ENDIF.
ENDLOOP.
*** Default Sorting on internal table .
SORT I_BSAK BY XBLNR LIFNR BELNR.
SORT I_BSEG BY BELNR HKONT.
SORT I_SKAT BY SAKNR.
ENDFORM.                    " MODIFY_ITAB
*&      Form DISPLAY_OUTPUT
*       text
* --> p1        text
* <-- p2        text
FORM DISPLAY_OUTPUT .
*** Coding for detail output starts
CLEAR SY-LSIND.
REFRESH I_INACT.
IF G_DETAIL EQ 'X'.
    APPEND 'EXPA' TO I_INACT.
ELSE.
    APPEND 'COLL' TO I_INACT.
ENDIF.
IF G_SORTV EQ 'X'.
    APPEND 'SORTV' TO I_INACT.
    SORT I_BSAK BY LIFNR.
    SORT I_BSAK_LIFNR BY LIFNR.
ELSEIF G_SORTP EQ 'X'.
    APPEND 'SORTP' TO I_INACT.
    SORT I_BSAK BY PRCTR.
    SORT I_BSAK_PRCTR BY PRCTR.
ELSE.
    APPEND 'SORTC' TO I_INACT.
    SORT I_BSAK BY XBLNR.
ENDIF.
SET PF-STATUS 'STAT' EXCLUDING I_INACT.
IF V_UCOMM = 'SORTC'.
    PERFORM WRITE_DATA.
ELSEIF V_UCOMM = 'SORTV' .     "Subroutine for card sub total.
    PERFORM WRITE_DATA_VENDOR.   "Subroutine for vendor sub total.
ELSEIF V_UCOMM = 'SORTP'.      "Subroutine for profit center sub total.
*    PERFORM WRITE_DATA_PROFIT.
    PERFORM WRITE_DATA_PROFIT_NEW. " New subroutine for profit center.
ELSE.
    PERFORM WRITE_DATA.
ENDIF.
ENDFORM.                    " DISPLAY_OUTPUT
*&      Form F_COLOR
*       text
* --> p1        text
* <-- p2        text
FORM F_COLOR .
IF COL = 'X'.
    FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
    CLEAR COL.
ELSE.
    FORMAT COLOR COL_NORMAL INTENSIFIED ON.
    COL = 'X'.
ENDIF.
ENDFORM.                    " F_COLOR
*&      Form TOP_OF_PAGE
*       text
* --> p1        text
* <-- p2        text
FORM TOP_OF_PAGE .
*** Top-of-page is Common for summary and detail report.
*** To display top of page only on first page.
IF SY-PAGNO = 1 .
    CALL FUNCTION 'Z_NPL_HEADING'
      EXPORTING
        LINE_SIZE = SY-LINSZ
        HEADING1 = HEADING
        HEADING2 = HEADING2.
    FORMAT COLOR COL_HEADING INTENSIFIED ON.
**** To get output columns text descprition
    ULINE.
    WRITE:/ SY-VLINE NO-GAP, (10) 'Vendor' NO-GAP,
            SY-VLINE NO-GAP, (35) 'Name of Payee' NO-GAP,
            SY-VLINE NO-GAP, (10) 'G/L Num' NO-GAP,
            SY-VLINE NO-GAP, (42) 'G/L Name' NO-GAP,
            SY-VLINE NO-GAP, (07) 'Profit Center' NO-GAP,
            SY-VLINE NO-GAP, (16) 'Credit Card NO.' NO-GAP,
            SY-VLINE NO-GAP, (10) 'Pmnt Date' NO-GAP,
            SY-VLINE NO-GAP, (08) 'Doc.Type' NO-GAP,
            SY-VLINE NO-GAP, (10) 'Inv.Date' NO-GAP,
            SY-VLINE NO-GAP, (16) 'Invoice' NO-GAP,
            SY-VLINE NO-GAP, (14) 'Amount Paid' NO-GAP,
            SY-VLINE.
    ULINE.
ENDIF.
ENDFORM.                    " TOP_OF_PAGE
*&      Form WRITE_DATA
*       text
* --> p1        text
* <-- p2        text
FORM WRITE_DATA .
LOOP AT I_BSAK.
    CLEAR WA.
    MOVE-CORRESPONDING I_BSAK TO WA.
    PERFORM WRITE.
    AT END OF XBLNR.                             "Card sub total
      IF G_SORTC EQ 'X'.
        SUM.
        IF G_DETAIL EQ 'X'. ULINE. ENDIF.
        FORMAT COLOR COL_TOTAL INTENSIFIED OFF.
        WRITE:/ SY-VLINE NO-GAP, (25) 'Credit Card Total:', I_BSAK-XBLNR ,
                (35) I_BSAK-NAME1 NO-GAP.
        WRITE: 110 SY-VLINE NO-GAP,(79) I_BSAK-DMBTR NO-GAP
                                         CURRENCY 'USD',SY-VLINE.
        ULINE.
      ENDIF.
    ENDAT.                                     "End of Credit card Detail
**** Grand total
    AT LAST.                                   "Grand total
      SUM.
      FORMAT COLOR COL_TOTAL INTENSIFIED OFF.
      WRITE:/ SY-VLINE NO-GAP,(107) 'Grand Total:',
              SY-VLINE NO-GAP,(79) I_BSAK-DMBTR NO-GAP
                                     CURRENCY 'USD', SY-VLINE.
      ULINE.
    ENDAT.
ENDLOOP.                                     "End for I_BSAK loop
ENDFORM.                    " WRITE_DATA
*&      Form WRITE_DATA_VENDOR
*       text
* --> p1        text
* <-- p2        text
FORM WRITE_DATA_VENDOR .
LOOP AT I_BSAK_LIFNR.
    CLEAR WA.
    MOVE-CORRESPONDING I_BSAK_LIFNR TO WA.
    PERFORM WRITE.
    AT END OF LIFNR.                           "Vendor sub Total
      IF G_SORTV EQ 'X'.
        SUM.
        IF G_DETAIL EQ 'X'. ULINE. ENDIF.
        FORMAT COLOR COL_TOTAL INTENSIFIED ON.
        WRITE:/ SY-VLINE NO-GAP,(15) 'Vendor Total:', I_BSAK_LIFNR-LIFNR.
        WRITE: 110 SY-VLINE NO-GAP,(79) I_BSAK_LIFNR-DMBTR NO-GAP
                                         CURRENCY 'USD',SY-VLINE.
        ULINE.
      ENDIF.
    ENDAT.                                     "End of Vendor Total
**** Grand total
    AT LAST.                                   "Grand total
      SUM.
      FORMAT COLOR COL_TOTAL INTENSIFIED OFF.
      WRITE:/ SY-VLINE NO-GAP,(107) 'Grand Total:',
              SY-VLINE NO-GAP,(79) I_BSAK_LIFNR-DMBTR NO-GAP
                                     CURRENCY 'USD', SY-VLINE.
      ULINE.
    ENDAT.
ENDLOOP.                                     "End for I_BSAK_LIFNR loop
ENDFORM.                    " WRITE_DATA_VENDOR
*&      Form WRITE_DATA_PROFIT
*       text
* --> p1        text
* <-- p2        text
FORM WRITE_DATA_PROFIT .
*** Changed By Samir On 18 Sep 08 (DEVK914685) ***
LOOP AT I_BSAK_PRCTR.
    READ TABLE I_BSAK WITH KEY BELNR = I_BSAK_PRCTR-BELNR
                               GJAHR = I_BSAK_PRCTR-GJAHR.
    IF SY-SUBRC = 0.
      I_BSAK_PRCTR-LIFNR = I_BSAK-LIFNR.
      I_BSAK_PRCTR-NAME1 = I_BSAK-NAME1.
      I_BSAK_PRCTR-XBLNR = I_BSAK-XBLNR.
      I_BSAK_PRCTR-LAUFD = I_BSAK-LAUFD.
      I_BSAK_PRCTR-BLART = I_BSAK-BLART.
      I_BSAK_PRCTR-BLDAT = I_BSAK-BLDAT.
      I_BSAK_PRCTR-XBLNR1 = I_BSAK-XBLNR1.
      MODIFY I_BSAK_PRCTR TRANSPORTING LIFNR NAME1 XBLNR LAUFD BLART BLDAT XBLNR1.
    ENDIF.
ENDLOOP.
*** End Of Changes By Samir On 18 Sep 08 ***
SORT I_BSAK_PRCTR BY PRCTR.
LOOP AT I_BSAK_PRCTR.
    PERFORM F_COLOR.
    IF G_DETAIL = 'X'.
*** Changed By Samir On 18 Sep 08 (DEVK914685) ***
      READ TABLE I_SKAT WITH KEY SAKNR = I_BSAK_PRCTR-HKONT BINARY SEARCH.
      WRITE:/ SY-VLINE NO-GAP, (10) I_BSAK_PRCTR-LIFNR NO-GAP,
              SY-VLINE NO-GAP, (35) I_BSAK_PRCTR-NAME1 NO-GAP,
              SY-VLINE NO-GAP, (10) I_BSAK_PRCTR-HKONT NO-GAP,
              SY-VLINE NO-GAP, (42) I_SKAT-TXT50 NO-GAP,
              SY-VLINE NO-GAP, (07) I_BSAK_PRCTR-PRCTR NO-GAP,
              SY-VLINE NO-GAP, (16) I_BSAK_PRCTR-XBLNR NO-GAP,     " CREDIT CARD NO.
              SY-VLINE NO-GAP, (10) I_BSAK_PRCTR-LAUFD NO-GAP,
              SY-VLINE NO-GAP, (08) I_BSAK_PRCTR-BLART NO-GAP,
              SY-VLINE NO-GAP, (10) I_BSAK_PRCTR-BLDAT NO-GAP,
              SY-VLINE NO-GAP, (16) I_BSAK_PRCTR-XBLNR1 NO-GAP.
      WRITE: SY-VLINE NO-GAP, (14) I_BSAK_PRCTR-DMBTR NO-GAP.
      WRITE: SY-VLINE.
    ENDIF.
*** End Of Changes By Samir On 18 Sep 08 ***
    AT END OF PRCTR.                           "Profit Center sub Total
      IF G_SORTP EQ 'X'.
        SUM.
        IF G_DETAIL EQ 'X'. ULINE. ENDIF.
        FORMAT COLOR COL_TOTAL INTENSIFIED ON.
        WRITE:/ SY-VLINE NO-GAP,(07) 'Profit Center Total:', I_BSAK_PRCTR-PRCTR.
        WRITE: 110 SY-VLINE NO-GAP,(79) I_BSAK_PRCTR-DMBTR NO-GAP
                                         CURRENCY 'USD',SY-VLINE.
        ULINE.
      ENDIF.
    ENDAT.                                    "End of Profit Center Total
**** Grand total
    AT LAST.                                  "Grand total
      SUM.
      FORMAT COLOR COL_TOTAL INTENSIFIED OFF.
      WRITE:/ SY-VLINE NO-GAP,(107) 'Grand Total:',
              SY-VLINE NO-GAP,(79) I_BSAK_PRCTR-DMBTR NO-GAP
                                     CURRENCY 'USD', SY-VLINE.
      ULINE.
    ENDAT.
ENDLOOP.                                     "End for I_BSAK_PRCTR loop
ENDFORM.                    " WRITE_DATA_PROFIT
*&      Form WRITE
*       text
* --> p1        text
* <-- p2        text
FORM WRITE .
IF G_DETAIL = 'X'.
    IF WA-KTOKK = 'Z001'.                   " For HR Vendors
      PERFORM F_COLOR.
      READ TABLE I_BSEG WITH KEY BELNR = WA-BELNR GJAHR = WA-GJAHR BINARY SEARCH .
      READ TABLE I_SKAT WITH KEY SAKNR = I_BSEG-HKONT BINARY SEARCH.
      WRITE:/ SY-VLINE NO-GAP, (10) WA-LIFNR NO-GAP,
              SY-VLINE NO-GAP, (35) WA-NAME1 NO-GAP,
              SY-VLINE NO-GAP, (10) I_BSEG-HKONT NO-GAP,
              SY-VLINE NO-GAP, (42) I_SKAT-TXT50 NO-GAP,
*** Changed By Samir On 18 Sep 08 (DEVK914685) ***
*             SY-VLINE NO-GAP, (07) WA-PRCTR NO-GAP,
              SY-VLINE NO-GAP, (07) I_BSEG-PRCTR NO-GAP,
*** End Of Changes By Samir On 18 Sep 08 ***
              SY-VLINE NO-GAP, (16) WA-XBLNR NO-GAP,        " CREDIT CARD NO.
              SY-VLINE NO-GAP, (10) WA-LAUFD NO-GAP,
              SY-VLINE NO-GAP, (08) WA-BLART NO-GAP,
              SY-VLINE NO-GAP, (10) WA-BLDAT NO-GAP,
              SY-VLINE NO-GAP, (16) WA-XBLNR1 NO-GAP.
      WRITE: SY-VLINE NO-GAP, (14) WA-DMBTR NO-GAP.
      WRITE: SY-VLINE.
    ELSE.
      LOOP AT I_BSEG WHERE BELNR = WA-BELNR AND GJAHR = WA-GJAHR .
        PERFORM F_COLOR.
        READ TABLE I_SKAT WITH KEY SAKNR = I_BSEG-HKONT BINARY SEARCH.
        WRITE:/ SY-VLINE NO-GAP, (10) WA-LIFNR NO-GAP,
                SY-VLINE NO-GAP, (35) WA-NAME1 NO-GAP,
                SY-VLINE NO-GAP, (10) I_BSEG-HKONT NO-GAP,
                SY-VLINE NO-GAP, (42) I_SKAT-TXT50 NO-GAP,
*** Changed By Samir On 17 Sep 08 (DEVK914671) ***
*               SY-VLINE NO-GAP, (07) WA-PRCTR NO-GAP,
                SY-VLINE NO-GAP, (07) I_BSEG-PRCTR NO-GAP,
*** End Of Changes By Samir On 17 Sep 08 ***
                SY-VLINE NO-GAP, (16) WA-XBLNR NO-GAP,     " CREDIT CARD NO.
                SY-VLINE NO-GAP, (10) WA-LAUFD NO-GAP,
                SY-VLINE NO-GAP, (08) WA-BLART NO-GAP,
                SY-VLINE NO-GAP, (10) WA-BLDAT NO-GAP,
                SY-VLINE NO-GAP, (16) WA-XBLNR1 NO-GAP.
        WRITE: SY-VLINE NO-GAP, (14) I_BSEG-DMBTR NO-GAP.
        WRITE: SY-VLINE.
      ENDLOOP.                                 "End   for I_BSEG loop
    ENDIF.                                     "Endif for I_PAYR-KTOKK = 'Z001'
ENDIF.                                       "Endif for g_detail = 'X'.
ENDFORM.                    " WRITE
*&      Form WRITE_DATA_PROFIT_NEW
*       text
* --> p1        text
* <-- p2        text
FORM WRITE_DATA_PROFIT_NEW .
REFRESH I_BSEG_COPY.
CLEAR I_BSEG_COPY.
* DATA I_BSEG_COPY LIKE I_BSEG OCCURS 0 WITH HEADER LINE.
* I_BSEG_COPY[] = I_BSEG[].
LOOP AT I_BSEG.
    MOVE-CORRESPONDING I_BSEG TO I_BSEG_COPY.
    APPEND I_BSEG_COPY.
    CLEAR I_BSEG_COPY.
ENDLOOP.
LOOP AT I_BSEG_COPY.
    READ TABLE I_BSAK_PRCTR WITH KEY BELNR = I_BSEG_COPY-BELNR GJAHR = I_BSEG_COPY-GJAHR ."HKONT = I_BSEG_COPY-HKONT.
    IF SY-SUBRC = 0.
      I_BSEG_COPY-LIFNR = I_BSAK_PRCTR-LIFNR.
      I_BSEG_COPY-XBLNR = I_BSAK_PRCTR-XBLNR.
      I_BSEG_COPY-NAME1 = I_BSAK_PRCTR-NAME1.
      I_BSEG_COPY-AUGDT = I_BSAK_PRCTR-AUGDT.
      I_BSEG_COPY-AUGBL = I_BSAK_PRCTR-AUGBL.
      I_BSEG_COPY-XBLNR1 = I_BSAK_PRCTR-XBLNR1.
      I_BSEG_COPY-BLDAT = I_BSAK_PRCTR-BLDAT.
      I_BSEG_COPY-BLART = I_BSAK_PRCTR-BLART.
      MODIFY I_BSEG_COPY TRANSPORTING LIFNR XBLNR NAME1 AUGDT AUGBL XBLNR1 BLDAT BLART.
    ENDIF.
ENDLOOP.
SORT I_BSAK_PRCTR BY PRCTR BELNR.
SORT I_BSEG BY BELNR.
SORT I_BSEG_COPY BY PRCTR.
DATA COUNT TYPE I.
DATA G_BELNR LIKE BSAK-BELNR.
LOOP AT I_BSEG_COPY.
    CLEAR G_BELNR.
    G_BELNR = I_BSEG_COPY-BELNR.
    COUNT = COUNT + 1.
    READ TABLE I_BSAK WITH KEY BELNR = I_BSEG_COPY-BELNR.
    IF SY-SUBRC <> 0.
      DELETE I_BSEG_COPY WHERE BELNR = G_BELNR."INDEX count.
    ENDIF.
ENDLOOP.
* LOOP AT I_BSAK_PRCTR.
LOOP AT I_BSEG_COPY.
    CLEAR WA.
    MOVE-CORRESPONDING I_BSEG_COPY TO WA.
    PERFORM WRITE_PRCTR.
    AT END OF PRCTR.                           "Profit center sub Total
      IF G_SORTP EQ 'X'.
        SUM.
        IF G_DETAIL EQ 'X'. ULINE. ENDIF.
        FORMAT COLOR COL_TOTAL INTENSIFIED ON.
        WRITE:/ SY-VLINE NO-GAP,(20) 'Profit Center Total:', I_BSEG_COPY-PRCTR.
        WRITE: 110 SY-VLINE NO-GAP,(79) I_BSEG_COPY-DMBTR NO-GAP
                                         CURRENCY 'USD',SY-VLINE.
        ULINE.
      ENDIF.
    ENDAT.                                     "End of Vendor Total
**** Grand total
    AT LAST.                                   "Grand total
      SUM.
      FORMAT COLOR COL_TOTAL INTENSIFIED OFF.
      WRITE:/ SY-VLINE NO-GAP,(107) 'Grand Total:',
              SY-VLINE NO-GAP,(79) I_BSEG_COPY-DMBTR NO-GAP
                                     CURRENCY 'USD', SY-VLINE.
      ULINE.
    ENDAT.
ENDLOOP.                                     "End for I_BSAK_LIFNR loop
*ENDFORM.                    " WRITE_DATA_VENDOR
ENDFORM.                    " WRITE_DATA_PROFIT_NEW
*&      Form WRITE_PRCTR
*       text
* --> p1        text
* <-- p2        text
FORM WRITE_PRCTR .
IF G_DETAIL = 'X'.
    IF WA-KTOKK = 'Z001'.                   " For HR Vendors
      PERFORM F_COLOR.
*      READ TABLE I_BSEG WITH KEY BELNR = WA-BELNR GJAHR = WA-GJAHR PRCTR = WA-PRCTR BINARY SEARCH .
      READ TABLE I_SKAT WITH KEY SAKNR = WA-HKONT BINARY SEARCH.
      WRITE:/ SY-VLINE NO-GAP, (10) WA-LIFNR NO-GAP,
              SY-VLINE NO-GAP, (35) WA-NAME1 NO-GAP,
              SY-VLINE NO-GAP, (10) WA-HKONT NO-GAP,
              SY-VLINE NO-GAP, (42) I_SKAT-TXT50 NO-GAP,
*** Changed By Samir On 18 Sep 08 (DEVK914685) ***
              SY-VLINE NO-GAP, (07) WA-PRCTR NO-GAP,
*             SY-VLINE NO-GAP, (07) I_BSEG-PRCTR NO-GAP,
*** End Of Changes By Samir On 18 Sep 08 ***
              SY-VLINE NO-GAP, (16) WA-XBLNR NO-GAP,        " CREDIT CARD NO.
              SY-VLINE NO-GAP, (10) WA-LAUFD NO-GAP,
              SY-VLINE NO-GAP, (08) WA-BLART NO-GAP,
              SY-VLINE NO-GAP, (10) WA-BLDAT NO-GAP,
              SY-VLINE NO-GAP, (16) WA-XBLNR1 NO-GAP.
      WRITE: SY-VLINE NO-GAP, (14) WA-DMBTR NO-GAP.
      WRITE: SY-VLINE.
    ELSE.
*      LOOP AT I_BSEG WHERE BELNR = WA-BELNR AND GJAHR = WA-GJAHR AND PRCTR = WA-PRCTR .
      PERFORM F_COLOR.
      READ TABLE I_SKAT WITH KEY SAKNR = WA-HKONT BINARY SEARCH.
      WRITE:/ SY-VLINE NO-GAP, (10) WA-LIFNR NO-GAP,
              SY-VLINE NO-GAP, (35) WA-NAME1 NO-GAP,
              SY-VLINE NO-GAP, (10) WA-HKONT NO-GAP,
              SY-VLINE NO-GAP, (42) I_SKAT-TXT50 NO-GAP,
*** Changed By Samir On 17 Sep 08 (DEVK914671) ***
             SY-VLINE NO-GAP, (07) WA-PRCTR NO-GAP,
*              SY-VLINE NO-GAP, (07) I_BSEG-PRCTR NO-GAP,
*** End Of Changes By Samir On 17 Sep 08 ***
              SY-VLINE NO-GAP, (16) WA-XBLNR NO-GAP,     " CREDIT CARD NO.
              SY-VLINE NO-GAP, (10) WA-LAUFD NO-GAP,
              SY-VLINE NO-GAP, (08) WA-BLART NO-GAP,
              SY-VLINE NO-GAP, (10) WA-BLDAT NO-GAP,
              SY-VLINE NO-GAP, (16) WA-XBLNR1 NO-GAP.
      WRITE: SY-VLINE NO-GAP, (14) WA-DMBTR NO-GAP.
      WRITE: SY-VLINE.
*      ENDLOOP.                                 "End   for I_BSEG loop
    ENDIF.                                     "Endif for I_PAYR-KTOKK = 'Z001'
ENDIF.                                       "Endif for g_detail = 'X'.
ENDFORM.                    " WRITE_PRCTR
Thanks in advance
Raj.

Ralph,
Thanks for the reply.
I have marked the sql statement in the code that is taking long time to run but Its my mistake not explaining the same in the description.
When I was debugging the code the below sql statement was taking long time.
IF NOT I_BSAK_INIT[] IS INITIAL.
   SELECT LIFNR AUGDT AUGBL GJAHR BELNR CPUDT BLDAT XBLNR
           BLART SHKZG DMBTR AUGGJ
              FROM BSAK
              INTO CORRESPONDING FIELDS OF TABLE I_BSAK
              FOR ALL ENTRIES IN I_BSAK_INIT
              WHERE BUKRS = C_BUKRS AND
              AUGBL = I_BSAK_INIT-VBLNR AND
              XZAHL <> 'X'.
ENDIF.
Any suggestions on the code?
Regards,
Raj.

Every 3rd data package taking long time for execution

Hi Everyone
We are facing a strange situation. Our scenario involves doing a full load from DSO to CUBE.
Start routines are not very database intensive and care has been taken to write them in a optimized way.
But strangely every 3rd data package is taking exceptionally longer time than other data packages.
a) DTP is having 3 parallal processes.
b)time spent in extraction , rule, and updation is constant for every data package.
c)start routine time is larger for every 3rd data package and keeps on increasing. for e.g. 5 mins, 10 mins, 24 mins, 33 mins etc it increases by each 3rd package.
I tried to anlayze the data which was taking so much time but found no difference in terms of data in normal and longer time taking DTP (i.e. there was not logical difference in data for start routine to behave like this).
I was wondering what can be the possible reasons for it and may be some other external system factors can be responsible for it. If someone can help in this regard that will be highly appreciated.

Hi Hemanth,
In your start routine, are you by any chance adding or multiplying the number of records to the source_package? Something like copy source package into an internal table, add records to internal table and then copy it back to source package? If some logic of this sorts is in your start routine, you need to refresh your internal table. Otherwise, the internal table records goes on increasing with every data package. So, the processing time might increase as the load progresses. This is one common mistake I have seen. Please check your code if you have something like that and refresh the internal tables. See if this makes any difference.
Thanks and Regards
Subray Hegde

Data form taking long time to load

Hi All,
My data form is taking a very long time to load. It has period dimension which is having 53 weeks. If I collase Period dimension then the dataform opens up quickly otherwise its taking a very long time (around 7 mins) to open up.
What can be done to improve the speed?
Thanks

Abhishek wrote:
Hope this helps
Improving data form performance
So do I :)
Cheers
John
http://john-goodwin.blogspot.com/

Some Master and transaction loads taking long time in R/3 extraction andBW

Hi Experts,
We have some Master and transaction loads which takes long time in source system(R/3) in BW as well in daily process chains.These loads are happening in daily basis.
In Extraction ,they takes long duration to finish.
And then BW also takes much time.....
So pls give some suggestions ,by which we can reduce this duration....
And what can we do improve these loads perfomances......
your small suggestion can improve loads performance......
thanx in advance.....

hi naveen,
go back and have a look at ur infopackage .. for the no of data packets it is picking up for each time ....
this can be done by going to scheduler in the menu and u can find the no of data packets and the size as well....
hope this works ...
snigdha >>>

Query taking long time for EXTRACTING the data more than 24 hours

Hi ,
Query taking long time for EXTRACTING the data more than 24 hours please find the query and explain plan details below even indexes avilable on table's goe's to FULL TABLE SCAN. please suggest me.......
SQL> explain plan for select a.account_id,round(a.account_balance,2) account_balance,
2 nvl(ah.invoice_id,ah.adjustment_id) transaction_id,
to_char(ah.effective_start_date,'DD-MON-YYYY') transaction_date,
to_char(nvl(i.payment_due_date,
to_date('30-12-9999','dd-mm-yyyy')),'DD-MON-YYYY')
due_date, ah.current_balance-ah.previous_balance amount,
decode(ah.invoice_id,null,'A','I') transaction_type
3 4 5 6 7 8 from account a,account_history ah,invoice i_+
where a.account_id=ah.account_id
and a.account_type_id=1000002
and round(a.account_balance,2) > 0
and (ah.invoice_id is not null or ah.adjustment_id is not null)
and ah.CURRENT_BALANCE > ah.previous_balance
and ah.invoice_id=i.invoice_id(+)
AND a.account_balance > 0
order by a.account_id,ah.effective_start_date desc; 9 10 11 12 13 14 15 16
Explained.
SQL> select * from table(dbms_xplan.display);
PLAN_TABLE_OUTPUT
| Id | Operation | Name | Rows | Bytes |TempSpc| Cost (%CPU)|
| 0 | SELECT STATEMENT | | 544K| 30M| | 693K (20)|
| 1 | SORT ORDER BY | | 544K| 30M| 75M| 693K (20)|
|* 2 | HASH JOIN | | 544K| 30M| | 689K (20)|
|* 3 | TABLE ACCESS FULL | ACCOUNT | 20080 | 294K| | 6220 (18)|
|* 4 | HASH JOIN OUTER | | 131M| 5532M| 5155M| 678K (20)|
|* 5 | TABLE ACCESS FULL| ACCOUNT_HISTORY | 131M| 3646M| | 197K (25)|
| 6 | TABLE ACCESS FULL| INVOICE | 262M| 3758M| | 306K (18)|
Predicate Information (identified by operation id):
2 - access("A"."ACCOUNT_ID"="AH"."ACCOUNT_ID")
3 - filter("A"."ACCOUNT_TYPE_ID"=1000002 AND "A"."ACCOUNT_BALANCE">0 AND
ROUND("A"."ACCOUNT_BALANCE",2)>0)
4 - access("AH"."INVOICE_ID"="I"."INVOICE_ID"(+))
5 - filter("AH"."CURRENT_BALANCE">"AH"."PREVIOUS_BALANCE" AND ("AH"."INVOICE_ID"
IS NOT NULL OR "AH"."ADJUSTMENT_ID" IS NOT NULL))
22 rows selected.
Index Details:+_
SQL> select INDEX_OWNER,INDEX_NAME,COLUMN_NAME,TABLE_NAME from dba_ind_columns where
2 table_name in ('INVOICE','ACCOUNT','ACCOUNT_HISTORY') order by 4;
INDEX_OWNER INDEX_NAME COLUMN_NAME TABLE_NAME
OPS$SVM_SRV4 P_ACCOUNT ACCOUNT_ID ACCOUNT
OPS$SVM_SRV4 U_ACCOUNT_NAME ACCOUNT_NAME ACCOUNT
OPS$SVM_SRV4 U_ACCOUNT CUSTOMER_NODE_ID ACCOUNT
OPS$SVM_SRV4 U_ACCOUNT ACCOUNT_TYPE_ID ACCOUNT
OPS$SVM_SRV4 I_ACCOUNT_ACCOUNT_TYPE ACCOUNT_TYPE_ID ACCOUNT
OPS$SVM_SRV4 I_ACCOUNT_INVOICE INVOICE_ID ACCOUNT
OPS$SVM_SRV4 I_ACCOUNT_PREVIOUS_INVOICE PREVIOUS_INVOICE_ID ACCOUNT
OPS$SVM_SRV4 U_ACCOUNT_NAME_ID ACCOUNT_NAME ACCOUNT
OPS$SVM_SRV4 U_ACCOUNT_NAME_ID ACCOUNT_ID ACCOUNT
OPS$SVM_SRV4 I_LAST_MODIFIED_ACCOUNT LAST_MODIFIED ACCOUNT
OPS$SVM_SRV4 I_ACCOUNT_INVOICE_ACCOUNT INVOICE_ACCOUNT_ID ACCOUNT
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_ACCOUNT ACCOUNT_ID ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_ACCOUNT SEQNR ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_INVOICE INVOICE_ID ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_ADINV INVOICE_ID ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_CIA CURRENT_BALANCE ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_CIA INVOICE_ID ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_CIA ADJUSTMENT_ID ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_CIA ACCOUNT_ID ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_LMOD LAST_MODIFIED ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_ADINV ADJUSTMENT_ID ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_PAYMENT PAYMENT_ID ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_ADJUSTMENT ADJUSTMENT_ID ACCOUNT_HISTORY
OPS$SVM_SRV4 I_ACCOUNT_HISTORY_APPLIED_DT APPLIED_DATE ACCOUNT_HISTORY
OPS$SVM_SRV4 P_INVOICE INVOICE_ID INVOICE
OPS$SVM_SRV4 U_INVOICE CUSTOMER_INVOICE_STR INVOICE
OPS$SVM_SRV4 I_LAST_MODIFIED_INVOICE LAST_MODIFIED INVOICE
OPS$SVM_SRV4 U_INVOICE_ACCOUNT ACCOUNT_ID INVOICE
OPS$SVM_SRV4 U_INVOICE_ACCOUNT BILL_RUN_ID INVOICE
OPS$SVM_SRV4 I_INVOICE_BILL_RUN BILL_RUN_ID INVOICE
OPS$SVM_SRV4 I_INVOICE_INVOICE_TYPE INVOICE_TYPE_ID INVOICE
OPS$SVM_SRV4 I_INVOICE_CUSTOMER_NODE CUSTOMER_NODE_ID INVOICE
32 rows selected.
Regards,
Bathula
Oracle-DBA

I have some suggestions. But first, you realize that you have some redundant indexes, right? You have an index on account(account_name) and also account(account_name, account_id), and also account_history(invoice_id) and account_history(invoice_id, adjustment_id). No matter, I will suggest some new composite indexes.
Also, you do not need two lines for these conditions:
and round(a.account_balance, 2) > 0
AND a.account_balance > 0
You can just use: and a.account_balance >= 0.005
So the formatted query isselect a.account_id,
       round(a.account_balance, 2) account_balance,
       nvl(ah.invoice_id, ah.adjustment_id) transaction_id,
       to_char(ah.effective_start_date, 'DD-MON-YYYY') transaction_date,
       to_char(nvl(i.payment_due_date, to_date('30-12-9999', 'dd-mm-yyyy')),
               'DD-MON-YYYY') due_date,
       ah.current_balance - ah.previous_balance amount,
       decode(ah.invoice_id, null, 'A', 'I') transaction_type
from account a, account_history ah, invoice i
where a.account_id = ah.account_id
   and a.account_type_id = 1000002
   and (ah.invoice_id is not null or ah.adjustment_id is not null)
   and ah.CURRENT_BALANCE > ah.previous_balance
   and ah.invoice_id = i.invoice_id(+)
   AND a.account_balance >= .005
order by a.account_id, ah.effective_start_date desc;You will probably want to select:
1. From ACCOUNT first (your smaller table), for which you supply a literal on account_type_id. That should limit the accounts retrieved from ACCOUNT_HISTORY
2. From ACCOUNT_HISTORY. We want to limit the records as much as possible on this table because of the outer join.
3. INVOICE we want to access last because it seems to be least restricted, it is the biggest, and it has the outer join condition so it will manufacture rows to match as many rows as come back from account_history.
Try the query above after creating the following composite indexes. The order of the columns is important:create index account_composite_i on account(account_type_id, account_balance, account_id);
create index acct_history_comp_i on account_history(account_id, invoice_id, adjustment_id, current_balance, previous_balance, effective_start_date);
create index invoice_composite_i on invoice(invoice_id, payment_due_date);All the columns used in the where clause will be indexed, in a logical order suited to the needs of the query. Plus each selected column is indexed as well so that we should not need to touch the tables at all to satisfy the query.
Try the query after creating these indexes.
A final suggestion is to try larger sort and hash area sizes and a manual workarea policy.alter session set workarea_size_policy = manual;
alter session set sort_area_size = 2147483647;
alter session set hash_area_size = 2147483647;

Hyperion System 9.3.1 reports taking longer time for the very first time

We are on Hyperion System 9.3.1. The Financial reports are taking longer time (like 2 to 3 minuter) for the very first time for each login. The subsequest reports are does work faster.
The behaviour is same for the Production and Development environments.
All the reporting services have given enough JVM heap size.
FYI, Reporting and Workspace runngin on the same server. Workspace/Reporting are clusted in two servers. HFM app is running on different server. HFM web is on different server. Shared Services is also on running on different server.
Any help would be greately appreciated.
Thanks.

The reason they run quicker the subsequent times, is because the data has already been cached in the system.
You could try the usual tricks to speed the report up:
- move items into POV
- have children and parent in the same row
- arrange dimensions in inverse outline order
- remove excessive formatting
- push report calculations back to the data source
We have found that using lots of dynamically calculated members also slows down reports, so try and limit the number of these.
Hope this helps. If not maybe give us an idea of how the report is created to see if other changes could be made.

Impdp taking long time for only few MBs data...

Hi All,
I have one query related to impdp. I have one expdp file and size is 47M. When I restore this dmp using impdp it will take more time. Also initially table_data loaded finsih very fast but then later on alter function/procedure/view taking a lot time almost 4 to 5 hrs.
I have no idea why its taking long time... Earlier I can see one DB link is failed and it given error for "TNS name could not resolved" so I create DB link also before run impdp but the same result. Can any one suggest what could be the cause to taking long time for only 47MB data?
Note - Both expdp and impdp database version is 11.2.0.3.0. If I import the same dmp file into 11.2.0.1.0 then its done in few mins.
Thanks...

Also Read
Checklist For Slow Performance Of DataPump Export (expdp) And Import (impdp) [ID 453895.1]
DataPump Import (IMPDP) is Very Slow at Object/System/Role Grants, Default Roles [ID 1267951.1]

Process Chain taking long time in loading data in infocube

Dear Expert,
We are loading data thru PC in AR cube it takes data frm
PSA-> DSO->Activation->Index Deletion->DTP(load infocube)->IndexCreation->Create Aggregates.
In Index creation everyday its taking long time around 9 to 10 hrs to create it
when we go in RSRV and repair the infocube thr loading of data happens fast. We are doing it(RSRV) everyday. In DB02 we have seen dat 96% tablespace is used.
Please tell permanent solution.
Please suggest its BI Issue or Basis.
Regards,
Ankit

Hi ,
We are loading data thru PC in AR cube it takes data frm
PSA-> DSO->Activation->Index Deletion->DTP(load infocube)->IndexCreation->Create Aggregates.
In the above steps insted of Create Aggregates it should be Roll up Process of aggregates.
You can ask the basis team to check the Table space in the transaction db02old/db02.
Check if there is long running job in SM66/SM50 kill that job.
check there should be enough Batch process to perform the steps.
Hope this helps.
"Assigning points is the ways to say thanks on SDN".
Br
Alok

Background job is running for long tome in source system (ECC)

Hi All,
Background job is running for long tome in source system (ECC) while extracting data to PSA.
I checked in ECC system SM66,SM50 the job is still running
in SM37 the job is Active
There are only maximum 7000 records the extractor is 2LIS_02_ITM but it is taking 11 to 13 hours to load to PSA daily
I had checked enhancements every thing is correct.
Please help me on this how can I solve this issue.
Regards
Supraja K

Hi sudhi,
The difference between Call customer enhancement... and Result of customer enhancement:... is very less we can say this as a second.
The difference is between LUWs confirmed and 1 LUWs -
   and Call customer enhancement -
Please find the job log details below, and give me the solution to ressolve this
01:06:43 ***01:06:43 * ztta/roll_extension........... 2000000000                              *                 R8           050
                 R8           048
01:06:43 1 LUWs confirmed and 1 LUWs to be deleted with function module RSC2_QOUT_CONFIRM_DATA     RSQU          036
06:56:31 Call customer enhancement BW_BTE_CALL_BW204010_E (BTE) with 5.208 records                  R3           407
06:56:31 Result of customer enhancement: 5.208 records                                              R3           408
06:56:31 Call customer enhancement EXIT_SAPLRSAP_001 (CMOD) with 5.208 records                      R3           407
06:56:31 Result of customer enhancement: 5.208 records                                              R3           408
06:56:31 PSA=1 USING SMQS SCHEDULER / IF [tRFC=ON] STARTING qRFC ELSE STARTING SAPI                 R3           299
06:56:31 Synchronous send of data package 1 (0 parallel tasks)                                      R3           410
06:56:32 tRFC: Data Package = 0, TID = , Duration = 00:00:00, ARFCSTATE =                           R3           038
06:56:32 tRFC: Start = 00.00.0000 00:00:00, End = 00.00.0000 00:00:00                               R3           039
06:56:32 Synchronized transmission of info IDoc 3 (0 parallel tasks)                                R3           414
06:56:32 IDOC: Info IDoc 3, IDoc No. 1549822, Duration 00:00:00                                     R3           088
06:56:32 IDoc: Start = 04.10.2011 06:56:32, End = 04.10.2011 06:56:32                               R3           089
06:56:32 Altogether, 0 records were filtered out through selection conditions                      RSQU          037
06:56:32 Synchronized transmission of info IDoc 4 (0 parallel tasks)                                R3           414
06:56:32 IDOC: Info IDoc 4, IDoc No. 1549823, Duration 00:00:00                                     R3           088
06:56:32 IDoc: Start = 04.10.2011 06:56:32, End = 04.10.2011 06:56:32                               R3           089
06:56:32 Job finished                                                                               00           517
Regards
Supraja

SSRS Reports taking long time to load

Hello,
Problem : SSRS Reports taking long time to load
My System environment : Visual Studio 2008 SP1 and SQL Server 2008 R2
Production Environment : Visual Studio 2008 SP1 and SQL Server 2008 R2
I have created a Parameterized report (6 parameters), it will fetch data from 1 table. table has 1 year and 6 months data,      I am selecting parameters for only 1 month (about 2500 records). It is taking almost 2 minutes and 30 seconds
to load the report.
This report running efficiently in my system (report load takes only 5 to 6 seconds) but in
production it is taking 2 minutes 30 seconds.
I have checked the Execution log from production so I found the timing for
Data retrieval (approx~)    Processing (approx~)           Rendering (approx~)
10 second                                  15 sec
        2 mins and 5 sec.
But Confusing point is that , if I run the same report at different time overall output time is same (approx) 2 min 30 sec but
Data retrieval (approx~)       Processing (approx~)                Rendering (approx~)
more than 1 min                            15 sec
more than 1 min
so 1 question why timings are different ?
My doubts are
1) If query(procedure to retrieve the data) is the problem then it should take more time always,
2) If Report structure is problem then rendering will also take same time (long time)
for this (2nd point) I checked on blog that Rendering depends on environment structure e.g. Network bandwidth, RAM, CPU Usage , Number of users accessing same report at a time.
So I did testing of report when no other user working on any report But failed (same result output is 2 min 30 sec)
From network team I got the result is that there is no issue or overload in CPU usage or RAM also No issue in Network bandwidth.
Production Database Server and Report server are different (but in same network).
I checked that database server the SQL Server is using almost Full RAM (23 GB out of 24 GB)
I tried to allocate the memory to less amount up to 2GB (Trial solution I got from Blogs) but this on also failed.
one hint I got from colleague that , change the allocated memory setting from static memory to dynamic to SQL Server
(I guess above point is the same) I could not find that option Static and Dynamic memory setting.
I did below steps
Connected to SQL Server Instance
Right click on Instance go to properties, Go to Memory Tab
I found three options 1) Server Memory   2) Other memory   3) Section for "Configured values and Running values"
Then I tried to reduce Maximum Server memory up to 2 GB (As mentioned above)
All trials failed, this issue I could not find the roots for this issue.
Can anyone please help (it's bit urgent).

Hi UdayKGR,
According to your description, your report takes too long to load on your production environment. Right?
In this scenario, since the report runs quickly in developing environment, we initially think it supposed to be the issue on data retrieval. However, based on the information in execution log, it takes longest time on rendering part. So we suggest you optimize
the report itself to reduce the time for rendering. Please refer to the link below:
My report takes too long to render
Here is another article about overall performance optimization for Reporting Services:
Reporting Services Performance and Optimization
If you have any question, please feel free to ask.
Best Regards,
Simon Hou

Sales order creation, standard event trigger is taking long time .

We have a requirement where we are sending data to CRM system using RFC function module. This data is sent while sales order creation or change. We have used standard event BUS2032.CREATED to trigger CRM FM in sales order creation mode. In sales order change mode, we are using custom event. In production system, our custom change event is getting triggered fine and data is sent to CRM system with small time lag of around 1 minute. But, while sales order creation, standard event trigger is taking long time ( sometimes about 20 minutes) in production system.
We tried triggering same custom event at the time of sales order creation using FM u2018SWE_EVENT_CREATE_IN_UPD_TASKu2019 as well but, still we are not able to improve performance of the event trigger at sales order creation.
Regards,
Sushee Joshi

HI,
we have written SWE_EVENT_CREATE in update task
I think instead of calling in update task simply call to function module CALL FUNCTION "SWE_EVENT_CREATE" might trigger the event immediately.. Did you try to check in this way..
OR
And I also suggest you to check the entry in SWE2 txn with respect to your workflow tempalte, may be you have enable the option ENABLE EVENT QUEUE, this could be one of the reasons.. If it is enabled please disable it (uncheck)
Please check..
Regards
Pavan

Interactive Report general Search is taking long time

Hi All,
I have two IR reports in my Application, Both are using same tables , same where clause, displaying column is different.
Both query returning 60000 records, In my first report , after my report gets loaded , i am using the general search button for getting some data,
when i try to find 100 in my reports , my first report displaying the search result in 5 seconds, But my second report i am doing the same steps , but its taking long time to respond.
Could some one tell me what is the cause for this problem also in what basis this search will work means how this will work?
Cheers,
San

Hi Mike,
You are right test is the View
After i enabled the debug i found the below query
Report 1 Query
SELECT "Checkbox",
"RS_TRX_NUMBER",
"EXT_TRX_NUMBER",
"ARRANGEMENT_NUMBER",
"TRX_DATE",
"TRX_STATUS",
"SOLD_TO_CUSTOMER_NAME",
"TRX_TYPE",
"CURRENCY",
"COMMITTED_AMOUNT",
"BUDGET_AMOUNT",
"TRANSACTION_BUDGET",
"TRX_DESCRIPTION",
"FILES",
"Lines",
"Events",
"TRX_Revenue",
"ARGMT_Revenue",
"Holds",
"RS_TRX_ID",
COUNT(DISTINCT "ARRANGEMENT_NUMBER") over (),
COUNT(*) over () AS apxws_row_cnt
FROM
(SELECT *
FROM
    (SELECT a.* ,
      'Events' "Events" ,
      'Billing' "Billing" ,
      'Transaction Revenue' "TRX_Revenue" ,
      'Arrangement Revenue' "ARGMT_Revenue" ,
      'Lines' "Lines" ,
      'Invoice' "Invoice" ,
      'Holds' "Holds" ,
      apex_item.hidden ( 2, a.rs_trx_number)
      || apex_item.checkbox ( 1, a.rs_trx_id, 'onchange="spCheckChange(this, ''x01'', ''P13_TRX_AJAX_NAME'', ''P13_TRX_COLLECTION_NAME'',''SELECTED_TRX'');"', c.n001, ':' ) "Checkbox"
    FROM test a,
      apex_collections c
    WHERE a.rs_trx_id        = c.n001(+)
    AND c.collection_name(+) = :P13_TRX_COLLECTION_NAME
    AND a.org_id            IN
      (SELECT DISTINCT org_id
      FROM test1
      WHERE (role_name = :APPUSER_CURRENT_ROLE)
    ) r
) r
where rownum <= TO_NUMBER(:APXWS_MAX_ROW_CNT)
Second Report
SELECT "Checkbox",
"EXT_TRX_NUMBER",
"RS_TRX_NUMBER",
"ARRANGEMENT_NUMBER",
"TRX_RM_STATUS",
"SOLD_TO_CUSTOMER_NAME",
"TRX_TYPE",
"TRX_DESCRIPTION",
"CURRENCY",
"COMMITTED_AMOUNT",
"UNEARNED",
"EARNED",
"REV_TRANSFERRED",
"REV_LINES",
"SCHEDULES",
"EVENTS",
"EXT_TRX_ID",
"PRIMARY_SALESREP_NUMBER",
"RS_TRX_ID",
COUNT(*) over () AS apxws_row_cnt
FROM
(SELECT *
FROM
    (SELECT a.* ,
      'Rev Lines' REV_LINES ,
      'Schedules' Schedules ,
      'Events' Events ,
      apex_item.hidden ( 2, a.rs_trx_number)
      || apex_item.checkbox ( 1, a.rs_trx_id, 'onchange="spCheckChange(this, ''x01'', ''P5_REV_TRX_AJAX_NAME'', ''P5_RTCN'',''SELECTED_REV_TRX'');"', c.n001, ':' ) "Checkbox"
    FROM Test a,
      apex_collections c
    WHERE a.rs_trx_id        = c.n001(+)
    AND C.COLLECTION_NAME(+) = :P5_RTCN
    AND a.org_id            IN
      (SELECT DISTINCT org_id
      FROM Test1
      WHERE (role_name = :APPUSER_CURRENT_ROLE)
    ) r
) r
WHERE rownum <= to_number(:APXWS_MAX_ROW_CNT)
ORDER BY "ARRANGEMENT_NUMBER" DESC,
"EXT_TRX_NUMBER"
In Source i am using the same query in both report , But how come order by clause has been adding in my Second query.
Also in Report 1 :
COUNT(DISTINCT "ARRANGEMENT_NUMBER") over (),
COUNT(*) over () AS apxws_row_cnt
The same is not there in Second report query .
How can i remove that order by clause from my id also how can i resolve the above change (
COUNT(DISTINCT "ARRANGEMENT_NUMBER") over (),
COUNT(*) over () AS apxws_row_cnt)
Help me out to resolve.
Cheers,
San

Data extraction taking long time in source system.

Similar Messages

Maybe you are looking for