Add new field in output of FBL1N

Question

Hi Experts,
How can I and new field in output of FBL!N.
Can you show me the steps.
Pooja

Answer 1

Hi Expert,
Thanks, I have corrected u201CNameu201D mistake in structure. Now RFPOSXEXTEND is run successfully.
Still not getting field which is added in structure.
Below describing what I have done.
Create copy of SAMPLE_INTERFACE_00001650 to Z_FI_INTERFACE_00001650.
Register product from Settings->products->..of a customer
Product : ZFI
Text : BTE Products for FI Exit
Activation Checked.
Register Event from Settings->p/s module->..of acustomer
     Event : 00001650
     Product : ZFI
     Function Module :  Z_FI_INTERFACE_00001650
(Function is created in new function group Z_FUN_GRP.)
Add new Structure ZMyStruct(KUNNR,NAMEJ,LIFNR,NAMEK) in RFPOS.
Add new Structure ZMyStruct1(KUNNR,NAMEJ,LIFNR,NAMEK) in RFPOSX.
Below Mentioned Code is written in Z_FI_INTERFACE_00001650
FUNCTION Z_FI_INTERFACE_00001650.
""Local Interface:
*"  IMPORTING
*"     VALUE(I_POSTAB) LIKE  RFPOS STRUCTURE  RFPOS
*"  EXPORTING
*"     VALUE(E_POSTAB) LIKE  RFPOS STRUCTURE  RFPOS
Initialize Output by using the following line -
E_POSTAB = I_POSTAB.
TABLES : bseg, kna1, lfa1.
IF sy-tcode = 'FBL1N'.
  CLEAR : bseg.
  SELECT SINGLE *
    FROM bseg
    WHERE bukrs = i_postab-bukrs
    AND belnr = i_postab-belnr
    AND gjahr = i_postab-gjahr
    AND koart = 'K'.
  IF sy-subrc EQ 0.
    e_postab-lifnr = bseg-lifnr.
    CLEAR: lfa1.
    SELECT SINGLE *
      FROM lfa1
      WHERE lifnr = bseg-lifnr.
    IF sy-subrc EQ 0.
      e_postab-namek = lfa1-name1.
    ENDIF.
  ENDIF.
  CLEAR : bseg.
  SELECT SINGLE *
    FROM bseg
    WHERE bukrs = i_postab-bukrs
    AND belnr = i_postab-belnr
    AND gjahr = i_postab-gjahr
    AND koart = 'D'.
  IF sy-subrc EQ 0.
    e_postab-kunnr = bseg-kunnr.
    CLEAR: kna1.
    SELECT SINGLE *
      FROM kna1
      WHERE kunnr = bseg-kunnr.
    IF sy-subrc EQ 0.
      e_postab-namej = kna1-name1.
    ENDIF.
  ENDIF.
ENDIF.
ENDFUNCTION.
Saved and Activated.
Start report RFPOSXEXTEND. And run it successfully.
Still not getting fields in report FBL1N which I have added in RFPOS and RFPOSX.
Thanks and regards,
Pooja