SAP Function Modules

HR_PF_VS_PERFORM_05 SAP Function module







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

Associated Function Group: HRPFD05VSIP
Released Date: Not Released
Processing type: Normal fucntion module
Normal function module settings


Pattern for FM HR_PF_VS_PERFORM_05 - HR PF VS PERFORM 05





CALL FUNCTION 'HR_PF_VS_PERFORM_05' "
  EXPORTING
*   rdate = SY-DATUM            " t5ca9-begda
*   begda = '18000101'          " p0278-begda
*   endda = '99991231'          " p0278-endda
    kasse =                     " t5cp0-kasse
    actio =                     " t5cay-actio
    pernr =                     " p0000-pernr
*   tclas = 'A'                 " pspar-tclas
*   no_db_lock = ' '            " p02vs_flag
*   testmode = ' '              " p02vs_flag
*   no_error_handling = ' '     " p02vs_flag
*   orgin = 'WF'                " t5cpb-orgin
*   paratab =                   " p02vs_value_tab
*   simpplan =                  " t5ca4-pplan
*   simpafgr =                  " t5cax-pafgr
*   do_init = 'X'               " char1
*   do_perform = 'X'            " char1
*   do_end = 'X'                " char1
*   mode = %MODE_RUN            " processing_type
*   caller = %MODE_INTERP       " processing_type
  IMPORTING
    errors =                    " i
    warnings =                  " i
    pplan =                     " t5ca4-pplan
    evl =                       " p02vs_evl_info_record
  TABLES
    valuetab =                  " p02vs_value_tab
*   new_entries =               " pch01_ext_entries
*   print_entries =             " p02vs_pr_entry_tab
*   errlist =                   " hrerror
*   pp0000 =                    " p0000
*   pp0001 =                    " p0001
*   pp0002 =                    " p0002
*   pp0007 =                    " p0007
*   pp0008 =                    " p0008
*   pp0014 =                    " p0014
*   pp0015 =                    " p0015
*   pp0021 =                    " p0021
*   pp0278 =                    " p0278
*   pp0279 =                    " p0279
*   prottab =                   " hrpfd00_prottab
  EXCEPTIONS
    SUBRC1 = 1                  "
    SUBRC2 = 2                  "
    SUBRC3 = 3                  "
    SUBRC4 = 4                  "
    VS_EXCEPTION = 5            "
    .  "  HR_PF_VS_PERFORM_05

ABAP code example for Function Module HR_PF_VS_PERFORM_05





The ABAP code below is a full code listing to execute function module HR_PF_VS_PERFORM_05 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_errors  TYPE I ,
ld_warnings  TYPE I ,
ld_pplan  TYPE T5CA4-PPLAN ,
ld_evl  TYPE P02VS_EVL_INFO_RECORD ,
it_valuetab  TYPE STANDARD TABLE OF P02VS_VALUE_TAB,"TABLES PARAM
wa_valuetab  LIKE LINE OF it_valuetab ,
it_new_entries  TYPE STANDARD TABLE OF PCH01_EXT_ENTRIES,"TABLES PARAM
wa_new_entries  LIKE LINE OF it_new_entries ,
it_print_entries  TYPE STANDARD TABLE OF P02VS_PR_ENTRY_TAB,"TABLES PARAM
wa_print_entries  LIKE LINE OF it_print_entries ,
it_errlist  TYPE STANDARD TABLE OF HRERROR,"TABLES PARAM
wa_errlist  LIKE LINE OF it_errlist ,
it_pp0000  TYPE STANDARD TABLE OF P0000,"TABLES PARAM
wa_pp0000  LIKE LINE OF it_pp0000 ,
it_pp0001  TYPE STANDARD TABLE OF P0001,"TABLES PARAM
wa_pp0001  LIKE LINE OF it_pp0001 ,
it_pp0002  TYPE STANDARD TABLE OF P0002,"TABLES PARAM
wa_pp0002  LIKE LINE OF it_pp0002 ,
it_pp0007  TYPE STANDARD TABLE OF P0007,"TABLES PARAM
wa_pp0007  LIKE LINE OF it_pp0007 ,
it_pp0008  TYPE STANDARD TABLE OF P0008,"TABLES PARAM
wa_pp0008  LIKE LINE OF it_pp0008 ,
it_pp0014  TYPE STANDARD TABLE OF P0014,"TABLES PARAM
wa_pp0014  LIKE LINE OF it_pp0014 ,
it_pp0015  TYPE STANDARD TABLE OF P0015,"TABLES PARAM
wa_pp0015  LIKE LINE OF it_pp0015 ,
it_pp0021  TYPE STANDARD TABLE OF P0021,"TABLES PARAM
wa_pp0021  LIKE LINE OF it_pp0021 ,
it_pp0278  TYPE STANDARD TABLE OF P0278,"TABLES PARAM
wa_pp0278  LIKE LINE OF it_pp0278 ,
it_pp0279  TYPE STANDARD TABLE OF P0279,"TABLES PARAM
wa_pp0279  LIKE LINE OF it_pp0279 ,
it_prottab  TYPE STANDARD TABLE OF HRPFD00_PROTTAB,"TABLES PARAM
wa_prottab  LIKE LINE OF it_prottab .


SELECT single BEGDA
FROM T5CA9
INTO @DATA(ld_rdate).


DATA(ld_begda) = 20210129

DATA(ld_endda) = 20210129

SELECT single KASSE
FROM T5CP0
INTO @DATA(ld_kasse).


SELECT single ACTIO
FROM T5CAY
INTO @DATA(ld_actio).


DATA(ld_pernr) = Check type of data required

DATA(ld_tclas) = some text here
DATA(ld_no_db_lock) = 'Check type of data required'.
DATA(ld_testmode) = 'Check type of data required'.
DATA(ld_no_error_handling) = 'Check type of data required'.

SELECT single ORGIN
FROM T5CPB
INTO @DATA(ld_orgin).

DATA(ld_paratab) = 'Check type of data required'.

SELECT single PPLAN
FROM T5CA4
INTO @DATA(ld_simpplan).


SELECT single PAFGR
FROM T5CAX
INTO @DATA(ld_simpafgr).

DATA(ld_do_init) = 'Check type of data required'.
DATA(ld_do_perform) = 'Check type of data required'.
DATA(ld_do_end) = 'Check type of data required'.
DATA(ld_mode) = 'Check type of data required'.
DATA(ld_caller) = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_valuetab to it_valuetab.

"populate fields of struture and append to itab
append wa_new_entries to it_new_entries.

"populate fields of struture and append to itab
append wa_print_entries to it_print_entries.

"populate fields of struture and append to itab
append wa_errlist to it_errlist.

"populate fields of struture and append to itab
append wa_pp0000 to it_pp0000.

"populate fields of struture and append to itab
append wa_pp0001 to it_pp0001.

"populate fields of struture and append to itab
append wa_pp0002 to it_pp0002.

"populate fields of struture and append to itab
append wa_pp0007 to it_pp0007.

"populate fields of struture and append to itab
append wa_pp0008 to it_pp0008.

"populate fields of struture and append to itab
append wa_pp0014 to it_pp0014.

"populate fields of struture and append to itab
append wa_pp0015 to it_pp0015.

"populate fields of struture and append to itab
append wa_pp0021 to it_pp0021.

"populate fields of struture and append to itab
append wa_pp0278 to it_pp0278.

"populate fields of struture and append to itab
append wa_pp0279 to it_pp0279.

"populate fields of struture and append to itab
append wa_prottab to it_prottab. . CALL FUNCTION 'HR_PF_VS_PERFORM_05' EXPORTING * rdate = ld_rdate * begda = ld_begda * endda = ld_endda kasse = ld_kasse actio = ld_actio pernr = ld_pernr * tclas = ld_tclas * no_db_lock = ld_no_db_lock * testmode = ld_testmode * no_error_handling = ld_no_error_handling * orgin = ld_orgin * paratab = ld_paratab * simpplan = ld_simpplan * simpafgr = ld_simpafgr * do_init = ld_do_init * do_perform = ld_do_perform * do_end = ld_do_end * mode = ld_mode * caller = ld_caller IMPORTING errors = ld_errors warnings = ld_warnings pplan = ld_pplan evl = ld_evl TABLES valuetab = it_valuetab * new_entries = it_new_entries * print_entries = it_print_entries * errlist = it_errlist * pp0000 = it_pp0000 * pp0001 = it_pp0001 * pp0002 = it_pp0002 * pp0007 = it_pp0007 * pp0008 = it_pp0008 * pp0014 = it_pp0014 * pp0015 = it_pp0015 * pp0021 = it_pp0021 * pp0278 = it_pp0278 * pp0279 = it_pp0279 * prottab = it_prottab EXCEPTIONS SUBRC1 = 1 SUBRC2 = 2 SUBRC3 = 3 SUBRC4 = 4 VS_EXCEPTION = 5 . " HR_PF_VS_PERFORM_05
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 ELSEIF SY-SUBRC EQ 4. "Exception "Add code for exception here ELSEIF SY-SUBRC EQ 5. "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_errors  TYPE I ,
it_valuetab  TYPE STANDARD TABLE OF P02VS_VALUE_TAB ,
wa_valuetab  LIKE LINE OF it_valuetab,
ld_rdate  TYPE T5CA9-BEGDA ,
it_new_entries  TYPE STANDARD TABLE OF PCH01_EXT_ENTRIES ,
wa_new_entries  LIKE LINE OF it_new_entries,
ld_warnings  TYPE I ,
ld_begda  TYPE P0278-BEGDA ,
ld_endda  TYPE P0278-ENDDA ,
it_print_entries  TYPE STANDARD TABLE OF P02VS_PR_ENTRY_TAB ,
wa_print_entries  LIKE LINE OF it_print_entries,
ld_pplan  TYPE T5CA4-PPLAN ,
it_errlist  TYPE STANDARD TABLE OF HRERROR ,
wa_errlist  LIKE LINE OF it_errlist,
ld_evl  TYPE P02VS_EVL_INFO_RECORD ,
ld_kasse  TYPE T5CP0-KASSE ,
it_pp0000  TYPE STANDARD TABLE OF P0000 ,
wa_pp0000  LIKE LINE OF it_pp0000,
ld_actio  TYPE T5CAY-ACTIO ,
ld_pernr  TYPE P0000-PERNR ,
it_pp0001  TYPE STANDARD TABLE OF P0001 ,
wa_pp0001  LIKE LINE OF it_pp0001,
ld_tclas  TYPE PSPAR-TCLAS ,
it_pp0002  TYPE STANDARD TABLE OF P0002 ,
wa_pp0002  LIKE LINE OF it_pp0002,
ld_no_db_lock  TYPE P02VS_FLAG ,
it_pp0007  TYPE STANDARD TABLE OF P0007 ,
wa_pp0007  LIKE LINE OF it_pp0007,
ld_testmode  TYPE P02VS_FLAG ,
it_pp0008  TYPE STANDARD TABLE OF P0008 ,
wa_pp0008  LIKE LINE OF it_pp0008,
ld_no_error_handling  TYPE P02VS_FLAG ,
it_pp0014  TYPE STANDARD TABLE OF P0014 ,
wa_pp0014  LIKE LINE OF it_pp0014,
ld_orgin  TYPE T5CPB-ORGIN ,
it_pp0015  TYPE STANDARD TABLE OF P0015 ,
wa_pp0015  LIKE LINE OF it_pp0015,
it_pp0021  TYPE STANDARD TABLE OF P0021 ,
wa_pp0021  LIKE LINE OF it_pp0021,
ld_paratab  TYPE P02VS_VALUE_TAB ,
ld_simpplan  TYPE T5CA4-PPLAN ,
it_pp0278  TYPE STANDARD TABLE OF P0278 ,
wa_pp0278  LIKE LINE OF it_pp0278,
ld_simpafgr  TYPE T5CAX-PAFGR ,
it_pp0279  TYPE STANDARD TABLE OF P0279 ,
wa_pp0279  LIKE LINE OF it_pp0279,
ld_do_init  TYPE CHAR1 ,
it_prottab  TYPE STANDARD TABLE OF HRPFD00_PROTTAB ,
wa_prottab  LIKE LINE OF it_prottab,
ld_do_perform  TYPE CHAR1 ,
ld_do_end  TYPE CHAR1 ,
ld_mode  TYPE PROCESSING_TYPE ,
ld_caller  TYPE PROCESSING_TYPE .


"populate fields of struture and append to itab
append wa_valuetab to it_valuetab.

SELECT single BEGDA
FROM T5CA9
INTO ld_rdate.


"populate fields of struture and append to itab
append wa_new_entries to it_new_entries.

ld_begda = 20210129

ld_endda = 20210129

"populate fields of struture and append to itab
append wa_print_entries to it_print_entries.

"populate fields of struture and append to itab
append wa_errlist to it_errlist.

SELECT single KASSE
FROM T5CP0
INTO ld_kasse.


"populate fields of struture and append to itab
append wa_pp0000 to it_pp0000.

SELECT single ACTIO
FROM T5CAY
INTO ld_actio.


ld_pernr = Check type of data required

"populate fields of struture and append to itab
append wa_pp0001 to it_pp0001.

ld_tclas = some text here

"populate fields of struture and append to itab
append wa_pp0002 to it_pp0002.
ld_no_db_lock = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_pp0007 to it_pp0007.
ld_testmode = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_pp0008 to it_pp0008.
ld_no_error_handling = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_pp0014 to it_pp0014.

SELECT single ORGIN
FROM T5CPB
INTO ld_orgin.


"populate fields of struture and append to itab
append wa_pp0015 to it_pp0015.

"populate fields of struture and append to itab
append wa_pp0021 to it_pp0021.
ld_paratab = 'Check type of data required'.

SELECT single PPLAN
FROM T5CA4
INTO ld_simpplan.


"populate fields of struture and append to itab
append wa_pp0278 to it_pp0278.

SELECT single PAFGR
FROM T5CAX
INTO ld_simpafgr.


"populate fields of struture and append to itab
append wa_pp0279 to it_pp0279.
ld_do_init = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_prottab to it_prottab.
ld_do_perform = 'Check type of data required'.
ld_do_end = 'Check type of data required'.
ld_mode = 'Check type of data required'.
ld_caller = 'Check type of data required'.

Contribute (Add Comments)

Please help keep this info upto date and use the comments section below to add useful hints, tips and information specific to this SAP function. This will then be available for you and other users to easily find by simply searching on the object name HR_PF_VS_PERFORM_05 or its description.