Get Computer Name

 
DATA  computer_name TYPE string.

START-OF-SELECTION.

cl_gui_frontend_services=>get_computer_name(  
  CHANGING
      computer_name        = computer_name
   EXCEPTIONS

     cntl_error           = 1

     error_no_gui         = 2

     not_supported_by_gui = 3

     OTHERS               = 4

       ).

CALL METHOD cl_gui_cfw=>update_view.

Download/Upload module pools programs from SAP to local system

Download Pools Program 

Buka T-Code SE51
Masukkan nama Program yang terdapat Screen yang ingin kita download dan masukkan juga Screen   Numbernya.

Sending Email with XLS Attachments

REPORT MESSAGE-ID 00
NO STANDARD PAGE HEADING LINE-SIZE 200 LINE-COUNT 65.

TABLES: bsik, lfa1, somlreci1.

SELECT-OPTIONS: s_email FOR somlreci1-receiver NO INTERVALS.
PARAMETERS : p_sub TYPE char50 DEFAULT 'Notification',
             p_file TYPE char50 DEFAULT 'Open DP'.

Get Data from ALV Internal Table

Pada kasus ini kita akan coba mengambil data dari transaksi FBL1N dengan menggunakan RFC.

OK langsung saja kita buat RFCnya. Masuk ke T-Code SE37 lalu kita beri nama ZFBL1N. Sebelumnya jangan lupa untuk membuat Function Grupnya terlebih dahulu. Selanjutnya masuk ke Tab Import dan masukkan parameter seperti gambar di bawah ini :

 

Coloring a cell in an ALV conditionally

Add a button beside execute button

 

*&---------------------------------------------------------------------*
*& Report  ZSBK_BUTTON_SAMPING_EXECUTE
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  zbutton_samping_execute.

TABLES : sscrfields, smp_dyntxt.

*----------------------------------------------------------------------*
*       SELECTION SCREEN                                               *
*----------------------------------------------------------------------*
SELECTION-SCREEN FUNCTION KEY 1.
SELECTION-SCREEN FUNCTION KEY 2.

PARAMETERS    : p_param TYPE t001l-werks.

AT SELECTION-SCREEN.
  CASE sscrfields-ucomm.
    WHEN 'FC01'.
      MESSAGE 'Button 1' TYPE 'I'.
    WHEN 'FC02'.
      MESSAGE 'Button 2' TYPE 'I'.
    WHEN OTHERS.

  ENDCASE.

INITIALIZATION.
  smp_dyntxt-text = 'Button1'.
  smp_dyntxt-icon_id = '@PO@'.
  smp_dyntxt-icon_text = 'Button1'.
  smp_dyntxt-quickinfo = 'Button1'.
  sscrfields-functxt_01 = smp_dyntxt.

  smp_dyntxt-text = 'Button2'.
  smp_dyntxt-icon_id = '@PO@'.
  smp_dyntxt-icon_text = 'Button2'.
  smp_dyntxt-quickinfo = 'Button2'.
  sscrfields-functxt_02 = smp_dyntxt. 

Using MS Word as Editor in Smartforms

Buka T-Code 'I18N'.