PO Version Log report....Urgent

Question

Hi Experts,
I have to create a PO version log report, which should display old values and  new values for each version of PO.
Values we can get using tables CDHDR and CDPOS but it table CDHDR is not saving version number. Version Number we can get from table EREV.
We can use FM CHANGEDOCUMENT_READ_HEADERS for ObjectID etc which takes values from cdhdr &
CHANGEDOCUMENT_READ_POSITIONS for old and new values whch takes values from cdpos.
But the problem is i am not getting how to match these tables to get exact values.
The code i have written using these FM is giving repeted values. means for each version it is giving same values, which is not right.
code is like ...
LOOP AT it_ekko where revno GE '00000001'.
    ebeln1     = it_ekko-ebeln.
    date_from  = p_chadt-low.
    date_until = p_chadt-high.
    REFRESH it_cdhdr.
    CALL FUNCTION 'CHANGEDOCUMENT_READ_HEADERS'
      EXPORTING
        ARCHIVE_HANDLE                   = 0
        date_of_change                   = date_from
        objectclass                      = 'EINKBELEG'
        objectid                         = ebeln1
        TIME_OF_CHANGE                   = '000000'
        username                         = ' '
        LOCAL_TIME                       = ' '
        date_until                       = date_until
        TIME_UNTIL                       = '235959'
        NOPLUS_ASWILDCARD_INOBJID        = ' '
      TABLES
        i_cdhdr                          = it_cdhdr
     EXCEPTIONS
        no_position_found                = 1
        wrong_access_to_archive          = 2
        time_zone_conversion_error       = 3
        OTHERS                           = 4.
    IF sy-subrc <> 0.
      CONTINUE.
    ENDIF.
    LOOP AT it_cdhdr WHERE username IN p_chaby."
      REFRESH it_cdred.
      CALL FUNCTION 'CHANGEDOCUMENT_READ_POSITIONS'
        EXPORTING
          ARCHIVE_HANDLE                = 0
          changenumber                  = it_cdhdr-changenr
        TABLES
          EDITPOS                       =
          editpos_with_header           = it_cdred
        EXCEPTIONS
          no_position_found             = 1
          wrong_access_to_archive       = 2
          OTHERS                        = 3
      IF sy-subrc <> 0.
        MESSAGE i001(319) WITH 'No change!'.
      ENDIF.
      LOOP AT it_cdred.
*------get vendor name in final table by passing vendor code.
        CALL FUNCTION 'MC_VENDOR_TEXT_SINGLE_READ'
          EXPORTING
            i_lifnr   = it_ekko-lifnr
          IMPORTING
            e_lifname = it_final-lifnr.
        CALL FUNCTION 'ZHZLMM_REASON_TEXT'
          EXPORTING
            i_rscod         = it_ekko-rscod
          IMPORTING
            E_TEXT          = it_final-rstxt
          EXCEPTIONS
            NOT_FOUND       = 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.
*------pass all values to final table to display in ALV
        MOVE-CORRESPONDING it_cdred TO it_final.
        it_final-revno    =  l_erev-revno.
        it_final-werks    =  it_ekko-ekorg.
        it_final-revok    =  it_ekko-revok.
        it_final-ebeln    =  it_ekko-ebeln.
        it_final-ernam    =  it_ekko-ernam.
        it_final-erdat    =  it_ekko-erdat.
        it_final-eruhr    =  it_ekko-eruhr.
       it_final-rscod    =  it_ekko-rscod.
        it_final-netwr    =  it_ekko-netwr.
        it_final-difwr    =  it_ekko-difwr.
        it_final-waers    =  it_ekko-waers.
        it_final-txz01    =  it_ekko-txz01.
        it_final-crnam    =  it_ekko-crnam.
        it_final-fgnam    =  it_ekko-fgnam.
        it_final-fgdat    =  it_ekko-fgdat.
        it_final-fguhr    =  it_ekko-fguhr.
        APPEND it_final.
        CLEAR it_final.
      ENDLOOP.
      CLEAR ebeln1.
    ENDLOOP.
  ENDLOOP.
Please help me as it is very urgent.
Regards,
Nik

Answer 1

Hi Nikhil,
I too need the PO versions information, the old values, new values and which were all the fields changed in every versions.
I need each and every data changed in all versions.
Could you please help me by giving the complete logic or what you have done in your case.
Thanks in Advance.
Regards,
Prabhu