Ansicht
Dokumentation
/FRE/DIF_BADI_004 - BAdI: Zusätzliche BEF-Felder
RFUMSV00 - Advance Return for Tax on Sales/Purchases Addresses (Business Address Services)Diese Dokumentation steht unter dem Copyright der SAP AG.
Dieses BAdI ermöglicht es Ihnen, an die Struktur /FRE/DIF_OCCURR angehängte benutzerdefinierte Felder anzuzeigen und/oder zu pflegen.
Sie müssen zuerst die Methoden GET_DATA_FROM_SCREEN und PUT_DATA_TO_SCREEN implementieren. Diese Methoden müssen die Default-Quelltextzeilen enthalten.
Das Folgende ist ein Beispiel eines Modul-Pool-Programms Z_TEST_DIF_BADI_001:
Screen 0700 des Typs Subscreen wurde erstellt mit drei angezeigten Feldern: /fre/dif_occurr-memoflag, /fre/dif_occurr-ins_mode, /fre/dif_occurr-ins_uname.
&---------------------------------------------------------------------*
*& Module pool Z_TEST_DIF_BADI_001
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
PROGRAM Z_TEST_DIF_BADI_001.
INCLUDE EST_DIF_BADI_INIT_0700O01.
INCLUDE EST_DIF_BADI_USER_COMMAND_0I01.
*----------------------------------------------------------------------*
***INCLUDE EST_DIF_BADI_INIT_0700O01 .
*----------------------------------------------------------------------*
*&---------------------------------------------------------------------*
*& Module init_0700 OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE init_0700 OUTPUT.
TABLES: /fre/dif_occurr.
* BADI defintion and specific variables
DATA: ,,
,,,,g_exit TYPE REF TO /fre/if_ex_ui_dif_badi_001,
,,,,g_dif_occurr TYPE /fre/dif_occ_status_sty.
IF g_exit IS INITIAL.
,,CALL METHOD cl_exithandler=>get_instance_for_subscreens
,,,,CHANGING
,,,,,, instance = g_exit
,,,,EXCEPTIONS
,,,,,,others = 6.
ENDIF.
IF g_exit IS NOT INITIAL.
* Fill the screen structure using an interface method
,,CALL METHOD g_exit->get_data_from_screen
,, ,,IMPORTING
,,,,,,e_dif_occurr = g_dif_occurr.
,,/fre/dif_occurr-memoflag = g_dif_occurr-memoflag.
,,/fre/dif_occurr-ins_mode = g_dif_occurr-ins_mode.
,,/fre/dif_occurr-ins_uname = g_dif_occurr-ins_uname.
ENDIF.
ENDMODULE. " init_0700 OUTPUT
*----------------------------------------------------------------------*
***INCLUDE EST_DIF_BADI_USER_COMMAND_0I01 .
*----------------------------------------------------------------------*
*&---------------------------------------------------------------------*
*& Module USER_COMMAND_0700 INPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE user_command_0700 INPUT.
IF g_exit IS INITIAL.
* gets the active instance
,,CALL METHOD cl_exithandler=>get_instance_for_subscreens
,,,,CHANGING
,,,,,,instance = g_exit
,,,,EXCEPTIONS
,,,,,,others = 6.
ENDIF.
IF g_exit IS NOT INITIAL.
,,g_dif_occurr-memoflag = /fre/dif_occurr-memoflag.
,,g_dif_occurr-ins_mode = /fre/dif_occurr-ins_mode.
,,g_dif_occurr-ins_uname = /fre/dif_occurr-ins_uname.
,,CALL METHOD g_exit->put_data_to_screen
,,,,EXPORTING
,,,,,,i_dif_occurr = g_dif_occurr.
ENDIF.
ENDMODULE. " USER_COMMAND_0700 INPUT
SUBST_MERGE_LIST - merge external lists to one complete list with #if... logic for R3up CPI1466 during Backup
Diese Dokumentation steht unter dem Copyright der SAP AG.
Length: 4485 Date: 20240329 Time: 075419 sap01-206 ( 54 ms )