SAP Function Modules

FLCU_BUPA_DARK_MAINTAIN01 SAP Function module







FLCU_BUPA_DARK_MAINTAIN01 is a standard SAP function module available within R/3 SAP systems depending on your version and release level. Below is the pattern details for this FM showing its interface including any import and export parameters, exceptions etc as well as any documentation contributions (Comments) specific to the object.

See here to view full function module documentation and code listing, simply by entering the name FLCU_BUPA_DARK_MAINTAIN01 into the relevant SAP transaction such as SE37 or SE80.

Associated Function Group: FLBPD_MAIN
Released Date: Not Released
Processing type: Normal fucntion module
Normal function module settings


Pattern for FM FLCU_BUPA_DARK_MAINTAIN01 - FLCU BUPA DARK MAINTAIN01





CALL FUNCTION 'FLCU_BUPA_DARK_MAINTAIN01' "
  EXPORTING
    i_aktyp =                   " tbz0k-aktyp
*   i_partner =                 " but000-partner
*   i_bpext =                   " but000-bpext
*   i_type =                    " but000-type
*   i_bpkind =                  " but000-bpkind
*   i_group =                   " but000-bu_group
*   i_kunnr =                   " bd001-kunnr
*   i_but000 =                  " bus000_di
*   i_but001 =                  " bus001_di
*   i_role =                    " bu_partnerrole
*   i_nodata = '/'              " bus000flds-char1
  IMPORTING
    e_xerror =                  " bus000flds-char1
* TABLES
*   t_but0bk =                  " bus0bk_di
*   t_but0cc =                  " bus0cc_di
*   t_but0is =                  " bus0is_di
*   t_but020 =                  " bus020_di
*   t_but021 =                  " bus021_di
*   t_data =                    " bussdi
*   t_message =                 " bus0msg1
*   t_keyvalue =                " busskeyval
*   t_but021_fs =               " bus021fs_di
    .  "  FLCU_BUPA_DARK_MAINTAIN01

ABAP code example for Function Module FLCU_BUPA_DARK_MAINTAIN01





The ABAP code below is a full code listing to execute function module FLCU_BUPA_DARK_MAINTAIN01 including all data declarations. The code uses the latest in-line data DECLARATION SYNTAX but I have included an ABAP code snippet at the end to show how declarations would look using the original method of declaring data variables up front. This will allow you to compare and fully understand the new inline method. Please note some of the newer syntax such as the @DATA is not available until a later 4.70 service pack (SP8).

DATA:
ld_e_xerror  TYPE BUS000FLDS-CHAR1 ,
it_t_but0bk  TYPE STANDARD TABLE OF BUS0BK_DI,"TABLES PARAM
wa_t_but0bk  LIKE LINE OF it_t_but0bk ,
it_t_but0cc  TYPE STANDARD TABLE OF BUS0CC_DI,"TABLES PARAM
wa_t_but0cc  LIKE LINE OF it_t_but0cc ,
it_t_but0is  TYPE STANDARD TABLE OF BUS0IS_DI,"TABLES PARAM
wa_t_but0is  LIKE LINE OF it_t_but0is ,
it_t_but020  TYPE STANDARD TABLE OF BUS020_DI,"TABLES PARAM
wa_t_but020  LIKE LINE OF it_t_but020 ,
it_t_but021  TYPE STANDARD TABLE OF BUS021_DI,"TABLES PARAM
wa_t_but021  LIKE LINE OF it_t_but021 ,
it_t_data  TYPE STANDARD TABLE OF BUSSDI,"TABLES PARAM
wa_t_data  LIKE LINE OF it_t_data ,
it_t_message  TYPE STANDARD TABLE OF BUS0MSG1,"TABLES PARAM
wa_t_message  LIKE LINE OF it_t_message ,
it_t_keyvalue  TYPE STANDARD TABLE OF BUSSKEYVAL,"TABLES PARAM
wa_t_keyvalue  LIKE LINE OF it_t_keyvalue ,
it_t_but021_fs  TYPE STANDARD TABLE OF BUS021FS_DI,"TABLES PARAM
wa_t_but021_fs  LIKE LINE OF it_t_but021_fs .


SELECT single AKTYP
FROM TBZ0K
INTO @DATA(ld_i_aktyp).


SELECT single PARTNER
FROM BUT000
INTO @DATA(ld_i_partner).


SELECT single BPEXT
FROM BUT000
INTO @DATA(ld_i_bpext).


SELECT single TYPE
FROM BUT000
INTO @DATA(ld_i_type).


SELECT single BPKIND
FROM BUT000
INTO @DATA(ld_i_bpkind).


SELECT single BU_GROUP
FROM BUT000
INTO @DATA(ld_i_group).


SELECT single KUNNR
FROM BD001
INTO @DATA(ld_i_kunnr).

DATA(ld_i_but000) = 'Check type of data required'.
DATA(ld_i_but001) = 'Check type of data required'.
DATA(ld_i_role) = 'Check type of data required'.

DATA(ld_i_nodata) = some text here

"populate fields of struture and append to itab
append wa_t_but0bk to it_t_but0bk.

"populate fields of struture and append to itab
append wa_t_but0cc to it_t_but0cc.

"populate fields of struture and append to itab
append wa_t_but0is to it_t_but0is.

"populate fields of struture and append to itab
append wa_t_but020 to it_t_but020.

"populate fields of struture and append to itab
append wa_t_but021 to it_t_but021.

"populate fields of struture and append to itab
append wa_t_data to it_t_data.

"populate fields of struture and append to itab
append wa_t_message to it_t_message.

"populate fields of struture and append to itab
append wa_t_keyvalue to it_t_keyvalue.

"populate fields of struture and append to itab
append wa_t_but021_fs to it_t_but021_fs. . CALL FUNCTION 'FLCU_BUPA_DARK_MAINTAIN01' EXPORTING i_aktyp = ld_i_aktyp * i_partner = ld_i_partner * i_bpext = ld_i_bpext * i_type = ld_i_type * i_bpkind = ld_i_bpkind * i_group = ld_i_group * i_kunnr = ld_i_kunnr * i_but000 = ld_i_but000 * i_but001 = ld_i_but001 * i_role = ld_i_role * i_nodata = ld_i_nodata IMPORTING e_xerror = ld_e_xerror * TABLES * t_but0bk = it_t_but0bk * t_but0cc = it_t_but0cc * t_but0is = it_t_but0is * t_but020 = it_t_but020 * t_but021 = it_t_but021 * t_data = it_t_data * t_message = it_t_message * t_keyvalue = it_t_keyvalue * t_but021_fs = it_t_but021_fs . " FLCU_BUPA_DARK_MAINTAIN01
IF SY-SUBRC EQ 0. "All OK ENDIF.







ABAP code to compare 7.40 inline data declaration with original syntax

The below ABAP code uses the older none in-line data declarations. This allows you to see the coding differences/benefits of the later inline syntax. It may also be useful if you are using an older version of SAP as some of the newer syntax above, such as the @DATA is not available until 4.70 EHP 8.

DATA:
ld_e_xerror  TYPE BUS000FLDS-CHAR1 ,
ld_i_aktyp  TYPE TBZ0K-AKTYP ,
it_t_but0bk  TYPE STANDARD TABLE OF BUS0BK_DI ,
wa_t_but0bk  LIKE LINE OF it_t_but0bk,
ld_i_partner  TYPE BUT000-PARTNER ,
it_t_but0cc  TYPE STANDARD TABLE OF BUS0CC_DI ,
wa_t_but0cc  LIKE LINE OF it_t_but0cc,
ld_i_bpext  TYPE BUT000-BPEXT ,
it_t_but0is  TYPE STANDARD TABLE OF BUS0IS_DI ,
wa_t_but0is  LIKE LINE OF it_t_but0is,
ld_i_type  TYPE BUT000-TYPE ,
it_t_but020  TYPE STANDARD TABLE OF BUS020_DI ,
wa_t_but020  LIKE LINE OF it_t_but020,
ld_i_bpkind  TYPE BUT000-BPKIND ,
it_t_but021  TYPE STANDARD TABLE OF BUS021_DI ,
wa_t_but021  LIKE LINE OF it_t_but021,
ld_i_group  TYPE BUT000-BU_GROUP ,
it_t_data  TYPE STANDARD TABLE OF BUSSDI ,
wa_t_data  LIKE LINE OF it_t_data,
ld_i_kunnr  TYPE BD001-KUNNR ,
it_t_message  TYPE STANDARD TABLE OF BUS0MSG1 ,
wa_t_message  LIKE LINE OF it_t_message,
ld_i_but000  TYPE BUS000_DI ,
it_t_keyvalue  TYPE STANDARD TABLE OF BUSSKEYVAL ,
wa_t_keyvalue  LIKE LINE OF it_t_keyvalue,
ld_i_but001  TYPE BUS001_DI ,
it_t_but021_fs  TYPE STANDARD TABLE OF BUS021FS_DI ,
wa_t_but021_fs  LIKE LINE OF it_t_but021_fs,
ld_i_role  TYPE BU_PARTNERROLE ,
ld_i_nodata  TYPE BUS000FLDS-CHAR1 .


SELECT single AKTYP
FROM TBZ0K
INTO ld_i_aktyp.


"populate fields of struture and append to itab
append wa_t_but0bk to it_t_but0bk.

SELECT single PARTNER
FROM BUT000
INTO ld_i_partner.


"populate fields of struture and append to itab
append wa_t_but0cc to it_t_but0cc.

SELECT single BPEXT
FROM BUT000
INTO ld_i_bpext.


"populate fields of struture and append to itab
append wa_t_but0is to it_t_but0is.

SELECT single TYPE
FROM BUT000
INTO ld_i_type.


"populate fields of struture and append to itab
append wa_t_but020 to it_t_but020.

SELECT single BPKIND
FROM BUT000
INTO ld_i_bpkind.


"populate fields of struture and append to itab
append wa_t_but021 to it_t_but021.

SELECT single BU_GROUP
FROM BUT000
INTO ld_i_group.


"populate fields of struture and append to itab
append wa_t_data to it_t_data.

SELECT single KUNNR
FROM BD001
INTO ld_i_kunnr.


"populate fields of struture and append to itab
append wa_t_message to it_t_message.
ld_i_but000 = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_t_keyvalue to it_t_keyvalue.
ld_i_but001 = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_t_but021_fs to it_t_but021_fs.
ld_i_role = 'Check type of data required'.

ld_i_nodata = some text here

Contribute (Add Comments)

Please help keep this info upto date and use the comments section below to add useful hints, tips and information specific to this SAP function. This will then be available for you and other users to easily find by simply searching on the object name FLCU_BUPA_DARK_MAINTAIN01 or its description.