Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
VAX BASIC date problem
2 views
Skip to first unread message
Simon Cheng
Mar 12, 1999, 3:00:00 AM3/12/99
to
I have a VAX BASIC program which will output the current date
(Mon,Tue...) to the screen. It works fine until the last day of 1999,
in which is a Friday. Then the machine see that Jan 1,2000 is a Monday.
(Mon,Tue...) to the screen. It works fine until the last day of 1999,
in which is a Friday. Then the machine see that Jan 1,2000 is a Monday.
The program call up a libruary to look for the day. the subroutine will
return a number,1 to 7. I am trying to locate where the subroutine is,
can anyone help?
DIM
DAY_OF_WEEK$(7%)
DEFINE
DAY_OF_WEEK:
DAY_OF_WEEK$(1%)="MON"
DAY_OF_WEEK$(2%)="TUE"
CALL LIB$DAY_OF_WEEK(WEEKDAY,WD)
SC_DAY$(I-6%)=DAY_OF_WEEK$(WD)
0 new messages