about know the holiday and weekday

*TO FIND THE HOLIDAY DATE

DATA : LD_DATE LIKE SY-DATUM .

data : gltrp type sy-datum .

LD_DATE = GLTRP + 1 . (this statement is not accaciable _)

DATA : LC_HOLIDAY_CAL_ID LIKE SCAL-HCALID value 'SA'.

DATA : LTAB_HOLIDAY_ATTRIBUTES LIKE THOL OCCURS 0 WITH HEADER LINE.

DATA : LC_HOLIDAY_FOUND LIKE SCAL-INDICATOR.

CALL FUNCTION 'HOLIDAY_CHECK_AND_GET_INFO' (this statement is not accaciable)

EXPORTING

DATE = LD_DATE

HOLIDAY_CALENDAR_ID = LC_HOLIDAY_CAL_ID

WITH_HOLIDAY_ATTRIBUTES = 'X'

IMPORTING

HOLIDAY_FOUND = LC_HOLIDAY_FOUND

TABLES

HOLIDAY_ATTRIBUTES = LTAB_HOLIDAY_ATTRIBUTES

EXCEPTIONS

CALENDAR_BUFFER_NOT_LOADABLE = 1

DATE_AFTER_RANGE = 2

DATE_BEFORE_RANGE = 3

DATE_INVALID = 4

HOLIDAY_CALENDAR_ID_MISSING = 5

HOLIDAY_CALENDAR_NOT_FOUND = 6

OTHERS = 7.

IF SY-SUBRC = 0 AND

LC_HOLIDAY_FOUND = 'X'.

WRITE: / LD_DATE, 'is a holiday'.

ELSE.

WRITE: / LD_DATE, 'is not a holiday, or there was an error calling the function'.

ENDIF.

please see the my code and give me correct code i want gltrp is a field in which add 1 day mean {gltrp + 1 } so give the week day