Fungsi = Konversi tanggal ke hari
Problem / Masalah = Kadang kala kita memiliki masalah ketika ingin mendeteksi hari dari tanggal yang sudah ada, semoga function module ini bisa membantu menyelesaikan masalah tersebut.
Code Program :
DATA: BEGIN OF itab OCCURS 0, date1 LIKE sy-datum, day LIKE dtresr-weekday, END OF itab. **--populating internal table with sample data itab-date1 = '20051128'. APPEND itab. itab-date1 = '20051129'. APPEND itab. itab-date1 = '20051130'. APPEND itab. **---calling FM LOOP AT itab. CALL FUNCTION 'DATE_TO_DAY' EXPORTING date = itab-date1 IMPORTING weekday = itab-day. MODIFY itab. ENDLOOP. **-----outputting data LOOP AT itab. WRITE:/ itab-date1,itab-day. ENDLOOP. |
Result :
Kesimpulan = Function Module ini akan merubah tanggal menjadi hari dari tanggal tersebut.
