Date caculating functin module
FUNCTION ZRKCALCUALTING_DATE1.
*"----------------------------------------------------------------------
*"*"Local Interface:
*" IMPORTING
*" REFERENCE(P_DATE) TYPE SY-DATUM
*" VALUE(P_DAYS) TYPE T5A4A-DLYDY OPTIONAL
*" VALUE(P_MONTH) TYPE T5A4A-DLYMO OPTIONAL
*" VALUE(P_YEAR) TYPE T5A4A-DLYYR OPTIONAL
*" VALUE(SIGN) TYPE T5A4A-SPLIT DEFAULT '+ '
*" EXPORTING
*" VALUE(CALC_DATE) LIKE SY-DATUM
*"----------------------------------------------------------------------
* DATA: calc_date TYPE sy-datum,
DATA: days TYPE t5a4a-dlydy,
months TYPE t5a4a-dlymo,
years TYPE t5a4a-dlyyr.
CALL FUNCTION 'RP_CALC_DATE_IN_INTERVAL'
EXPORTING
date = p_date
days = p_days
months = p_month
signum = sign
years = p_year
IMPORTING
calc_date = calc_date.
ENDFUNCTION.
Comments
Post a Comment