Change output list FBL5N

Question

Hi, i want to add a new fields to the output of transactions FBL5N.
I want to show in the output list the fields Credit Limit, Sales Ditrict and description of sales district in transaction.
I need know how can i change the layout and in the hidden fields appear this fields.  this is possible?
You think that exist some SAP notes for this requirement? If yes, can you give me the number if this note?
Sales district: field KNVV-BZIRK
por el credit limit: field KNKK-KLIMK.
Thanks in advance.

Answer 1

Hello Stilianos, yes of course with pleasure.
The code that i put in my MF en the event 1650 from the start is following:
function zzsample_interface_00001650.
""Local Interface:
*"  IMPORTING
*"     VALUE(I_POSTAB) LIKE  RFPOS STRUCTURE  RFPOS
*"  EXPORTING
*"     VALUE(E_POSTAB) LIKE  RFPOS STRUCTURE  RFPOS
Descripción: Copy of the MF SAMPLE_INTERFACE_00001650, the MF for
the event 1650: Line Item Display: Add to data per line.This specific
MF was been created to fill new fields in the ALV list of the
transaction FBL5N as part of the developmenet
GB-DEV-FIN - Impact Assessment RFC FIN 1270).
........................................................u2026u2026u2026u2026u2026u2026u2026u2026u2026u2026u2026.
MÓDULO AL QUE PERTENECE: FI
AUTOR : Amal SALHI    EMPRESA: Accenture     FECHA: 03/06/08
CONTROL DE MODIFICACIONES
AUTOR           EMPRESA            FECHA          MOTIVO
...........     ...............    DD/MM/AA      ......................
...........     ...............    DD/MM/AA       ......................
Initialize Output by using the following line -
E_POSTAB = I_POSTAB.
  tables: bkpf,      "Accounting Document Header
          vbrk,      "Billing Document: Header Data
          knvv,      "Customer Master Sales Data
          knkk,      "Customer master credit management: Control area data
          t171t.     "Customers: Sales districts: Texts
Variable and constants declaration
  data: l_awtyp type bkpf-awtyp,  " Reference Transaction
        l_awkey type bkpf-awkey,  " Reference Key
        l_vkorg type vbrk-vkorg,  " Sales Organization
        l_kunnr type vbrk-kunrg,  " Payer
        l_vtweg type vbrk-vtweg,  " Distribution Channel
        l_spart type vbrk-spart.  " Division
  constants:c_vbrk type bkpf-awtyp  value 'VBRK',
            c_d    type rfpos-koart value 'D',
            c_fbl5n like sy-tcode   value 'FBL5N'.
Fill all fields except new fields: Sales district, Customer's credit limit
and Name of the district (Copy of FDM_AR_INTERFACE_00001650 code)
  data:
       lt_attributes type fdm_t_line_item_attributes,
       ls_attributes type fdm_line_item_attributes.
  clear e_postab.
*--- pass the account type, customer account to the service layer
  move-corresponding i_postab to ls_attributes.
  append ls_attributes to lt_attributes.
*--- call the service layer to get the case attributes
  call function 'FDM_AR_DOC_ATTRIBUTES_GET'
    changing
      ct_attributes = lt_attributes.
*--- pass the case attributes back to the exporting
  clear ls_attributes.
  move-corresponding i_postab to e_postab.
  read table lt_attributes into ls_attributes index 1.
  move-corresponding ls_attributes to e_postab.
*--- fill line item fields overwritten by last move-corresponding
  e_postab-konto = i_postab-konto.
  e_postab-koart = i_postab-koart.
  e_postab-bukrs = i_postab-bukrs.
  e_postab-belnr = i_postab-belnr.
  e_postab-gjahr = i_postab-gjahr.
  e_postab-buzei = i_postab-buzei.
  check sy-tcode = c_fbl5n.
Fill new fields: Sales district (RFPOS-BZIRK), Customer's credit limit (RFPOS-KLIMK)
and Name of the district (RFPOS-BZTXT)
Find the Customer Number
  if e_postab-koart = c_d.
    clear l_kunnr.
    l_kunnr = i_postab-konto.
  endif.
Fill the column Customer's credit limit (KLIMK)
  clear e_postab-klimk.
  select single klimk
  into e_postab-klimk
  from knkk
  where kunnr = l_kunnr         "Customer Number 1
  and   kkber = i_postab-kkber. "Credit control area
Find the original document from BKPF
  clear: l_awtyp, l_awkey.
  select single awtyp awkey
  from bkpf
  into (l_awtyp, l_awkey)
  where bukrs = i_postab-bukrs
  and   belnr = i_postab-belnr
  and   gjahr = i_postab-gjahr.
Check if the original document is a sales document.
  if l_awtyp = c_vbrk.
    clear: l_vkorg, l_vtweg, l_kunnr, l_spart.
    select single vkorg vtweg spart kunrg
    from vbrk
    into (l_vkorg, l_vtweg, l_spart, l_kunnr)
    where vbeln = l_awkey(10).
    if sy-subrc = 0.
Fill the column Sales district (BZIRK)
      clear e_postab-bzirk.
      select single bzirk
      from knvv
      into e_postab-bzirk
      where kunnr = l_kunnr     "Customer Number 1
      and   vkorg = l_vkorg     "Sales Organization
      and   vtweg = l_vtweg     "Distribution Channel
      and   spart = l_spart.    "Division
Fill the column Name of the district (BZTXT)
      clear e_postab-bztxt.
      select single bztxt
      into e_postab-bztxt
      from t171t
      where spras = sy-langu        "Connection Language
      and   bzirk = e_postab-bzirk. "Sales district
    endif.
CB
  else.
Fill the column Sales district (BZIRK)
    clear e_postab-bzirk.
    select single bzirk
    from knvv
    into e_postab-bzirk
    where kunnr = l_kunnr         "Customer Number 1
    and   vkorg = i_postab-bukrs. "Sales Organization
    check sy-subrc = 0.
Fill the column Name of the district (BZTXT)
    clear e_postab-bztxt.
    select single bztxt
    into e_postab-bztxt
    from t171t
    where spras = sy-langu        "Connection Language
    and   bzirk = e_postab-bzirk. "Sales district
CB
  endif.
endfunction.
One remark that you know is it makes sense to show those fields only if the invoice was generated by a bill for that we search inf the origin document in BKPF is an invoice.
I hope that helps you. For anything about that, you can tell me and i will see if i can help you.
Tell if this resolves your problem.