!  Sample SCHEDULER.DAT for DECUS VAX SIG Tape
!
!  See notes in SCHEDULER.FOR about the syntax of expressions in angle
!  brackets such as <-1 TUE NOV>.
!
!
!  Notes on special commands (defined in SCHEDULER.COM)
!
!	SUBMIT_IF a b -- SUBMIT "b" if jobname "a" not already in input queue
!
!		"b" consists of file name plus qualifiers for SUBMIT
!
!	MAILIN user [/SUBJ=...] -- MAIL SYS$INPUT: user ...
!
!	MAILSYS -- MAIL /SUBJ="Message from SCHEDULER" SYS$INPUT: SYSTEM
!
!	REMINDER is an NSWC local command
!


! Every Monday, remind me to prepare a status report.

<MON>			
	$ MAILSYS
	Give the Status Report to ---------


! Two days before the first Wednesday in every month, remind me about a
! meeting I have to attend.  Remind me again one day before the meeting.

<1 WED -2>
	$ REMIND/ADD "+2" 1300 "------- Meeting"
<1 WED -1>
	$ MAILSYS
	------- Meeting tomorrow at 1300!


! I am paranoid about the accounting batch job, which runs the first of
! every month, so submit it ahead of time (the third-to-last business day
! of the month) and tell me to check it.  Then, for the next two days,
! check if it is in the input queue; re-submit it if not.

<-3BD>
	$ SUBMIT SYS$SYSDEVICE:[ACCOUNTING]ACCOUNTING
	$ MAILSYS
	Check the Monthly Accounting Job In The Input Queue
<-2BD>
	$ SUBMIT_IF ACCOUNTING SYS$SYSDEVICE:[ACCOUNTING]ACCOUNTING
	$ MAILSYS
	Check the Monthly Accounting Job In The Input Queue
<-1BD>
	$ SUBMIT_IF ACCOUNTING SYS$SYSDEVICE:[ACCOUNTING]ACCOUNTING
	$ MAILSYS
	Check the Monthly Accounting Job In The Input Queue
<1>
	$ MAILSYS
	Check the log from the monthly accounting job.


!	Progress reports are due the 25th of each month.  Remind me and
!	one other user (who wants one day's notice).

<25>
	$ MAILSYS
	Progress Reports Due TODAY!
<24>
	$ MAILIN AUSER /SUBJ="Progress Reports"
	Progress reports are due TOMORROW!


!	The D.C. VAX LUG meets on the last Tuesday of every other month.
!	Remind me a week ahead of time and again a day ahead of time.

<-1 TUE JAN -7>
	$ REMIND/ADD "+7" 11:00 "DC VAX LUG Meeting"
<-1 TUE MAR -7>
	$ REMIND/ADD "+7" 11:00 "DC VAX LUG Meeting"
<-1 TUE MAY -7>
	$ REMIND/ADD "+7" 11:00 "DC VAX LUG Meeting"
<-1 TUE JUL -7>
	$ REMIND/ADD "+7" 11:00 "DC VAX LUG Meeting"
<-1 TUE SEP -7>
	$ REMIND/ADD "+7" 11:00 "DC VAX LUG Meeting"
<-1 TUE NOV -7>
	$ REMIND/ADD "+7" 11:00 "DC VAX LUG Meeting"
<-1 TUE JAN -1>
	$ MAILSYS
	DC VAX LUG Meeting Tomorrow!
<-1 TUE MAR -1>
	$ MAILSYS
	DC VAX LUG Meeting Tomorrow!
<-1 TUE MAY -1>
	$ MAILSYS
	DC VAX LUG Meeting Tomorrow!
<-1 TUE JUL -1>
	$ MAILSYS
	DC VAX LUG Meeting Tomorrow!
<-1 TUE SEP -1>
	$ MAILSYS
	DC VAX LUG Meeting Tomorrow!
<-1 TUE NOV -1>
	$ MAILSYS
	DC VAX LUG Meeting Tomorrow!


!	Let me know every day that SCHEDULER is still running.

<ED>
	$ MAILSYS
	Scheduler is running fine!

!	Run other daily functions

<ED>
	$ SUBMIT /NOPRINT /LOG=SYS$MANAGER:xxx SYS$MANAGER:xxx


!	At the proper times of year, submit batch jobs to change the system
!	time to/from Daylight Savings Time

<-1 SUN APR>
	$ SUBMIT /AFTER=02:00 SYS$MANAGER:D_S_T_ON
	$ MAILSYS
	Check the system time; DST is in effect

<-1 SUN OCT>
	$ SUBMIT /AFTER=02:00 SYS$MANAGER:D_S_T_OFF
	$ MAILSYS
	Check the system time; DST is over