9687850865
* (all files)
* stripped svn header
* minor cleanups
; use following command to find out the history of files:
git log
git log --follow
git blame
git annotate
12 lines
225 B
Plaintext
12 lines
225 B
Plaintext
|
|
#require "hbnf"
|
|
|
|
PROCEDURE Main( cDate, cDays )
|
|
|
|
LOCAL nDays := ft_AddWkDy( hb_SToD( cDate ), Val( cDays ) )
|
|
|
|
? "Num days to add: " + Str( nDays )
|
|
? "New date: " + DToC( hb_SToD( cDate ) + nDays )
|
|
|
|
RETURN
|