Ansicht
Dokumentation
EXIT_RPCZVMD0_001 - SPF: User Exit for Distribution Key for Creating SP Notifications
Vendor Master (General Section) CL_GUI_FRONTEND_SERVICES - Frontend ServicesThis documentation is copyright by SAP AG.
Functionality
This enhancement contains the function module EXIT_RPCZVMD0_001, which enables you to create the distribution key in the supplementary pension notifications for individual customers.
The employer table T5D5B includes several fields for the structure of the distribution key. In these fields, you can enter defined identifiers, for example, PSN for personnel number or NAN for last name of employee. If these defined identifiers are not sufficient, you can create your own identifiers. These must start with a 'Z'. These identifiers are transferred with the employee's personnel number to the function module EXIT_RPCZVMD0_001. This function module then returns the corresponding alphanumeric text.
Example
The distribution key should contain the short text for the employee's organizational unit and the number
of the administrator responsible. You can use the customer identifiers ZOE and ZSB and enter them in
the required position in the Employer table (T5D5B) (if necessary, they can be used in combination with
the standard identifiers provided by SAP). The accompanying program text in include ZX406U04 must then appear as follows (the coding can also be found in include LX406F03):
*---------------------------------------------------------------------*
* INCLUDE ZX406U04 *
*---------------------------------------------------------------------*
infotypes: 0001 name org_daten.
tables: t527x.
data: returncode like sy-subrc.
case vtschl. "Identifier for distribution key
*** Text for org.unit
when 'ZOE'.
call function 'HR_READ_INFOTYPE'
exporting
pernr = persnr
infty = '0001'
begda = datum
importing
subrc = returncode
tables
infty_tab = org_daten.
if returncode eq 0.
read table org_daten index 1.
select single * from t527x where sprsl = sy-langu
and orgeh = org_daten-orgeh
and begda le datum
and endda ge datum.
text = t527x-orgtx.
endif.
*** Administrator responsible for payroll
when 'ZSB'.
call function 'HR_READ_INFOTYPE'
exporting
pernr = persnr
infty = '0001'
begda = datum
importing
subrc = returncode
tables
infty_tab = org_daten.
if returncode eq 0.
text = org_daten-sacha.
endif.
when others.
endcase.
Notes
To use this function module, you must first assign it to a project using transaction CMOD (or create a new project if no project exists). For example, use the enhancement HRPYZVMV which contains the function module.
Parameters
DATUMPERSNR
TEXT
VTSCHL
Exceptions
Function Group
X406General Data in Customer Master General Material Data
This documentation is copyright by SAP AG.
Length: 3302 Date: 20240523 Time: 044901 sap01-206 ( 56 ms )