Senin, 04 Maret 2013
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 :
Rabu, 27 Februari 2013
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.
*& 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.
Rabu, 23 Januari 2013
Langganan:
Postingan (Atom)

