IEA00F01 SAP ABAP INCLUDE - Form routines for Report RFVIEA00: Owner settlement real estate

IEA00F01 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 IEA00F01 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 IEA00F01. "Basic submit
SUBMIT IEA00F01 AND RETURN. "Return to original report after report execution complete
SUBMIT IEA00F01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement

Text pool values

INCLUDES used within this REPORT IEA00F01

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:

EIGENTUEMER_ANTEILE
*    CALL FUNCTION 'EIGENTUEMER_ANTEILE'
*         EXPORTING
*              I_INTRENO = INTRENO
*              I_DABRBEG = DABRBEG
*              I_DABREND = DABREND
*         IMPORTING
*              E_INTRENO = E_INTRENO
*         TABLES
*             T_ANTEILE = I_ANTEILE. "Rückgabe: Liste der Eigentümer mit

IMKEY_TO_INTRENO_READ
        CALL FUNCTION 'IMKEY_TO_INTRENO_READ'
          EXPORTING
            i_imkey   = i_steuer-imkey
          IMPORTING
            e_intreno = i_steuer-intreno.

PERIOD_DAY_DETERMINE
      CALL FUNCTION 'PERIOD_DAY_DETERMINE'
        EXPORTING
          i_gjahr = p_gjahr      " Geschäftsjahr
          i_monat = per_count    " Buchungsperiode
          i_periv = t001-periv   " Geschäftsjahresvariante
        IMPORTING
          e_fday  = loc_dabrbeg  " Datum Beginn der Abrechnung
          e_lday  = loc_dabrend. " Datum Ende der Abrechnung

EIGENTUEMER_ANTEILE
        CALL FUNCTION 'EIGENTUEMER_ANTEILE'
          EXPORTING
            i_intreno = intreno
            i_dabrbeg = loc_dabrbeg  " dabrbeg RW
            i_dabrend = loc_dabrend  " dabrend RW
          IMPORTING
            e_intreno = e_intreno
          TABLES
            t_anteile =
               i_anteile."Rückgabe: Liste Eigentümer mit %-Anteil.

RE_CALCULATE_BASE_AMOUNT
      CALL FUNCTION 'RE_CALCULATE_BASE_AMOUNT'
        EXPORTING
          i_taxam = tbssbseg-wrbtr
          i_mwskz = tbssbseg-mwskz
          i_waers = t001-waers
          i_bukrs = tbssbseg-bukrs
        IMPORTING
          e_fwbas = tbssbseg-unka_fwbas
        TABLES
          t_mwdat = lt_mwdat
        EXCEPTIONS
          OTHERS  = 1.

RE_INTERFACE_FILL
*     call function 'RE_INTERFACE_FILL'                  "TH
*          tables                                        "TH
*               tbssbkpf  = tbssbkpf                     "TH
*               tbssbseg  = tbssbseg                     "TH
*               tbsspara  = tbsspara                     "TH
*          changing                                      "TH
*               c_awkey   =  awkey.                      "TH

REAL_ESTATE_AWKEY
  CALL FUNCTION 'REAL_ESTATE_AWKEY'
    EXPORTING
      i_lfdnr = lfdnr
      i_xblnr = xblnr
    IMPORTING
      e_awkey = awkey
    EXCEPTIONS
      OTHERS  = 1.

RE_INTERFACE_DOCUMENT
    CALL FUNCTION 'RE_INTERFACE_DOCUMENT'                   "TH
         EXPORTING                                          "TH
              i_simul     = p_simul                         "TH
              i_awkey     = awkey                           "TH
              i_bukrs     = p_bukrs                         "TH
         IMPORTING                                          "TH
              e_belnr     = belnr                           "TH
              e_gjahr     = gjahr                           "TH
         TABLES                                             "TH
              doc_bssbkpf = tbssbkpf                        "TH
              doc_bssbseg = tbssbseg                        "TH
              doc_bsspara = tbsspara                        "TH
         EXCEPTIONS                                         "TH
              error       = 1                               "TH
              OTHERS      = 2.                              "TH

PERIOD_DAY_DETERMINE
  CALL FUNCTION 'PERIOD_DAY_DETERMINE'
    EXPORTING
      i_gjahr = p_gjahr          " Geschäftsjahr
      i_monat = p_pervon         " Buchungsperiode
      i_periv = t001-periv       " Geschäftsjahresvariante
    IMPORTING
      e_fday  = dabrbeg.         " Datum Beginn der Abrechnung

PERIOD_DAY_DETERMINE
  CALL FUNCTION 'PERIOD_DAY_DETERMINE'
    EXPORTING
      i_gjahr = p_gjahr          " Geschäftsjahr
      i_monat = p_perbis         " Buchungsperiode
      i_periv = t001-periv       " Geschäftsjahresvariante
    IMPORTING
      e_lday  = dabrend.         " Datum Ende der Abrechnung

RK_KOKRS_FIND
  CALL FUNCTION 'RK_KOKRS_FIND'
       EXPORTING
            bukrs      = p_bukrs
*           GSBER      = space
*           TEST_KOKRS = space
       IMPORTING
            kokrs      = kokrs.

PERIOD_DAY_DETERMINE
    CALL FUNCTION 'PERIOD_DAY_DETERMINE'
      EXPORTING
        i_gjahr              = p_gjahr        " Geschäftsjahr
        i_monat              = i_steuer-monat " Buchungsperiode
        i_periv              = t001-periv     " Geschäftsjahresvariante
      IMPORTING
        e_fday               = dbegper
        e_lday               = dendper
      EXCEPTIONS
        error_period         = 01
        error_period_version = 02
        firstday_not_defined = 03
        period_not_defined   = 04.

PERIOD_DAY_DETERMINE
  CALL FUNCTION 'PERIOD_DAY_DETERMINE'
       EXPORTING
            i_gjahr = p_gjahr          "  Geschäftsjahr
            i_monat = monat            "  Buchungsperiode
            i_periv = t001-periv       "  Geschäftsjahresvariante
       IMPORTING
            e_fday  = dbegper
            e_lday  = dendper
*           E_SPERIOD = I03
       EXCEPTIONS
            error_period         = 01
            error_period_version = 02
            firstday_not_defined = 03
            period_not_defined   = 04.

VISLID_BOOKING
*  CALL FUNCTION 'VISLID_BOOKING' IN UPDATE TASK
*       EXPORTING
*            VERBART = 'I'
*            TVISLID = VISLID.

VIEA05_BOOKING
*  CALL FUNCTION 'VIEA05_BOOKING' IN UPDATE TASK
*       EXPORTING
*            VERBART = 'I'
*            TVIEA05 = VIEA05.

VIEA03_BOOKING
  CALL FUNCTION 'VIEA03_BOOKING' IN UPDATE TASK
    EXPORTING
      verbart = 'I'
    TABLES
      xviea03 = xviea03.

VIEA06_BOOKING
  CALL FUNCTION 'VIEA06_BOOKING' IN UPDATE TASK
    EXPORTING
      verbart = 'I'
    TABLES
      xviea06 = xxviea06.                                   "xviea06.

REMD_DECODE_IMKEY
      CALL FUNCTION 'REMD_DECODE_IMKEY'
        EXPORTING
          i_objnr                 = xviea03-objnr
        IMPORTING
          e_viremaster            = i_viremaster
        EXCEPTIONS
          object_does_not_exist   = 1
          object_key_inconsistent = 2
          OTHERS                  = 3.

HELP_DOCU_SHOW_FOR_FIELD














  CALL FUNCTION 'HELP_DOCU_SHOW_FOR_FIELD'
       EXPORTING
*         DISPLAY       = ' '
            fieldname     = 'PERIOD_VON'
*         FIELDVALUE    = ' '
*         KEYWORD       = ' '
            tabname       = 'VIEA07'
*         HELP_IN_POPUP = ' '
       EXCEPTIONS
            OTHERS        = 0.