Extraire la valeur day-of-week avec la fonction scalaire DayOfWeek
* ===================================================================
* = Description... Retrieve day-of-week
* ===================================================================
H NoMain
D RtvDayOfWeek PR 5I 0
D D Value
P RtvDayOfWeek B Export
D RtvDayOfWeek PI 5I 0
D DateIn D Value
D DayOfWeekNbr S 5I 0
C/exec SQL
C+ Set :DayOfWeekNbr
