ABAP turka 2

Egyszer mar volt ilyen, de ez se rossz.
bal_t_msgh-ban van mondjuk 100 entry, az elso kb. 10-hez tartozik IT_BALHDR elso bejegyzese, a kovetkezo kb. 10-hez IT_BALHDR masodikja passzol es igy tovabb.

LOOP AT bal_t_msgh INTO balmsghndl.

AT NEW LOG_HANDLE.
WF_COUNTER = WF_COUNTER + '1'.
LOOP AT IT_BALHDR INTO WA_BALHDR.
IF SY-TABIX = WF_COUNTER.
MOVE WA_BALHDR-EXTNUMBER TO WF_EXTNUMBER.
EXIT.
ENDIF.
ENDLOOP.
ENDAT.

CALL FUNCTION 'BAL_LOG_MSG_READ'
EXPORTING
i_s_msg_handle = balmsghndl
IMPORTING
e_s_msg = bal_s_msg
E_TXT_MSGTY = dm_msgtyp
e_txt_msg = text.
* Only MsgType 'Error'
if dm_msgtyp = 'E'.
* Create ALV List
MOVE bal_s_msg-MSGTY TO WA_OUTTAB-MSGTY.
MOVE WF_EXTNUMBER TO WA_OUTTAB-EXTNUMBER.
MOVE balmsghndl-MSGNUMBER TO WA_OUTTAB-COUNTER.
MOVE WF_DATE3 TO WA_OUTTAB-DATE.
MOVE WF_TIME2 TO WA_OUTTAB-TIME.
MOVE TEXT TO WA_OUTTAB-TEXT.
APPEND WA_OUTTAB TO IT_OUTTAB.
endif.
ENDLOOP.