Add Custom Field to FBL3N

Sebagai contoh kita akan menambahkan Object Key pada report FBL3N.

Caranya buka T-Code FIBF.
Klik Settings -> Products - ...of a customer.

Convert WBS Element

DATA : pspnr TYPE ps_posnr,
       wbs TYPE char25.

CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT'
  EXPORTING
    input  = pspnr
  IMPORTING
    output = wbs.


CALL FUNCTION 'CONVERSION_EXIT_ABPSP_INPUT'
  EXPORTING
    input     = wbs
  IMPORTING
    output    = pspnr
  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.

Tabstrips on the Selection Screen

Read .txt file to ITAB

Kali ini saya akan mencoba sharing bagaimana cara membaca file .txt untuk bisa dimasukkan ke dalam internal tabel. Mungkin ini bisa dikembangkan untuk dijadikan program upload data dari file .txt. OK, berikut source code untuk program read file .txt.

*&---------------------------------------------------------------------*
*& Report  ZREAD_TXT
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  zread_txt.
DATA: BEGIN OF itab OCCURS 0,
      matnr TYPE matnr,
      matkl TYPE matkl,
      meins TYPE meins,
      maktx TYPE maktx,
  END OF itab.

SELECTION-SCREEN BEGIN OF BLOCK g1 WITH FRAME TITLE text_101.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(18) text_102 FOR FIELD p_file.
PARAMETERS : p_file LIKE rlgrap-filename OBLIGATORY.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK g1.

AT SELECTION-SCREEN OUTPUT.
  text_101 = 'Selection parameter'.
  text_102 = 'Chose .*txt file'.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
  PERFORM f_get_filename CHANGING p_file.

START-OF-SELECTION.
  PERFORM fm_read_data.
  PERFORM fm_display_data.

Contoh Pop Up Message Menggunakan "REUSE_ALV_POPUP_TO_SELECT"

*&---------------------------------------------------------------------*
*& Report  ZALV_POPUP
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  zalv_popup.
TYPE-POOLS : icon, slis.
DATA : BEGIN OF t_log OCCURS 0,
icon(4),
msgtyp TYPE bdc_mart,
descr(132),
END OF t_log,
gt_fieldcatlog TYPE slis_fieldcat_alv OCCURS 0 WITH HEADER LINE.

START-OF-SELECTION.
  PERFORM fm_insert_log.
  PERFORM fm_insert_field.
  PERFORM fm_show_log.