Gives day of the week

Screen shots



Report which gives the day of the week

data:w_day type scal-indicator,
w_day1(20) type c.
Parameter: p_date like scal-date obligatory default sy-datum.
Select-options: p_date1 for sy-datum.
Start-of-selection.

call function 'DATE_COMPUTE_DAY'
exporting
Date = p_date
Importing
Day = w_day
.
case w_day.
When '1'.
w_day1 = 'MONDAY'.
when '2'.
w_day1 = 'TUESDAY'.
When '3'.
w_day1 = 'WEDNESDAY'.
When '4'.
w_day1 = 'THURSDAY'.
when '5'.
w_day1 = 'FRIDAY'.
When '6'.
w_day1 = 'SATURDAY'.
When '7'.
w_day1 = 'SUNDAY'.
endcase.
write: p_date,
'DAY OF THE WEEK', w_day,
w_day1.