Changes to the RFKABL00 Report

Question

Hi,
I am trying to add Vendor name to the Vendor Changes Report(RFKABL00).
For example I am using DEMO Report (BALVEX01)and trying to replicate my issue in it.
Could you please give me a step by step procedure for to add one more column(COUNTRY) to the output of the report.
Thanks.
Bobby.
Message was edited by: Bobby
Message was edited by: Bobby
Message was edited by: Bobby

Answer 1

Bobby, what version of SAP are you working with?  Is the RFKABL00 program an ALV GRID?  Its not in my 46c system?  I have copied this program and added the vendor name with not a problem.  Yes,  there is some work to do with the formatting, but it is showing on the screen.  I have only modified for the "1" sort .  This code is in the AENDPOSITIONEN_AUSGEBEN form.
*------ Ausgabe der Zeilen pro Belegänderungsposition ------------------
    case sort.
*------ Sortierung 1: Chronologische Sortierung (Datum, Zeit) ----------
      when '1'.
        at new icdhdr-udate.
          clear old_changenr.
          reserve 4 lines.
          format color col_group intensified off.
          write: /   sy-vline no-gap,
                   2 text-s01 color col_group intensified no-gap,
                  12 icdhdr-udate dd/mm/yyyy,
                 132 sy-vline.
          xcolor = ' '.
        endat.
        at daten.
          reserve 3 lines.
          perform farbe_wechseln.
          write: /    sy-vline no-gap.
          perform schluessel_loeschen.
<b>          data: xlfa1 type lfa1.
          clear xlfa1.
          select single * into xlfa1 from lfa1
                    where lifnr = icdpos-lifnr.</b>
          write:    2 uzeit,                 "5
                    8 icdpos-lifnr,          "10
                   19 icdhdr-username.       "12
          position pos1. write: fldtext.     "15
          write:   48 icdpos-bukrs,          "4
                   53 icdpos-ekorg.          "4
          perform werte_ausgeben.
          perform poszeile2_ausgeben.
<b>
          if not xlfa1 is initial.
            write:/8 xlfa1-name1.
          endif.</b>
        endat.
Regards,
Rich Heilman