J_1AAINFL_REVERSE SAP ABAP Report - Reverse Multiple Asset Revaluation Documents

J_1AAINFL_REVERSE 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 J_1AAINFL_REVERSE 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 J_1AAINFL_REVERSE

INCLUDE LAFARCON.

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:

FI_COMPANY_CODE_CHECK
  CALL FUNCTION 'FI_COMPANY_CODE_CHECK'
    EXPORTING
      i_bukrs      = bukrs-low
    EXCEPTIONS
      company_code = 1
      OTHERS       = 2.

DATE_TO_PERIOD_CONVERT
  CALL FUNCTION 'DATE_TO_PERIOD_CONVERT'
    EXPORTING
      i_date  = f_date
      i_periv = f_periv
    IMPORTING
      e_buper = f_perid
      e_gjahr = f_gjahr.

DATE_TO_PERIOD_CONVERT
  CALL FUNCTION 'DATE_TO_PERIOD_CONVERT'
    EXPORTING
      i_date  = f_date
      i_periv = f_periv
    IMPORTING
      e_buper = f_perid
      e_gjahr = f_gjahr1.

FIRST_AND_LAST_DAY_IN_YEAR_GET
  CALL FUNCTION 'FIRST_AND_LAST_DAY_IN_YEAR_GET'
    EXPORTING
      i_gjahr    = f_gjahr
      i_periv    = f_periv
    IMPORTING
      e_last_day = f_last_day.

RA_ASSET_ENQUEUE
     CALL FUNCTION 'RA_ASSET_ENQUEUE'
           EXPORTING
                BUKRS   = BUKRS-LOW
                ANLN1   = L_ANLN1_INIT
                ANLN2   = L_ANLN2_INIT
                I_SCOPE = '2'.

RA_ASSET_DEQUEUE
        CALL FUNCTION 'RA_ASSET_DEQUEUE'                 "Note 777092(b)
                EXPORTING
                     BUKRS = BUKRS-LOW
                     ANLN1 = L_ANLN1_INIT
                     ANLN2 = L_ANLN2_INIT.               "Note 777092(e)

AMDP_MESSAGE_SEND
        CALL FUNCTION 'AMDP_MESSAGE_SEND' " message ab.reversed doc.

REUSE_ALV_LIST_DISPLAY
  CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
    EXPORTING
      i_callback_program       = g_repid
      i_callback_pf_status_set = g_status
      i_callback_user_command  = g_user_command
      i_save                   = g_save
      is_variant               = g_variant
      it_fieldcat              = gt_fieldcat[]
      is_layout                = gs_layout
    TABLES
      t_outtab                 = gt_outtab.

RA_ASSET_DEQUEUE
         CALL FUNCTION 'RA_ASSET_DEQUEUE'                "Note 777092(b)
                EXPORTING
                     BUKRS = BUKRS-LOW
                     ANLN1 = L_ANLN1_INIT
                     ANLN2 = L_ANLN2_INIT.               "Note 777092(e)

AMDP_MESSAGE_SEND
    CALL FUNCTION 'AMDP_MESSAGE_SEND' " send message ab.reversed

AMSS_DOCUMENT_REVERSE
  CALL FUNCTION 'AMSS_DOCUMENT_REVERSE'
    EXPORTING
      i_awtyp = wa_anek-awtyp
      i_awref = wa_anek-belnr
      i_aworg = wa_anek-aworg
      i_awsys = wa_anek-awsys
      i_gjahr = wa_anek-gjahr
      i_belnr = wa_anek-belnr
      i_budat = wa_anek-budat
      i_monat = wa_anek-monat
      i_stgrd = '01'  " reason for reversal.

AMBU_AC_TABLES_GET_FROM_BUFFER
  CALL FUNCTION 'AMBU_AC_TABLES_GET_FROM_BUFFER'
    TABLES
      t_acchd = lt_acchd
      t_accit = lt_accit
      t_accda = lt_accda
      t_acccr = lt_acccr.

AMBU_CALL_AC_DOCUMENT_POST
  CALL FUNCTION 'AMBU_CALL_AC_DOCUMENT_POST'
    IMPORTING
      e_awref       = wa_anek-belnr
      e_aworg       = wa_anek-aworg
      e_awtyp       = wa_anek-awtyp
      e_awsys       = wa_anek-awsys
    TABLES
      t_accit       = lt_accit
      t_acchd       = lt_acchd
      t_acccr       = lt_acccr
      t_accda       = lt_accda
      t_return      = lt_bapiret2
    EXCEPTIONS
      error_message = 01.