Add new field in address window

Advertisement
hi expects,
  i want to new field to address window .what are change should i do in form ,print program and subroutine.
                        thank you
Advertisement

Replay

Hello,
If u want to add a field in a window then u have to go for the FORM SUBROUTINE in the layout. Don't make any changes in the Print program.
Try like this:
*       FORM get_fi_number                                            *
FORM get_fi_number TABLES in_par  STRUCTURE itcsy
                          out_par STRUCTURE itcsy.
  TABLES: bkpf.
  DATA:
    tb_awkey LIKE bkpf-awkey,
    tb_rbkp  LIKE rbkp.
  READ TABLE in_par WITH KEY name = 'RBKP'.
  tb_rbkp = in_par-value.
  CHECK sy-subrc = 0.
  tb_awkey       = tb_rbkp-belnr.
  tb_awkey+10(4) = tb_rbkp-gjahr.
  CLEAR bkpf-belnr.
  SELECT       belnr
         FROM  bkpf
         INTO  bkpf-belnr
         WHERE awkey = tb_awkey.
    EXIT.
  ENDSELECT.
  READ TABLE out_par WITH KEY 'TB_FINUM'.
  CHECK sy-subrc = 0.
  out_par-value = bkpf-belnr.
  MODIFY out_par INDEX sy-tabix.
ENDFORM.