CDOW( ) Function Example

STORE {^1998-02-16} TO gdDate 
CLEAR
? CDOW(gdDate)  && Displays Monday