RESTORE_SMODISRC_PROTOCOL SAP Function module

RESTORE_SMODISRC_PROTOCOL 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 RESTORE_SMODISRC_PROTOCOL into the relevant SAP transaction such as SE37 or SE80.

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

Pattern for FM RESTORE_SMODISRC_PROTOCOL - RESTORE SMODISRC PROTOCOL

CALL FUNCTION 'RESTORE_SMODISRC_PROTOCOL' "
  EXPORTING
    state =                     " progdir-state  ABAP: Program Status (Active, Saved, Transported...)
*   objtype =                   " smodilog-obj_type  Object Type
*   objname =                   " smodilog-obj_name  ABAP/4 Development Workbench: LIMU name
    subtype =                   " smodilog-sub_type  Object Type
    subname =                   " smodilog-sub_name  ABAP/4 Development Workbench: LIMU name
  TABLES
    smodilog_tab =              " smodilog      Log of Customer Modifications to Dev. Env. Objects
    new_source =                " abaptxt255    ABAP Text Line with Length 255
    smodisrc_tab =              " smodisrc      Customer Modification Log: Object Data (Active)
    .  "  RESTORE_SMODISRC_PROTOCOL

ABAP code example for Function Module RESTORE_SMODISRC_PROTOCOL

The ABAP code below is a full code listing to execute function module RESTORE_SMODISRC_PROTOCOL 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:
it_smodilog_tab  
 
 TYPE STANDARD TABLE OF SMODILOG,"TABLES PARAM
wa_smodilog_tab
 
 LIKE LINE OF it_smodilog_tab
,
it_new_source  
 
 TYPE STANDARD TABLE OF ABAPTXT255,"TABLES PARAM
wa_new_source
 
 LIKE LINE OF it_new_source
,
it_smodisrc_tab  
 
 TYPE STANDARD TABLE OF SMODISRC,"TABLES PARAM
wa_smodisrc_tab
 
 LIKE LINE OF it_smodisrc_tab
.

 

SELECT single STATE 
  FROM PROGDIR 
  INTO @DATA(ld_state).

 

SELECT single OBJ_TYPE 
  FROM SMODILOG 
  INTO @DATA(ld_objtype).

 

SELECT single OBJ_NAME 
  FROM SMODILOG 
  INTO @DATA(ld_objname).

 

SELECT single SUB_TYPE 
  FROM SMODILOG 
  INTO @DATA(ld_subtype).

 

SELECT single SUB_NAME 
  FROM SMODILOG 
  INTO @DATA(ld_subname).

 

"populate fields of struture and append to itab
append wa_smodilog_tab to it_smodilog_tab.
 

"populate fields of struture and append to itab
append wa_new_source to it_new_source.
 

"populate fields of struture and append to itab
append wa_smodisrc_tab to it_smodisrc_tab.
.

CALL FUNCTION 'RESTORE_SMODISRC_PROTOCOL'
  EXPORTING
    state =                      ld_state
*   objtype =                    ld_objtype
*   objname =                    ld_objname
    subtype =                    ld_subtype
    subname =                    ld_subname
  TABLES
    smodilog_tab =               it_smodilog_tab
    new_source =                 it_new_source
    smodisrc_tab =               it_smodisrc_tab
    .  "  RESTORE_SMODISRC_PROTOCOL

IF SY-SUBRC EQ 0.
  "All OK
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_state
 
 TYPE PROGDIR-STATE ,
it_smodilog_tab
 
 TYPE STANDARD TABLE OF SMODILOG ,
wa_smodilog_tab
 
 LIKE LINE OF it_smodilog_tab,
ld_objtype
 
 TYPE SMODILOG-OBJ_TYPE ,
it_new_source
 
 TYPE STANDARD TABLE OF ABAPTXT255 ,
wa_new_source
 
 LIKE LINE OF it_new_source,
ld_objname
 
 TYPE SMODILOG-OBJ_NAME ,
it_smodisrc_tab
 
 TYPE STANDARD TABLE OF SMODISRC ,
wa_smodisrc_tab
 
 LIKE LINE OF it_smodisrc_tab,
ld_subtype
 
 TYPE SMODILOG-SUB_TYPE ,
ld_subname
 
 TYPE SMODILOG-SUB_NAME .



SELECT single STATE 
  FROM PROGDIR 
  INTO ld_state.
 

"populate fields of struture and append to itab
append wa_smodilog_tab to it_smodilog_tab.

SELECT single OBJ_TYPE 
  FROM SMODILOG 
  INTO ld_objtype.
 

"populate fields of struture and append to itab
append wa_new_source to it_new_source.

SELECT single OBJ_NAME 
  FROM SMODILOG 
  INTO ld_objname.
 

"populate fields of struture and append to itab
append wa_smodisrc_tab to it_smodisrc_tab.

SELECT single SUB_TYPE 
  FROM SMODILOG 
  INTO ld_subtype.


SELECT single SUB_NAME 
  FROM SMODILOG 
  INTO ld_subname.