RFFMCCF_UNBLOCK_LOT SAP ABAP Report - Year End Closing; unblock document in CCF approval

RFFMCCF_UNBLOCK_LOT is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Mass rejection of Carryforward of Open Items At least the one-level approval procedure is active in the Customizing of Funds Managements in the see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.

If you would like to execute this report or see the full code listing simply enter RFFMCCF_UNBLOCK_LOT 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 RFFMCCF_UNBLOCK_LOT

INCLUDE IFIFMCON_BOOL.
INCLUDE IFIFMCON_VALUE_TYPES.
INCLUDE LFMAUEQU.

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:

FM_FYC_FIKRS_SET
  CALL FUNCTION 'FM_FYC_FIKRS_SET'
    EXPORTING
      i_flg_check_only = con_on
    CHANGING
      c_fikrs          = p_fikrs.

FM_FYC_SELSCR_STATUS_SET
  CALL FUNCTION 'FM_FYC_SELSCR_STATUS_SET'
    EXPORTING
      i_flg_fikrs_only = con_on.

FM_FYC_FIKRS_SET
  CALL FUNCTION 'FM_FYC_FIKRS_SET'
    CHANGING
      c_fikrs = p_fikrs.

FM_FYC_FIKRS_SET
      CALL FUNCTION 'FM_FYC_FIKRS_SET'
        EXPORTING
          i_flg_change = con_on
        CHANGING
          c_fikrs      = p_fikrs.

FM_FYC_FIKRS_SET
  CALL FUNCTION 'FM_FYC_FIKRS_SET'
    EXPORTING
      i_flg_check_only = con_on
    CHANGING
      c_fikrs          = p_fikrs.

FM_FYC_AUTHORITY_CHECK
  CALL FUNCTION 'FM_FYC_AUTHORITY_CHECK'
    EXPORTING
      i_fikrs      = p_fikrs
      i_activity   = fmau_cf_approve
      i_activity_a = space.

FM_CCF_LIST_TOP_PREPARE
  CALL FUNCTION 'FM_CCF_LIST_TOP_PREPARE'
    EXPORTING
      i_cnt_obj         = l_cnt_obj
      i_dias            = ''
      i_f_control_data  = g_f_control_data
    CHANGING
      c_background_id   = l_background_id
      c_f_lh_attributes = g_f_lh_attributes
      c_t_top_data      = g_t_top_data.

FM_CCF_LIST_TITLE_GET
  CALL FUNCTION 'FM_CCF_LIST_TITLE_GET'
    EXPORTING
      i_repid          = 'RFFMCCF_APPROVE_CHAIN'
      i_dias           = space
      i_action         = fmccf_con_action_rejected
      i_f_control_data = g_f_control_data
    IMPORTING
      e_title          = l_title.

REUSE_ALV_GRID_DISPLAY
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program          = 'RFFMCCF_UNBLOCK_LOT'
      i_callback_user_command     = 'USER_COMMAND'
      i_callback_top_of_page      = 'TOP_OF_PAGE'
      i_callback_html_top_of_page = 'HTML_TOP_OF_PAGE'
      it_fieldcat                 = gt_fieldcat
      i_grid_title                = l_title
    TABLES
      t_outtab                    = gt_fmccflot_disp.

REUSE_ALV_FIELDCATALOG_MERGE
  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_structure_name = 'FMCCFLOT_DISP'
    CHANGING
      ct_fieldcat      = ct_fieldcat.

FM_DOCUMENT_DISPLAY
  CALL FUNCTION 'FM_DOCUMENT_DISPLAY'
    EXPORTING
      i_belnr = lf_fmccflot_disp-refbn
      i_blpos = lf_fmccflot_disp-rfpos
      i_bukrs = l_bukrs
      i_gjahr = l_gjahr
      i_wrttp = l_wrttp
      i_rforg = lf_fmccflot_disp-rforg.

ENQUEUE_EFMCCFLOT
      CALL FUNCTION 'ENQUEUE_EFMCCFLOT'
        EXPORTING
*         MODE_FMCCF_S_LOTHD = 'E'
*         MANDT              = SY-MANDT
          FIKRS              = -fikrs
          SYEAR              = -syear
          CFLOTNR            = -cflotnr
*         X_FIKRS            = ' '
*         X_SYEAR            = ' '
*         X_CFLOTNR          = ' '
*         _SCOPE             = '2'
*         _WAIT              = ' '
*         _COLLECT           = ' '
        EXCEPTIONS
          FOREIGN_LOCK       = 1
          SYSTEM_FAILURE     = 2
          OTHERS             = 3.

FM_FYC_OPEN_ITEM_ENQUEUE
      CALL FUNCTION 'FM_FYC_OPEN_ITEM_ENQUEUE'
        EXPORTING
          i_refbn         = L_F_fmccflot-refbn
          i_refbt         = L_F_fmccflot-refbt
          i_rforg         = L_F_fmccflot-rforg
          i_rfsys         = L_F_fmccflot-rfsys
        CHANGING
          c_f_top_message = l_f_top_message
        EXCEPTIONS
          document_locked = 1
          others          = 2.

FM_CCF_APPROVAL_UPDATE
      CALL FUNCTION 'FM_CCF_APPROVAL_UPDATE'
        EXPORTING
          i_f_control_data = l_f_control_data
          i_t_fmccflot     = l_t_fmccflot
          i_memo           = l_memo
          i_flg_memo_upd   = 'X'.

FM_CCF_CONTROL_DATA_GET
  CALL FUNCTION 'FM_CCF_CONTROL_DATA_GET'
    EXPORTING
      i_fikrs          = u_fikrs
    IMPORTING
      e_f_control_data = c_f_control_data
    EXCEPTIONS
      error_occured    = 1
      OTHERS           = 2.

DYNP_VALUES_READ
  CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      dyname     = con_repid
      dynumb     = '1000'
    TABLES
      dynpfields = l_t_field_output.

DD_DTEL_GET
  CALL FUNCTION 'DD_DTEL_GET'
    EXPORTING
      langu         = sy-langu
      roll_name     = 'FM_CFLOTNR'
    TABLES
      dd04t_tab_a   = l_t_dd04t
    EXCEPTIONS
      illegal_value = 1
      OTHERS        = 2.

F4IF_INT_TABLE_VALUE_REQUEST
  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield     = 'CFLOTNR'
      window_title = l_title
      value_org    = 'S'
    TABLES
      value_tab    = l_t_lot
      return_tab   = l_t_return
    EXCEPTIONS
      OTHERS       = 1.