IMMO_PS_OBJEKT_ZUORD SAP Function module

IMMO_PS_OBJEKT_ZUORD is a standard SAP function module available within R/3 SAP systems depending on your version and release level. Below is the pattern details for this FM showing its interface including any import and export parameters, exceptions etc as well as any documentation contributions (Comments) specific to the object.

See here to view full function module documentation and code listing, simply by entering the name IMMO_PS_OBJEKT_ZUORD into the relevant SAP transaction such as SE37 or SE80.

Associated Function Group: FVPS
Released Date: Not Released
Processing type: Normal fucntion module

Pattern for FM IMMO_PS_OBJEKT_ZUORD - IMMO PS OBJEKT ZUORD

CALL FUNCTION 'IMMO_PS_OBJEKT_ZUORD' "
  EXPORTING
*   i_anzeig = SPACE            "
    i_bukrs =                   " t001-bukrs
    i_intreno =                 " viob01-intreno
    i_obj_art =                 " tiv77-roart
*   i_sgenr = SPACE             " viob03-sgenr
*   i_sgrnr = SPACE             " viob02-sgrnr
*   i_smenr = SPACE             " vimi01-smenr
    i_swenr =                   " viob01-swenr
  IMPORTING
    e_chng_flag =               "
  TABLES
    t_immo_ps =                 " aviob38
  EXCEPTIONS
    UNBEK_OBJEKT_ART = 1        "
    WRONG_IMMO_IDENT = 2        "
    .  "  IMMO_PS_OBJEKT_ZUORD

ABAP code example for Function Module IMMO_PS_OBJEKT_ZUORD

The ABAP code below is a full code listing to execute function module IMMO_PS_OBJEKT_ZUORD including all data declarations. The code uses the latest in-line data DECLARATION SYNTAX but I have included an ABAP code snippet at the end to show how declarations would look using the original method of declaring data variables up front. This will allow you to compare and fully understand the new inline method. Please note some of the newer syntax such as the @DATA is not available until a later 4.70 service pack (SP8).

DATA:
ld_e_chng_flag  
 
 TYPE STRING
,
it_t_immo_ps  
 
 TYPE STANDARD TABLE OF AVIOB38,"TABLES PARAM
wa_t_immo_ps
 
 LIKE LINE OF it_t_immo_ps
.


DATA(ld_i_anzeig) = 'some text here'.
 

SELECT single BUKRS 
  FROM T001 
  INTO @DATA(ld_i_bukrs).

 

SELECT single INTRENO 
  FROM VIOB01 
  INTO @DATA(ld_i_intreno).

 

SELECT single ROART 
  FROM TIV77 
  INTO @DATA(ld_i_obj_art).

 

SELECT single SGENR 
  FROM VIOB03 
  INTO @DATA(ld_i_sgenr).

 

SELECT single SGRNR 
  FROM VIOB02 
  INTO @DATA(ld_i_sgrnr).

 

SELECT single SMENR 
  FROM VIMI01 
  INTO @DATA(ld_i_smenr).

 

SELECT single SWENR 
  FROM VIOB01 
  INTO @DATA(ld_i_swenr).

 

"populate fields of struture and append to itab
append wa_t_immo_ps to it_t_immo_ps.
.

CALL FUNCTION 'IMMO_PS_OBJEKT_ZUORD'
  EXPORTING
*   i_anzeig =                   ld_i_anzeig
    i_bukrs =                    ld_i_bukrs
    i_intreno =                  ld_i_intreno
    i_obj_art =                  ld_i_obj_art
*   i_sgenr =                    ld_i_sgenr
*   i_sgrnr =                    ld_i_sgrnr
*   i_smenr =                    ld_i_smenr
    i_swenr =                    ld_i_swenr
  IMPORTING
    e_chng_flag =                ld_e_chng_flag
  TABLES
    t_immo_ps =                  it_t_immo_ps
  EXCEPTIONS
    UNBEK_OBJEKT_ART =           1
    WRONG_IMMO_IDENT =           2
    .  "  IMMO_PS_OBJEKT_ZUORD

IF SY-SUBRC EQ 0.
  "All OK
ELSEIF SY-SUBRC EQ 1. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 2. "Exception
  "Add code for exception here
ENDIF.

ABAP code to compare 7.40 inline data declaration with original syntax

The below ABAP code uses the older none in-line data declarations. This allows you to see the coding differences/benefits of the later inline syntax. It may also be useful if you are using an older version of SAP as some of the newer syntax above, such as the @DATA is not available until 4.70 EHP 8.

DATA:

ld_e_chng_flag
 
 TYPE STRING ,
ld_i_anzeig
 
 TYPE STRING ,
it_t_immo_ps
 
 TYPE STANDARD TABLE OF AVIOB38 ,
wa_t_immo_ps
 
 LIKE LINE OF it_t_immo_ps,
ld_i_bukrs
 
 TYPE T001-BUKRS ,
ld_i_intreno
 
 TYPE VIOB01-INTRENO ,
ld_i_obj_art
 
 TYPE TIV77-ROART ,
ld_i_sgenr
 
 TYPE VIOB03-SGENR ,
ld_i_sgrnr
 
 TYPE VIOB02-SGRNR ,
ld_i_smenr
 
 TYPE VIMI01-SMENR ,
ld_i_swenr
 
 TYPE VIOB01-SWENR .


ld_i_anzeig = 'some text here'. 

"populate fields of struture and append to itab
append wa_t_immo_ps to it_t_immo_ps.

SELECT single BUKRS 
  FROM T001 
  INTO ld_i_bukrs.


SELECT single INTRENO 
  FROM VIOB01 
  INTO ld_i_intreno.


SELECT single ROART 
  FROM TIV77 
  INTO ld_i_obj_art.


SELECT single SGENR 
  FROM VIOB03 
  INTO ld_i_sgenr.


SELECT single SGRNR 
  FROM VIOB02 
  INTO ld_i_sgrnr.


SELECT single SMENR 
  FROM VIMI01 
  INTO ld_i_smenr.


SELECT single SWENR 
  FROM VIOB01 
  INTO ld_i_swenr.