SELECT [Event Information].Event_ID, [Event Information].Invoice_Date, [Event Information].Unpaid_Contact_Date,
[Event Information].Date_of_Event, [Event Information].Unpaid_Contact_Notes, [Event Information].Program_Code,
[Client Information].Organization, [Client Information].Full_Name, [Event Information].Payment_Notes, [Event
Information].Paid_By_PO, [Event Information].Deposit_Paid, [Event Information].Multiple_On_Billing
FROM [Client Information]
INNER JOIN [Event Information] ON [Client Information].Client_ID = [Event Information].Client_ID
WHERE ( (([Event Information].Invoice_Date)<DateAdd("d",-30,Date()) )
AND (([Event Information].Program_Code)="ZM")
AND ( ([Event Information].Multiple_On_Billing) Is Null
Or ([Event Information].Multiple_On_Billing)="0"
)
AND ( ([Event Information].Sample_Lock) Is Null
Or ([Event Information].Sample_Lock)="0"
)
AND ( ([Event Information].Incomplete_Booking) Is Null
Or ([Event Information].Incomplete_Booking)="0"
)
AND ( ([Event Information].Paid) Is Null
Or ([Event Information].Paid)="0"
)
AND ( ([Event Information].Cost_Category)="Full Price" )
AND ( ([Event Information].Canceled) Is Null
Or ([Event Information].Canceled)="0")
)
OR ( (([Event Information].Cost_Category)="Discount")
)
ORDER BY [Event Information].Invoice_Date, [Event Information].Unpaid_Contact_Date, [Event
Information].Date_of_Event
UNION SELECT [Event Information].Event_ID, [Event Information].Invoice_Date, [Event
Information].Unpaid_Contact_Date, [Event Information].Date_of_Event, [Event Information].Unpaid_Contact_Notes,
[Event Information].Program_Code, [Client Information].Organization, [Client Information].Full_Name, [Event
Information].Payment_Notes, [Event Information].Paid_By_PO, [Event Information].Deposit_Paid, [Event
Information].Multiple_On_Billing
FROM [Client Information]
INNER JOIN [Event Information] ON [Client Information].Client_ID = [Event Information].Client_ID
WHERE ( (([Event Information].Date_of_Event)<DateAdd("d",-5,Date()) )
AND ( ([Event Information].Program_Code)="GT" )
AND ( ([Event Information].Sample_Lock) Is Null
Or ([Event Information].Sample_Lock)="0"
)
AND ( ([Event Information].Incomplete_Booking) Is Null
Or ([Event Information].Incomplete_Booking)="0"
)
AND ( ([Event Information].Paid) Is Null
Or ([Event Information].Paid)="0"
)
AND ( ([Event Information].Cost_Category)="Full Price" )
AND ( ([Event Information].Canceled) Is Null
Or ([Event Information].Canceled)="0")
)
OR ( (([Event Information].Cost_Category)="Discount") )
ORDER BY [Event Information].Invoice_Date, [Event Information].Unpaid_Contact_Date, [Event
Information].Date_of_Event
UNION SELECT [BOCES Invoice].BOCES_ID, [BOCES Invoice].Date_Sent, [BOCES Invoice].Unpaid_Contact_Date, [BOCES
Invoice].Date_of_Event_Filler, [BOCES Invoice].Unpaid_Contact_Notes, [BOCES Invoice].Program_Code, [BOCES
Invoice].Organization_Filler, [BOCES Invoice].Full_Name, [BOCES Invoice].Pay_Notes_Filler, [BOCES
Invoice].Paid_By_PO, [BOCES Invoice].Deposit_Filler, [BOCES Invoice].Multiple_Billing_Filler
FROM [BOCES Invoice]
WHERE ( (([BOCES Invoice].Date_Sent)<DateAdd("d",-60,Date()) )
AND ( ([BOCES Invoice].Paid) Is Null
Or ([BOCES Invoice].Paid)="0"
)
AND ( ([BOCES Invoice].Invoice_Sent)="-1") )
UNION SELECT [Shared Billing Information].Shared_Billing_ID, [Shared Billing Information].Invoice_Date, [Shared
Billing Information].Unpaid_Contact_Date, [Shared Billing Information].Date_of_Event, [Shared Billing
Information].Unpaid_Contact_Notes, [Shared Billing Information].Program_Code, [Client Information].Organization,
[Client Information].Full_Name, [Shared Billing Information].Payment_Notes, [Shared Billing Information].Paid_By_PO,
[Shared Billing Information].Deposit_Paid, [Shared Billing Information].Shared_Billing_Invoice
FROM [Client Information]
INNER JOIN [Shared Billing Information] ON [Client Information].Client_ID = [Shared Billing Information].Client_ID
WHERE ( (([Shared Billing Information].Invoice_Date)<DateAdd("d",-30,Date()) )
AND ( ([Shared Billing Information].Paid) Is Null
Or ([Shared Billing Information].Paid)="0"
)
AND ( ([Shared Billing Information].Cost_Category)="Full Price" )
AND ( ([Shared Billing Information].Canceled) Is Null
Or ([Shared Billing Information].Canceled)="0"
)
AND ( ([Shared Billing Information].Sample_Lock) Is Null
Or ([Shared Billing Information].Sample_Lock)="0"
)
AND ( ([Shared Billing Information].Incomplete_Booking) Is Null
Or ([Shared Billing Information].Incomplete_Booking)="0")
)
OR ( (([Shared Billing Information].Cost_Category)="Discount") )
UNION SELECT [Event Information].Event_ID, [Event Information].Invoice_Date, [Event
Information].Unpaid_Contact_Date, [Event Information].Date_of_Event, [Event Information].Unpaid_Contact_Notes,
[Event Information].Program_Code, [Client Information].Organization, [Client Information].Full_Name, [Event
Information].Payment_Notes, [Event Information].Paid_By_PO, [Event Information].Deposit_Paid, [Event
Information].Multiple_On_Billing
FROM [Client Information]
INNER JOIN [Event Information] ON [Client Information].Client_ID = [Event Information].Client_ID
WHERE ( (([Event Information].Invoice_Date)<DateAdd("d",-5,Date()) )
AND ( ([Event Information].Program_Code)="BD" )
AND ( ([Event Information].Deposit_Paid) Is Null
Or ([Event Information].Deposit_Paid)="0"
)
AND ( ([Event Information].Sample_Lock) Is Null
Or ([Event Information].Sample_Lock)="0"
)
AND ( ([Event Information].Incomplete_Booking) Is Null
Or ([Event Information].Incomplete_Booking)="0"
)
AND ( ([Event Information].BD_ZooMobile_Option)="-1" )
AND ( ([Event Information].Cost_Category)="Full Price" )
AND ( ([Event Information].Canceled) Is Null
Or ([Event Information].Canceled)="0")
)
OR ( (([Event Information].Cost_Category)="Discount") )
ORDER BY [Event Information].Invoice_Date, [Event Information].Unpaid_Contact_Date, [Event
Information].Date_of_Event
UNION SELECT [Event Information].Event_ID, [Event Information].Invoice_Date, [Event
Information].Unpaid_Contact_Date, [Event Information].Date_of_Event, [Event Information].Unpaid_Contact_Notes,
[Event Information].Program_Code, [Client Information].Organization, [Client Information].Full_Name, [Event
Information].Payment_Notes, [Event Information].Paid_By_PO, [Event Information].Deposit_Paid, [Event
Information].Multiple_On_Billing
FROM [Client Information]
INNER JOIN [Event Information] ON [Client Information].Client_ID = [Event Information].Client_ID
WHERE ( (([Event Information].Date_of_Event)<DateAdd("d",-5,Date()) )
AND ( ([Event Information].Program_Code)="BD" )
AND ( ([Event Information].Sample_Lock) Is Null
Or ([Event Information].Sample_Lock)="0"
)
AND ( ([Event Information].Incomplete_Booking) Is Null
Or ([Event Information].Incomplete_Booking)="0"
)
AND ( ([Event Information].BD_ZooMobile_Option)="-1" )
AND ( ([Event Information].Cost_Category)="Full Price" )
AND ( ([Event Information].Canceled) Is Null
Or ([Event Information].Canceled)="0"
)
AND ( ([Event Information].Paid) Is Null
Or ([Event Information].Paid)="0")
)
OR ( (([Event Information].Cost_Category)="Discount") )
ORDER BY [Event Information].Invoice_Date, [Event Information].Unpaid_Contact_Date, [Event
Information].Date_of_Event
UNION SELECT [Event Information].Event_ID, [Event Information].Invoice_Date, [Event
Information].Unpaid_Contact_Date, [Event Information].Date_of_Event, [Event Information].Unpaid_Contact_Notes,
[Event Information].Program_Code, [Client Information].Organization, [Client Information].Full_Name, [Event
Information].Payment_Notes, [Event Information].Paid_By_PO, [Event Information].Deposit_Paid, [Event
Information].Multiple_On_Billing
FROM [Client Information]
INNER JOIN [Event Information] ON [Client Information].Client_ID = [Event Information].Client_ID
WHERE ( (([Event Information].Date_of_Event)<DateAdd("d",-5,Date()) )
AND ( ([Event Information].Program_Code)="SC" )
AND ( ([Event Information].Incomplete_Booking) Is Null
Or ([Event Information].Incomplete_Booking)="0"
)
AND ( ([Event Information].Paid) Is Null
Or ([Event Information].Paid)="0"
)
AND ( ([Event Information].Cost_Category)="Full Price" )
AND ( ([Event Information].Canceled) Is Null
Or ([Event Information].Canceled)="0")
)
OR ( (([Event Information].Cost_Category)="Discount") )
ORDER BY [Event Information].Invoice_Date, [Event Information].Unpaid_Contact_Date, [Event
Information].Date_of_Event
UNION SELECT [Event Information].Event_ID, [Event Information].Invoice_Date, [Event
Information].Unpaid_Contact_Date, [Event Information].Date_of_Event, [Event Information].Unpaid_Contact_Notes,
[Event Information].Program_Code, [Client Information].Organization, [Client Information].Full_Name, [Event
Information].Payment_Notes, [Event Information].Paid_By_PO, [Event Information].Deposit_Paid, [Event
Information].Multiple_On_Billing
FROM [Client Information]
INNER JOIN [Event Information] ON [Client Information].Client_ID = [Event Information].Client_ID
WHERE ( (([Event Information].Invoice_Date)<DateAdd("d",-5,Date()) )
AND ( ([Event Information].Program_Code)="WE" )
AND ( ([Event Information].Incomplete_Booking) Is Null
Or ([Event Information].Incomplete_Booking)="0"
)
AND ( ([Event Information].Paid)="0" )
AND ( ([Event Information].Cost_Category)="Full Price"
Or ([Event Information].Cost_Category)="Discount"
)
AND ( ([Event Information].Canceled) Is Null
Or ([Event Information].Canceled)="0")
)
ORDER BY [Event Information].Invoice_Date, [Event Information].Unpaid_Contact_Date, [Event
Information].Date_of_Event;