The Performance issues OF a simple HR report

Question

hi all，this is a part of my report,and this report always got a runtime error 'time out',
it stoped at the function text-split.
employee: 5000 records
selected bank (GT_BNKA) :2000 records
I think that the error occurred because it runs so many times of that function,
Does this function will take a long time?
help,Give me suggestions please，thanks！
Edited by: richard zokii on Apr 5, 2010 7:24 AM

Answer 1

INFOTYPES : 0002,                                
0009.                               
TABLES    : PERNR.                            
NODES     : PERAS.
START-OF-SELECTION.
  SELECT *                                    
    FROM BNKA INTO CORRESPONDING FIELDS OF TABLE GT_BNKA
                     WHERE BANKL IN SO_CODE
                       AND LOEVM = GC_X
                       AND BANKS = GC_JP.
    PN-ENDDA = GC_ENDDA.                          
GET PERAS.
LOOP AT GT_BNKA INTO GS_BNKA.                      
  GS_LIST_BNKA-BANKL = GS_BNKA-BANKL.            
  PERFORM TEXT-SPLIT USING    GS_BNKA-BANKA       
                              GC_LENGTH_40
                     CHANGING GS_LIST_BNKA-BANKA.
  GS_LIST_BNKA-BRNCH = GS_BNKA-BRNCH.        
  LOOP AT P0009 INTO GS_0009                
            WHERE BANKL = GS_BNKA-BANKL
              AND BEGDA <= PN-ENDDA
              AND ENDDA >= PN-BEGDA.
    GS_LIST_BNKA-SUBTY = GS_0009-SUBTY.           
    GS_LIST_BNKA-BEGDA = GS_0009-BEGDA.           
    GS_LIST_BNKA-ENDDA = GS_0009-ENDDA.            
    LOOP AT P0002 INTO GS_0002.             
      GS_LIST_BNKA-PERNR = GS_0002-PERNR.       
      PERFORM TEXT-SPLIT USING    GS_0002-NACHN    
                                  GC_LENGTH_20
                         CHANGING GS_LIST_BNKA-NACHN.
      PERFORM TEXT-SPLIT USING    GS_0002-VORNA     
                                  GC_LENGTH_20
                         CHANGING GS_LIST_BNKA-VORNA.
      APPEND GS_LIST_BNKA TO GT_LIST_BNKA.
      CLEAR GS_0002.
    ENDLOOP.
    CLEAR GS_0009.
    GV_TOTAL = GV_TOTAL + 1.                   
  ENDLOOP.
  CLEAR GS_BNKA.
ENDLOOP.
*&      Form  TEXT-SPLIT
FORM TEXT-SPLIT  USING    IV_TEXT
                          IV_LENGTH
                 CHANGING EV_TEXT.
CALL FUNCTION 'TEXT_SPLIT'
  EXPORTING
    LENGTH             = IV_LENGTH
    TEXT               = IV_TEXT
*   AS_CHARACTER       =
  IMPORTING
    LINE               = EV_TEXT.
*   REST               =.
ENDFORM.                    " TEXT-SPLIT