Run Macro on the first Mon, Tue, Wed, ... of the month

[Marcus Tettmar]

Contributed By: Sam Cole [email protected]
Submitted On: 30/04/99

///Following runs macros on the first Tuesday(this_day) of the month.
///Assumes system date starts with mm

GetDate>today
MidStr>today,1,2,mth
DayOfWeek>this_day
If>this_day=3,Date_Chk
Goto>End
Label>Date_Chk
Let>chk_date=today
Sub>chk_date,7
MidStr>chk_date,1,2,mth_chk
If>mth_chkmth,first_day
Label>not_first_day
Goto>End
Label>first_day
Macro>Create Stand Report file(s)
Macro>Create Union Report Files
Label>End