WDPR1F01 SAP ABAP INCLUDE - Include WDPR1F01

WDPR1F01 is a standard ABAP INCLUDE 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 WDPR1F01 into the relevant SAP transactions such as SE38 or SE80

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.

Text pool values

INCLUDES used within this REPORT WDPR1F01

No INCLUDES are used within this REPORT code!

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:

TB_DEAL_BUKRS_CHECK
  CALL FUNCTION 'TB_DEAL_BUKRS_CHECK'
    TABLES
      i_tab_companycode = so_coco
      e_tab_companycode = g_rng_coco
    EXCEPTIONS
      OTHERS            = 1.

FTR_PARTNER_GET_VALUES
  CALL FUNCTION 'FTR_PARTNER_GET_VALUES'
    EXPORTING
      pi_partner_role = u_roletype
    IMPORTING
      pe_partner      = u_field.

TRCA_COMPANYCODE_GETDETAIL
    CALL FUNCTION 'TRCA_COMPANYCODE_GETDETAIL'
      EXPORTING
        companycode = l_wa_twd01-bukrs
      IMPORTING
        companyname = l_wa_sa_list-xbukrs
      EXCEPTIONS
        not_found   = 1
        OTHERS      = 2.

SECURITIES_ACCOUNT_CAT_READ
      CALL FUNCTION 'SECURITIES_ACCOUNT_CAT_READ'
        EXPORTING
          im_secacc_type             = l_wa_twd01-secacc_type
        IMPORTING
          ex_secacc_cat              = l_wa_sa_list-secacc_cat
        EXCEPTIONS
          wrong_import_parameter     = 1
          security_account_not_found = 2
          secacc_type_not_found      = 3
          OTHERS                     = 4.

TB_PARTNER_CHECK
    CALL FUNCTION 'TB_PARTNER_CHECK'
      EXPORTING
        companycode              = u_bukrs
        flg_customer             = space
        partner                  = u_partner
        zgp                      = 'X'
      IMPORTING
        bp000_entry              = l_wa_bp000
      EXCEPTIONS
        customer                 = 1
        customer_companycode     = 2
        delete_indicator_partner = 3
        delete_indicator_role    = 4
        partner                  = 5
        partner_auth             = 6
        partner_not_released     = 7
        role                     = 8
        OTHERS                   = 9.

FTR_PARTNER_GET_ADDRESS_PRINT
    CALL FUNCTION 'FTR_PARTNER_GET_ADDRESS_PRINT'
      EXPORTING
        pi_partner_id             = u_partner
        pi_partner_role           = u_roletype
        pi_companycode            = u_bukrs
      IMPORTING
        pe_address                = l_wa_adrs
      EXCEPTIONS
        partner_not_found         = 1
        partner_role_not_found    = 2
        partner_not_released      = 3
        partner_to_be_deleted     = 4
        partner_address_not_found = 5
        OTHERS                    = 6.

C_DIC_DOMAIN_VALUE_TEXT_READ
  CALL FUNCTION 'C_DIC_DOMAIN_VALUE_TEXT_READ'
    EXPORTING
      name      = u_dname
      spras     = sy-langu
      value     = u_dvalue
    IMPORTING
      text      = c_dtext
    EXCEPTIONS
      not_found = 1
      OTHERS    = 2.

ISSR_IF_GET_ISSR_STATE
  CALL FUNCTION 'ISSR_IF_GET_ISSR_STATE'
    EXPORTING
      i_bukrs = u_bukrs
    IMPORTING
      e_state = l_new_bav_state.

REUSE_ALV_FIELDCATALOG_MERGE
  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_program_name   = l_repid
      i_structure_name = 'TRSS_SECACC_LIST_ALV'
    CHANGING
      ct_fieldcat      = l_tab_fieldcat.

REUSE_ALV_FIELDCATALOG_MERGE
  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_program_name   = l_repid
      i_structure_name = 'TRST_SECACC_BANK'
    CHANGING
      ct_fieldcat      = l_tab_fieldcat.

REUSE_ALV_EVENTS_GET
  CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type = 0
    IMPORTING
      et_events   = c_tab_event.

REUSE_ALV_VARIANT_EXISTENCE
    CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE'
      EXPORTING
        i_save     = 'A'
      CHANGING
        cs_variant = l_str_variant
      EXCEPTIONS
        OTHERS     = 01.

REUSE_ALV_VARIANT_F4
  CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
    EXPORTING
      is_variant = l_str_variant
      i_save     = 'A'
    IMPORTING
      e_exit     = l_exit
      es_variant = l_str_variant
    EXCEPTIONS
      not_found  = 1.

REUSE_ALV_COMMENTARY_WRITE
  CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = g_tab_list_top_of_page.

TPM_TRS_DISPLAY_EXT_SEC_ACC
      CALL FUNCTION 'TPM_TRS_DISPLAY_EXT_SEC_ACC'
        EXPORTING
          im_tab_ext_sec_acc_no = l_tab_ext_sec_acc_no
          im_expand_nodes       = 'X'
          im_no_selection       = 'X'.

TPM_TRS_DISPLAY_EXT_SEC_ACC
        CALL FUNCTION 'TPM_TRS_DISPLAY_EXT_SEC_ACC'
          EXPORTING
            im_tab_ext_sec_acc_no = l_tab_ext_sec_acc_no
            im_expand_nodes       = 'X'
            im_no_selection       = 'X'.

TPM_TRS_DISPLAY_EXT_SEC_ACC
      CALL FUNCTION 'TPM_TRS_DISPLAY_EXT_SEC_ACC'
        EXPORTING
          im_tab_ext_sec_acc_no = g_tab_incon_ext_sec_acc_no
          im_expand_nodes       = 'X'
          im_no_selection       = 'X'
          im_check_warnings     = 'X'.

TPM_TRS_DISPLAY_EXT_SEC_ACC
  CALL FUNCTION 'TPM_TRS_DISPLAY_EXT_SEC_ACC'
    EXPORTING
      im_tab_ext_sec_acc_no = l_tab_ext_sec_acc_no
    IMPORTING
      ex_ext_sec_acc_no     = x.