Function Module to Convert From and To Date to Fiscal Year

DATA: V_FROM_GJAHR TYPE GJAHR.
DATA: V_TO_GJAHR TYPE GJAHR.

* Function Module from From Fiscal Year
CALL FUNCTION 'DATE_TO_PERIOD_CONVERT'
  EXPORTING
    I_DATE               = I_FROM_BUDAT
*   I_MONMIT             = 00
    I_PERIV              = 'V3'    "Your Fiscal Year Variant
  IMPORTING
*   E_BUPER              =
    E_GJAHR              = V_FROM_GJAHR
* EXCEPTIONS
*   INPUT_FALSE          = 1
*   T009_NOTFOUND        = 2
*   T009B_NOTFOUND       = 3
*   OTHERS               = 4
          .

* Function Module from To Fiscal Year
CALL FUNCTION 'DATE_TO_PERIOD_CONVERT'
  EXPORTING
    I_DATE               = I_TO_BUDAT
*   I_MONMIT             = 00
    I_PERIV              = 'V3'    "Your Fiscal Year Variant
  IMPORTING
*   E_BUPER              =
    E_GJAHR              = V_TO_GJAHR
* EXCEPTIONS
*   INPUT_FALSE          = 1
*   T009_NOTFOUND        = 2
*   T009B_NOTFOUND       = 3
*   OTHERS               = 4
          .

WRITE: V_FROM_GJAHR.
WRITE: V_TO_GJAHR.