RPUAUDOO IT Log Reoprt

Question

Hi All....
When we run this report for infotype 0759 it will display all the changes made to this infotype in the output.
Here our requirement is when we run this report, I should get only active status of records (PA0759-CSTAT = 5) from that infotype.
What we have done for this is In this report there is an INCLUDE RPUAUDFR.
In this include we have a subroutine  PERFORM add_pcl4 USING '000000' CHANGING dummy.
In this subroutine, before appending the data to LCL4 I have written the following code.
TABLES: p0759.
  DATA: cstat TYPE p0759-cstat,
       l_pernr TYPE prelp-pernr,
       l_subrc TYPE sy-subrc,
        l_flg TYPE c.
  DATA: it_0759 TYPE TABLE OF p0759 WITH HEADER LINE.
IF lcl4-infty EQ '0759'.
    REFRESH  it_0759.
    l_pernr = lcl4-pernr.
    CALL FUNCTION 'HR_READ_INFOTYPE'
      EXPORTING
      TCLAS                 = 'A'
        pernr                 = l_pernr
        infty                 = '0759'
        begda                 = '18000101'
        endda                 = '99991231'
    BYPASS_BUFFER         = ' '
    LEGACY_MODE           = ' '
   IMPORTING
     subrc                  = l_subrc
      TABLES
        infty_tab             = it_0759
     EXCEPTIONS
       infty_not_found       = 1
       OTHERS                = 2.
IF l_subrc EQ 0.
      CLEAR l_flg.
      LOOP AT it_0759 WHERE cstat <> '5'.
        l_flg = abap_true.
        EXIT.
      ENDLOOP.
  ENDIF.
  ENDIF.
  IF l_flg IS INITIAL.
    APPEND lcl4.
  ELSE.
  CLEAR lcl4.
  ENDIF.
But still we are getting all the records in the output.
Please check whether I have added the code in the correct place or not?
Please note that this is an interactive report. Once after getting the output, if we click on any of the pernr, there we can see the CSTAT field.
Thanks in advance

Answer 1

Why don't you simply remove the records that don't have an active status.. ie
delete it_0759 WHERE cstat ne '5'.
~Suresh