SAP Reports / Programs

comments icon Comments

SAPF0AIF SAP ABAP Report - Form Routines for User Exits of View Cluster







SAPF0AIF 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 SAPF0AIF 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.






SUBMIT SAPF0AIF. "Basic submit
SUBMIT SAPF0AIF AND RETURN. "Return to original report after report execution complete
SUBMIT SAPF0AIF VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Form Routines for User Exits of View Cluster
Text Symbol: 001 = Transaction type for invest. support measure
Text Symbol: 002 = Transaction type for revaluation
Text Symbol: 003 = Transaction type for revaluation measure
Text Symbol: 100 = Error list for invest. support measures
Text Symbol: 700 = Locked data
Text Symbol: 701 = Data is locked by
Text Symbol: 702 = User
Text Symbol: 703 = Display only
Text Symbol: 704 = Do you want to display the locked data?


INCLUDES used within this REPORT SAPF0AIF

INCLUDE LSVCMCOD.


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:

ENQUEUE_E_TABLE
      CALL FUNCTION 'ENQUEUE_E_TABLE'
        EXPORTING
          mode_rstable   = 'E'   "Exklusivsperre
          tabname        = 'TABW'
        EXCEPTIONS
          foreign_lock   = 1
          system_failure = 2
          OTHERS         = 3.

ENQUEUE_E_TABLE
      CALL FUNCTION 'ENQUEUE_E_TABLE'
        EXPORTING
          mode_rstable   = 'E'   "Exklusivsperre
          tabname        = 'TABWT'
        EXCEPTIONS
          foreign_lock   = 1
          system_failure = 2
          OTHERS         = 3.

DEQUEUE_ALL
      CALL FUNCTION 'DEQUEUE_ALL'.

DEQUEUE_ALL
    CALL FUNCTION 'DEQUEUE_ALL'.

0AIF_INVSL_BUFFER
    CALL FUNCTION '0AIF_INVSL_BUFFER'
      EXPORTING
        i_read   = 'X'
      CHANGING
        c_v_t085 = ss_v_t085.

0AIF_AUFSL_BUFFER
    CALL FUNCTION '0AIF_AUFSL_BUFFER'
      EXPORTING
        i_read   = 'X'
      CHANGING
        c_v_t089 = ss_v_t089.

AA_CUS_TOTAL_TO_LOCAL_TOTAL
      CALL FUNCTION 'AA_CUS_TOTAL_TO_LOCAL_TOTAL'
        EXPORTING
          i_total    = 
        CHANGING
          e_ls_total = lt_total_v_t085.

0AIF_INVSL_BUFFER
      CALL FUNCTION '0AIF_INVSL_BUFFER'
        CHANGING
          c_v_t085 = ss_v_t085.

0AIF_AUFSL_BUFFER
      CALL FUNCTION '0AIF_AUFSL_BUFFER'
        CHANGING
          c_v_t089 = ss_v_t089.

0AIF_INVSL_BUFFER
  CALL FUNCTION '0AIF_INVSL_BUFFER'
    EXPORTING
      i_read   = 'X'
    CHANGING
      c_v_t085 = ls_v_t085.

0AIF_EXCHANGE_BWASL
  CALL FUNCTION '0AIF_EXCHANGE_BWASL'
    EXPORTING
      i_read   = 'X'
    TABLES
      it_tabw  = lt_tabw[]
      it_tabwt = lt_tabwt[].

0AIF_EXCHANGE_BWASL
      CALL FUNCTION '0AIF_EXCHANGE_BWASL'
        TABLES
          it_tabw  = lt_tabw[]
          it_tabwt = lt_tabwt[].

0AIF_EXCHANGE_BWASL
      CALL FUNCTION '0AIF_EXCHANGE_BWASL'
        EXPORTING
          i_del_flag = 'X'
        TABLES
          it_tabw    = lt_tabw[]
          it_tabwt   = lt_tabwt[].

0AIF_AUFSL_BUFFER
  CALL FUNCTION '0AIF_AUFSL_BUFFER'
    EXPORTING
      i_read   = 'X'
    CHANGING
      c_v_t089 = ls_v_t089.

0AIF_EXCHANGE_BWASL
  CALL FUNCTION '0AIF_EXCHANGE_BWASL'
    EXPORTING
      i_read   = 'X'
    TABLES
      it_tabw  = lt_tabw[]
      it_tabwt = lt_tabwt[].

0AIF_EXCHANGE_BWASL
      CALL FUNCTION '0AIF_EXCHANGE_BWASL'
        TABLES
          it_tabw  = lt_tabw[]
          it_tabwt = lt_tabwt[].

0AIF_EXCHANGE_BWASL
      CALL FUNCTION '0AIF_EXCHANGE_BWASL'
        EXPORTING
          i_del_flag = 'X'
        TABLES
          it_tabw    = lt_tabw[]
          it_tabwt   = lt_tabwt[].

T093A_READ_MULTIPLE
  CALL FUNCTION 'T093A_READ_MULTIPLE'
    EXPORTING
      i_afapl = ld_afapl
    TABLES
      t_t093a = lt_t093a.

T093_READ_MULTIPLE
















  CALL FUNCTION 'T093_READ_MULTIPLE'
    EXPORTING
      i_afapl = ld_afapl
    TABLES
      t_t093  = lt_t093.

MESSAGES_INITIALIZE
  CALL FUNCTION 'MESSAGES_INITIALIZE'.

AA_CUS_TOTAL_TO_LOCAL_TOTAL
    CALL FUNCTION 'AA_CUS_TOTAL_TO_LOCAL_TOTAL'
      EXPORTING
        i_total    = 
      CHANGING
        e_ls_total = lt_t085.

0AIF_EXCHANGE_BWASL
  CALL FUNCTION '0AIF_EXCHANGE_BWASL'
    EXPORTING
      i_read  = 'X'
    TABLES
      it_tabw = lt_tabw[].

0AIF_EXCHANGE_BWASL
  CALL FUNCTION '0AIF_EXCHANGE_BWASL'
    TABLES
      it_tabw = lt_tabw[].

MESSAGES_SHOW
  CALL FUNCTION 'MESSAGES_SHOW'
    EXPORTING
      send_if_one = ' '
      show_linno  = space
      object      = text-100
    EXCEPTIONS
      no_messages = 2.

MESSAGES_STOP
  CALL FUNCTION 'MESSAGES_STOP'
    EXCEPTIONS
      a_message = 1
      e_message = 2
      i_message = 3
      w_message = 4
      OTHERS    = 5.

T093A_READ_MULTIPLE
  CALL FUNCTION 'T093A_READ_MULTIPLE'
    EXPORTING
      i_afapl = ld_afapl
    TABLES
      t_t093a = lt_t093a.

T093_READ_MULTIPLE
  CALL FUNCTION 'T093_READ_MULTIPLE'
    EXPORTING
      i_afapl = ld_afapl
    TABLES
      t_t093  = lt_t093.

MESSAGES_INITIALIZE
  CALL FUNCTION 'MESSAGES_INITIALIZE'.

0AIF_EXCHANGE_BWASL
  CALL FUNCTION '0AIF_EXCHANGE_BWASL'
    EXPORTING
      i_read  = 'X'
    TABLES
      it_tabw = lt_tabw[].

0AIF_EXCHANGE_BWASL
  CALL FUNCTION '0AIF_EXCHANGE_BWASL'
    TABLES
      it_tabw = lt_tabw[].

MESSAGES_SHOW
  CALL FUNCTION 'MESSAGES_SHOW'
    EXPORTING
      send_if_one = ''
      show_linno  = space
      object      = text-100
    EXCEPTIONS
      no_messages = 2.

MESSAGES_STOP
  CALL FUNCTION 'MESSAGES_STOP'
    EXCEPTIONS
      a_message = 1
      e_message = 2
      i_message = 3
      w_message = 4
      OTHERS    = 5.

VIEWCLUSTER_SET_EXCL_CUA_FUNCT
    CALL FUNCTION 'VIEWCLUSTER_SET_EXCL_CUA_FUNCT'
      EXPORTING
        object         = vcl_struc_tab-object
      TABLES
        excl_cua_funct = lt_functions.

MESSAGE_STORE
  CALL FUNCTION 'MESSAGE_STORE'
    EXPORTING
      arbgb = v_arg
      msgty = v_typ
      msgv1 = v_var1
      msgv2 = v_var2
      msgv3 = v_var3
      msgv4 = v_var4
      txtnr = l_msgno.

VIEW_ENQUEUE
  CALL FUNCTION 'VIEW_ENQUEUE'
    EXPORTING
      action               = vcl_enq_action
      enqueue_mode         = 'E'
      view_name            = ld_viewname
      enqueue_range        = 'X'
    TABLES
      sellist              = lt_sellist
    EXCEPTIONS
      client_reference     = 1
      foreign_lock         = 2
      invalid_action       = 3
      invalid_enqueue_mode = 4
      system_failure       = 5
      table_not_found      = 6
      OTHERS               = 7.

POPUP_TO_CONFIRM_WITH_MESSAGE
  CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE'
    EXPORTING
      diagnosetext1 = text-701
      diagnosetext2 = ld_user
      diagnosetext3 = text-703
      textline1     = text-704
      titel         = text-700
      defaultoption = 'Y'
    IMPORTING
      answer        = ld_answer.

0AIF_EXCHANGE_BWASL
    CALL FUNCTION '0AIF_EXCHANGE_BWASL'
      EXPORTING
        i_read   = 'X'
      TABLES
        it_tabw  = lt_tabw[]
        it_tabwt = lt_tabwt[].

0AIF_EXCHANGE_BWASL
    CALL FUNCTION '0AIF_EXCHANGE_BWASL'
      TABLES
        it_tabw  = lt_tabw[]
        it_tabwt = lt_tabwt[].




0AIF_INVSL_BUFFER
  CALL FUNCTION '0AIF_INVSL_BUFFER'
    CHANGING
      c_v_t085 = ld_v_t085.

0AIF_EXCHANGE_BWASL
  CALL FUNCTION '0AIF_EXCHANGE_BWASL'
    EXPORTING
      i_read   = 'X'
    TABLES
      it_tabw  = lt_tabw[]
      it_tabwt = lt_tabwt[].

0AIF_EXCHANGE_BWASL
  CALL FUNCTION '0AIF_EXCHANGE_BWASL'
    TABLES
      it_tabw  = lt_tabw[]
      it_tabwt = lt_tabwt[].

0AIF_AUFSL_BUFFER
  CALL FUNCTION '0AIF_AUFSL_BUFFER'
    CHANGING
      c_v_t089 = ld_v_t089.

0AIF_EXCHANGE_BWASL
  CALL FUNCTION '0AIF_EXCHANGE_BWASL'
    EXPORTING
      i_read   = 'X'
    TABLES
      it_tabw  = lt_tabw[]
      it_tabwt = lt_tabwt[].

T093_READ_MULTIPLE
    CALL FUNCTION 'T093_READ_MULTIPLE'
      EXPORTING
        i_afapl = ld_v_t089-afapl
      TABLES
        t_t093  = lt_t093
        t_t093t = lt_t093t.

0AIF_EXCHANGE_BWASL
  CALL FUNCTION '0AIF_EXCHANGE_BWASL'
    TABLES
      it_tabw  = lt_tabw[]
      it_tabwt = lt_tabwt[].


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 SAPF0AIF or its description.


   
 

SAPF0AIF - Form Routines for User Exits of View Cluster
SAPF0AIF - Form Routines for User Exits of View Cluster
SAPF080V_C - Subroutine Pool for SAPL080M
SAPF080V_C - Subroutine Pool for SAPL080M
SAPF080T - Sub-routine pool for SAPL080T
SAPF080T - Sub-routine pool for SAPL080T