abap 获取星期几

 DATA: diw_first TYPE d VALUE '19790101'.
 DATA: datum TYPE d,wotnr TYPE p.

 wotnr = ( ( datum - diw_first ) MOD 7 ) + 1.

***寥寥几行，如果不知道起始日还真的不好做。

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/554557/viewspace-618412/，如需转载，请注明出处，否则将追究法律责任。