FM: Get Fiscal Variant And Last Day Of Fiscal Year

*----------------------------------------------------------------------*
* get company fiscal variant and last day of fiscal year. *
*----------------------------------------------------------------------*
FORM GET_FISCAL_LAST_DAY.
CALL FUNCTION 'CCODE_GET_FISCAL_YEAR_VARIANT'
EXPORTING
COMPANY_CODE = P_COMP
IMPORTING
FISCAL_YEAR_VARIANT = PERIV
EXCEPTIONS
COMPANY_CODE_NOT_FOUND = 1
OTHERS = 2.

CALL FUNCTION 'LAST_DAY_IN_PERIOD_GET'
EXPORTING
I_GJAHR = P_FISYR
* I_MONMIT = 00
I_PERIV = PERIV
I_POPER = '012'
IMPORTING
E_DATE = GJEND
EXCEPTIONS
INPUT_FALSE = 1
T009_NOTFOUND = 2
T009B_NOTFOUND = 3
OTHERS = 4.

ENDFORM.