SAP Reports / Programs
RFBKLOC1 SAP ABAP Report - Account Locks
RFBKLOC1 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.
If you would like to execute this report or see the full code listing simply enter RFBKLOC1 into the relevant SAP transactions such as SE38 or SE80
Transaction Code(s):
Below is a list of transaction codes which are relevant to this SAP report
F971 - Account Locks
ABAP code to call this SAP report using the submit statement
This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.
SUBMIT RFBKLOC1. "Basic submit
SUBMIT RFBKLOC1 AND RETURN. "Return to original report after report execution complete
SUBMIT RFBKLOC1 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Selection Text: S_PRODCT = Product
Selection Text: S_BKKRS = Bank Area
Selection Text: S_ACNUM = Account Number
Selection Text: P_VARI = Layout
Selection Text: P_PARTN = Business Partner
Selection Text: P_OWNER = Account Holder
Selection Text: P_NAME2 = Name 1/Last Name
Selection Text: P_NAME1 = Name 2/First Name
Selection Text: P_LEAD = Account Maintenance Officer
Title: Account Locks
Text Symbol: T05 = Business Partner
Text Symbol: T04 = Name2/1stName
Text Symbol: T03 = Name1/LastName
Text Symbol: T02 = Acct Holder
Text Symbol: T01 = AcctMainOff
Text Symbol: B03 = List Struc
Text Symbol: B02 = Business Partner Selections
Text Symbol: B01 = General Selections
Text Symbol: 099 = Dynamic Selections
Text Symbol: 098 = Dyn.Select.Active
Text Symbol: 097 = authorization:
Text Symbol: 096 = Number of accounts not included due to
Text Symbol: 022 = AcctMainOff
Text Symbol: 021 = Int.Lim. Bk.Crcy
Text Symbol: 020 = Ext.Lim. Bk.Crcy
Text Symbol: 019 = Page
Text Symbol: 018 = Account Holder
Text Symbol: 017 = Account Number
Text Symbol: 016 = Bank Area
Text Symbol: 015 = Acct Holder Number
Text Symbol: 014 = B.Crcy
Text Symbol: 012 = Post.Bal.Bank Crcy
Text Symbol: 011 = Account Holder
Text Symbol: 010 = Post.Bal.
Text Symbol: 009 = Val.Dt.Bal.
Text Symbol: 008 = External Limit
Text Symbol: 007 = Internal Limit
Text Symbol: 006 = Dynamic Selections: Account Locks
Text Symbol: 005 = Credit Lock
Text Symbol: 004 = Debit Lock
Text Symbol: 003 = Business Partner Lock
Text Symbol: 002 = ****
Text Symbol: 001 = Account Locks
INCLUDES used within this REPORT RFBKLOC1
INCLUDE IBKKCON.
INCLUDE IBKKCOGK.
INCLUDE IBKKCOGL.
INCLUDE IBKKMAC1. "BC100698
INCLUDE IBKKINFO_DATA.
INCLUDE IBKKINFO_SEL_BP.
TABLES used within REPORT and the associated SELECT statement:
No SAP DATABASE tables are accessed within this REPORT code!
Function Modules used within report and the associated call statement:
RS_SET_SELSCREEN_STATUS CALL FUNCTION 'RS_SET_SELSCREEN_STATUS' EXPORTING p_status = '100' * P_PROGRAM = ' ' TABLES p_exclude = l_t_excld EXCEPTIONS OTHERS = 1.
BKK_BKKRS_INDEPEND_GET_DISPLAY CALL FUNCTION 'BKK_BKKRS_INDEPEND_GET_DISPLAY' EXPORTING i_spras = sy-langu IMPORTING e_inddis = l_inddis e_opmnta = l_opmnta e_opmntt = l_opmntt e_ipmnta = l_ipmnta e_ipmntt = l_ipmntt EXCEPTIONS no_data = 1 text_not_found = 2 OTHERS = 3.
DD_DOMA_GET CALL FUNCTION 'DD_DOMA_GET' "TB091198 EXPORTING "TB091198 domain_name = g_con_domnam_status "TB091198 langu = sy-langu "TB091198 TABLES "TB091198 dd07v_tab_a = l_t_dd07v_a "TB091198 dd07v_tab_n = l_t_dd07v_n "TB091198 EXCEPTIONS "TB091198 illegal_value = 1 "TB091198 op_failure = 2 "TB091198 OTHERS = 3. "TB091198
REUSE_ALV_VARIANT_DEFAULT_GET CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET' EXPORTING i_save = l_save CHANGING cs_variant = lx_variant EXCEPTIONS not_found = 2.
REUSE_ALV_VARIANT_F4 CALL FUNCTION 'REUSE_ALV_VARIANT_F4' EXPORTING is_variant = l_variant i_save = l_save * it_default_fieldcat = IMPORTING e_exit = l_exit es_variant = lx_variant.
REUSE_ALV_VARIANT_EXISTENCE CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE' EXPORTING i_save = l_save CHANGING cs_variant = lx_variant.
BKK_BKKRS_EXISTS CALL FUNCTION 'BKK_BKKRS_EXISTS' "TB140699 EXPORTING "TB140699 i_bkkrs = s_bkkrs-low "TB140699 * I_MESSAGE = 'X' "TB140699 IMPORTING "TB140699 e_rc = l_rc "TB140699 EXCEPTIONS "TB140699 OTHERS = 1. "TB140699
BKK_ACCNT_ACNUM_EXT_EXISTS CALL FUNCTION 'BKK_ACCNT_ACNUM_EXT_EXISTS' "TB140699 EXPORTING "TB140699 i_acnum_ext = s_acnum-low "TB140699 IMPORTING "TB140699 e_rc = l_rc "TB140699 EXCEPTIONS "TB140699 OTHERS = 1. "TB140699
BKK_BUPA_PARTNER_EXTENDED_SEL CALL FUNCTION 'BKK_BUPA_PARTNER_EXTENDED_SEL' "TB011298b EXPORTING "TB011298b i_name1 = p_name1 "TB011298b i_name2 = p_name2 "TB011298b i_rltyp = l_rltyp "TB011298b i_partner = p_partn "TB011298b IMPORTING "TB011298b e_rc = l_rc "TB011298b e_partner = l_partner "TB011298b e_role = l_role.
BKK_ACCNT_PRESELECT_BKK42 CALL FUNCTION 'BKK_ACCNT_PRESELECT_BKK42' EXPORTING i_max_count = l_cnt_maxsel i_bkk40_where = tab_clauses_40 i_bkk42_where = tab_clauses_42 i_bkk46_where = tab_clauses_46 i_partner = p_partn i_rltyp = l_rltyp * IMPORTING * E_COUNT = TABLES t_bkk42 = l_t_bkk42 t_rng_bkkrs = s_bkkrs t_rng_acnum_ext = s_acnum t_rng_prodext = s_prodct * T_RNG_WAERS = EXCEPTIONS OTHERS = 1.
MESSAGES_ACTIVE CALL FUNCTION 'MESSAGES_ACTIVE' * IMPORTING * MAX_SEVERITY = * ZEILE = EXCEPTIONS not_active = 1 OTHERS = 2.
MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE'.
BKK_INFOSYSTEM_AUTHORITY_CHECK CALL FUNCTION 'BKK_INFOSYSTEM_AUTHORITY_CHECK' EXPORTING i_bkkrs = l_t_bkk42-bkkrs i_acnum_int = l_t_bkk42-acnum_int i_struc = l_t_bkk42 IMPORTING e_rc = l_rcode e_skip = l_skip.
BKK_BKKA_AUTHORITY_CHECK CALL FUNCTION 'BKK_BKKA_AUTHORITY_CHECK' EXPORTING i_bkkrs = l_t_bkk42-bkkrs i_acnum_int = l_t_bkk42-acnum_int i_begru = l_t_bkk42-begru i_actvt = g_con_display i_struc = l_t_bkk42 "N1122568 i_msg_handler = ' ' "inaktiv, da im Anschl. SUBRC abgefr
BKK_ACCNT_GET_BKK40_DATA CALL FUNCTION 'BKK_ACCNT_GET_BKK40_DATA' EXPORTING i_bkkrs = l_t_acnall-bkkrs i_acnum_int = l_t_acnall-acnum_int IMPORTING e_bkk40 = l_s_bkk40.
BKK_PRODUCT_GET_NAME CALL FUNCTION 'BKK_PRODUCT_GET_NAME' EXPORTING i_prodint = l_t_acnall-prodint i_spras = sy-langu IMPORTING e_t_prodint = l_t_acnall-t_prodint e_prodext = l_t_acnall-prodext * E_RC = EXCEPTIONS OTHERS = 1.
BKK_ACCNT_GET_BUPA CALL FUNCTION 'BKK_ACCNT_GET_BUPA' EXPORTING i_bkkrs = l_t_acnall-bkkrs i_acnum_int = l_t_acnall-acnum_int TABLES t_partner = l_t_acnbupa EXCEPTIONS not_found = 1 OTHERS = 2.
BKK_BUPA_CHECK_POST_BLOCK CALL FUNCTION 'BKK_BUPA_CHECK_POST_BLOCK' EXPORTING i_partner = l_t_acnbupa-partner EXCEPTIONS posting_block_exist = 1 not_found = 2 OTHERS = 3.
BKK_ACCNT_GET_LOCK_TAB CALL FUNCTION 'BKK_ACCNT_GET_LOCK_TAB' EXPORTING i_bkkrs = l_t_acnall-bkkrs i_acnum_int = l_t_acnall-acnum_int IMPORTING e_return = l_rc TABLES t_lock_id = l_t_locks EXCEPTIONS OTHERS = 1.
BKK_LOCK_GET_TEXT CALL FUNCTION 'BKK_LOCK_GET_TEXT' EXPORTING i_lock_id = l_t_locks-lock_id IMPORTING e_t_lockid = l_t_acnlocs-t_lockid * E_RETURN = EXCEPTIONS OTHERS = 1.
BKK_BKKRS_GET_TEXT CALL FUNCTION 'BKK_BKKRS_GET_TEXT' EXPORTING i_bkkrs = s_bkkrs-low i_langu = sy-langu IMPORTING e_t_bkkrs = l_t_acnall-t_bkkrs.
BKK_BKKRS_GET_WAERS CALL FUNCTION 'BKK_BKKRS_GET_WAERS' EXPORTING i_bkkrs = l_t_acnall-bkkrs IMPORTING * E_RC = e_waers = l_t_acnall-bkkrs_waers e_ratetype = l_ratetype EXCEPTIONS OTHERS = 1.
BKK_BUPA_PARTNER_DATA_GET CALL FUNCTION 'BKK_BUPA_PARTNER_DATA_GET' EXPORTING i_partner = l_t_acnbupa-partner i_rltyp = g_con_rltyp_account_holder i_actvt = '03' IMPORTING e_ibkk52 = l_s_ibkk52 e_rc = l_rc EXCEPTIONS OTHERS = 1.
BKK_ACCNT_GET_BALANCE CALL FUNCTION 'BKK_ACCNT_GET_BALANCE' EXPORTING i_bkkrs = l_t_acnall-bkkrs i_acnum_int = l_t_acnall-acnum_int IMPORTING e_balance = l_t_acnall-balance EXCEPTIONS parameter_error = 1 balance_not_found = 2 OTHERS = 3.
BKK_ACCNT_GET_BKK46_DATA CALL FUNCTION 'BKK_ACCNT_GET_BKK46_DATA' EXPORTING i_bkkrs = l_t_acnall-bkkrs i_acnum_int = l_t_acnall-acnum_int IMPORTING e_bkk46 = l_s_bkk46 EXCEPTIONS IMPARA_ERROR = 1 NOT_FOUND = 2 OTHERS = 99.
BKK_LIMIT_GET_ACCOUNT CALL FUNCTION 'BKK_LIMIT_GET_ACCOUNT' EXPORTING i_bkkrs = l_t_acnall-bkkrs i_acnum_int = l_t_acnall-acnum_int i_waers = l_t_acnall-waers TABLES t_limit = l_t_limits EXCEPTIONS parameter_error = 1 database_error = 2 OTHERS = 3.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = sy-datum foreign_amount = l_t_acnall-balance foreign_currency = l_t_acnall-waers local_currency = l_t_acnall-bkkrs_waers * RATE = 0 type_of_rate = l_ratetype IMPORTING exchange_rate = l_t_acnall-exch_rate * FOREIGN_FACTOR = local_amount = l_t_acnall-bkkrs_balance.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = sy-datum foreign_amount = l_t_acnall-limsum_ext foreign_currency = l_t_acnall-waers local_currency = l_t_acnall-bkkrs_waers * RATE = 0 type_of_rate = l_ratetype IMPORTING exchange_rate = l_t_acnall-exch_rate * FOREIGN_FACTOR = local_amount = l_t_acnall-bkkrs_limext.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = sy-datum foreign_amount = l_t_acnall-limsum_int foreign_currency = l_t_acnall-waers local_currency = l_t_acnall-bkkrs_waers * RATE = 0 type_of_rate = l_ratetype IMPORTING exchange_rate = l_t_acnall-exch_rate * FOREIGN_FACTOR = local_amount = l_t_acnall-bkkrs_limint.
MESSAGES_STOP CALL FUNCTION 'MESSAGES_STOP' EXCEPTIONS a_message = 1 e_message = 2 i_message = 3 w_message = 4 OTHERS = 5.
REUSE_ALV_HIERSEQ_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY' EXPORTING * I_INTERFACE_CHECK = ' ' i_callback_program = l_report i_callback_pf_status_set = 'STATUS_SET' i_callback_user_command = 'USER_COMMAND' is_layout = layout it_fieldcat = ftab * IT_EXCLUDING = * IT_SPECIAL_GROUPS = it_sort = l_t_sort * IT_FILTER = is_sel_hide = l_s_selhide "TB180699 * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * I_DEFAULT = 'X' i_save = l_save is_variant = l_variant it_events = l_t_event * IT_EVENT_EXIT = i_tabname_header = 'L_T_ACNALL' i_tabname_item = 'L_T_ACNLOCS' * I_STRUCTURE_NAME_HEADER = * I_STRUCTURE_NAME_ITEM = is_keyinfo = l_keyinfo * IS_PRINT = * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = TABLES t_outtab_header = l_t_acnall t_outtab_item = l_t_acnlocs.
REUSE_ALV_LIST_LAYOUT_INFO_GET CALL FUNCTION 'REUSE_ALV_LIST_LAYOUT_INFO_GET' IMPORTING * ES_LAYOUT = et_fieldcat = ftab * ET_SORT = * ET_FILTER = * ES_LIST_SCROLL = * ES_VARIANT = EXCEPTIONS no_infos = 1 program_error = 2 OTHERS = 3.
CALL FUNCTION 'BKK_ALV_EXCL_UCOMM_WITH_FCAT' TABLES t_fieldcat = ftab "export t_ucomm = l_t_ucomm "import EXCEPTIONS OTHERS = 1.
BKK_ALV_GET_FIELDCAT CALL FUNCTION 'BKK_ALV_GET_FIELDCAT' EXPORTING i_report = l_report i_listno = 1 TABLES t_fieldcat = ftab EXCEPTIONS OTHERS = 1.
BKK_ALV_SET_OUTLEN_ACNUM_EXT CALL FUNCTION 'BKK_ALV_SET_OUTLEN_ACNUM_EXT' "LV150698 EXPORTING i_fieldname = 'ACNUM_EXT' TABLES t_bkk_outlenalv = l_t_bkk_outlenalv t_ftab = ftab EXCEPTIONS OTHERS = 1.
BKK_ALV_SET_HOSPOTS_JUMPFIELDS CALL FUNCTION 'BKK_ALV_SET_HOSPOTS_JUMPFIELDS' TABLES t_ftab = ftab EXCEPTIONS OTHERS = 1.
BKK_ALV_COMPUTE_PRINT_COL CALL FUNCTION 'BKK_ALV_COMPUTE_PRINT_COL' EXPORTING i_linsz = sy-linsz i_colno = sy-colno i_cols = l_pagno_col IMPORTING e_printcol = l_h_colno e_rc = l_rc EXCEPTIONS OTHERS = 1.
BKK_FREE_SELVAR_IMPORT_BKKINDX CALL FUNCTION 'BKK_FREE_SELVAR_IMPORT_BKKINDX' "TB241198 EXPORTING "TB241198 i_uname = sy-uname "TB241198 i_repid = l_report "TB241198 i_listno = l_listno_alv "TB241198 IMPORTING "TB241198 e_rc = l_rc "TB241198 TABLES "TB241198 e_t_selfields = l_tab_fields "TB241198 e_t_expr = tab_expr "TB241198 EXCEPTIONS "TB241198 OTHERS = 1. "TB241198
FREE_SELECTIONS_INIT CALL FUNCTION 'FREE_SELECTIONS_INIT' EXPORTING * KIND = 'F' kind = 'T' "f.weitere Feldauswahl
FREE_SELECTIONS_DIALOG CALL FUNCTION 'FREE_SELECTIONS_DIALOG' EXPORTING selection_id = hlp_selid title = l_title status = 1 as_window = 'X' start_row = 10 start_col = 5 IMPORTING where_clauses = tab_where expressions = tab_expr field_ranges = tab_range TABLES fields_tab = l_tab_fields EXCEPTIONS no_action = 1 * plus andere OTHERS = 7.
BKK_FREE_SELVAR_EXPORT_BKKINDX CALL FUNCTION 'BKK_FREE_SELVAR_EXPORT_BKKINDX' "TB241198 EXPORTING "TB241198 i_uname = sy-uname "TB241198 i_repid = l_report "TB241198 i_listno = l_listno_alv "TB241198 * IMPORTING "TB241198 * E_RC = "TB241198 TABLES "TB241198 i_t_selfields = l_tab_fields "TB241198 i_t_expr = tab_expr "TB241198 EXCEPTIONS "TB241198 OTHERS = 1. "TB241198
BKK_ALV_GET_FREE_SELPARAM_INFO CALL FUNCTION 'BKK_ALV_GET_FREE_SELPARAM_INFO' "TB180699 IMPORTING "TB180699 e_s_selhide = l_s_selhide "TB180699 TABLES "TB180699 t_free_expr = tab_expr "TB180699 EXCEPTIONS "TB180699 OTHERS = 1. "TB180699
REUSE_ALV_LIST_LAYOUT_INFO_GET CALL FUNCTION 'REUSE_ALV_LIST_LAYOUT_INFO_GET' IMPORTING * ES_LAYOUT = et_fieldcat = ftab * ET_SORT = * ET_FILTER = * ES_LIST_SCROLL = * ES_VARIANT = EXCEPTIONS no_infos = 1 program_error = 2 OTHERS = 3.
BKK_ALV_CHANGE_FCAT_BALANCES CALL FUNCTION 'BKK_ALV_CHANGE_FCAT_BALANCES' EXPORTING i_ucomm = l_ucomm TABLES t_fieldcat = ftab EXCEPTIONS OTHERS = 1.
REUSE_ALV_LIST_LAYOUT_INFO_SET CALL FUNCTION 'REUSE_ALV_LIST_LAYOUT_INFO_SET' EXPORTING * IS_LAYOUT = it_fieldcat = ftab * IT_SORT = * IT_FILTER = * IS_LIST_SCROLL = EXCEPTIONS OTHERS = 1.
Contribute (Add Comments)
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.
The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.
This will then be available for everyone to easily find by simply searching on the report name RFBKLOC1 or its description.