MARC_ARRAY_READ_WERK_ALL SAP Function module

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

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

Pattern for FM MARC_ARRAY_READ_WERK_ALL - MARC ARRAY READ WERK ALL

CALL FUNCTION 'MARC_ARRAY_READ_WERK_ALL' "
* EXPORTING
*   kzrfb = ' '                 " mtcom-kzrfb
*   sperrmodus = ' '            " tvgvi-spera
*   std_sperrmodus = ' '        " tvgvi-spera
*   exception_on_lock = ' '     " mtcom-kzrfb
  TABLES
    iwerk =                     " wsor_werk
*   marc_tab =                  " marc
  EXCEPTIONS
    ENQUEUE_MODE_CHANGED = 1    "
    LOCK_SYSTEM_ERROR = 2       "
    LOCK_ON_MARC = 3            "
    .  "  MARC_ARRAY_READ_WERK_ALL

ABAP code example for Function Module MARC_ARRAY_READ_WERK_ALL

The ABAP code below is a full code listing to execute function module MARC_ARRAY_READ_WERK_ALL 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_iwerk  
 
 TYPE STANDARD TABLE OF WSOR_WERK,"TABLES PARAM
wa_iwerk
 
 LIKE LINE OF it_iwerk
,
it_marc_tab  
 
 TYPE STANDARD TABLE OF MARC,"TABLES PARAM
wa_marc_tab
 
 LIKE LINE OF it_marc_tab
.



DATA(ld_kzrfb) = some text here
 

SELECT single SPERA 
  FROM TVGVI 
  INTO @DATA(ld_sperrmodus).

 

SELECT single SPERA 
  FROM TVGVI 
  INTO @DATA(ld_std_sperrmodus).



DATA(ld_exception_on_lock) = some text here
 

"populate fields of struture and append to itab
append wa_iwerk to it_iwerk.
 

"populate fields of struture and append to itab
append wa_marc_tab to it_marc_tab.
.

CALL FUNCTION 'MARC_ARRAY_READ_WERK_ALL'
* EXPORTING
*   kzrfb =                      ld_kzrfb
*   sperrmodus =                 ld_sperrmodus
*   std_sperrmodus =             ld_std_sperrmodus
*   exception_on_lock =          ld_exception_on_lock
  TABLES
    iwerk =                      it_iwerk
*   marc_tab =                   it_marc_tab
  EXCEPTIONS
    ENQUEUE_MODE_CHANGED =       1
    LOCK_SYSTEM_ERROR =          2
    LOCK_ON_MARC =               3
    .  "  MARC_ARRAY_READ_WERK_ALL

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
ELSEIF SY-SUBRC EQ 3. "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_kzrfb
 
 TYPE MTCOM-KZRFB ,
it_iwerk
 
 TYPE STANDARD TABLE OF WSOR_WERK ,
wa_iwerk
 
 LIKE LINE OF it_iwerk,
ld_sperrmodus
 
 TYPE TVGVI-SPERA ,
it_marc_tab
 
 TYPE STANDARD TABLE OF MARC ,
wa_marc_tab
 
 LIKE LINE OF it_marc_tab,
ld_std_sperrmodus
 
 TYPE TVGVI-SPERA ,
ld_exception_on_lock
 
 TYPE MTCOM-KZRFB .



ld_kzrfb = some text here 

"populate fields of struture and append to itab
append wa_iwerk to it_iwerk.

SELECT single SPERA 
  FROM TVGVI 
  INTO ld_sperrmodus.
 

"populate fields of struture and append to itab
append wa_marc_tab to it_marc_tab.

SELECT single SPERA 
  FROM TVGVI 
  INTO ld_std_sperrmodus.


ld_exception_on_lock = some text here