My SQL is as follows:
SELECT Loan.[Student Name], Loan.[Book Number], Loan.
[Loan Date], DateAdd("m",1,[Loan Date])+IIf(Weekday
(DateAdd("m",1,[Loan Date]),2)<6,0,8-Weekday(DateAdd
("m",1,[Loan Date]),2)) AS [Loan Due], Loan.[Loan
Returned], DateDiff("d",[Loan Due],[Loan Returned]) AS
DaysLate, Fines.finAmount
FROM Loan, Fines;