Hi Karl! Oh Wow! Where to start?
Table: tblEmployees
Fields: EmployeeID, FirstName, MiddleInitial, LastName, UNUM,
UNUMTerminationDate
Table: tblAnnualSalaries
Fields: SalaryYear, AnnualSalary
Table: tblPremiumFactors
Fields: PremiumFactorYear (2005), EELifePremiumFactor (.00014),
EEAD&DPremiumFactor (.00002)
Query: qryPremiumFactors (pulls from tblPremiumFactors)
Fields: Same as tblPremiumFactors
Query: qryExpectedCoverage (Pulls from tblEmployees, tblAnnualSalaries &
qryPremiumFactors)
Fields: SalaryYear, EmployeeID, Name:[LastName] & ", " & [FirstName] & " " &
[MiddleInitial], AnnualSalary, EEBase:-(Int(-[AnnualSalary]*1.5/1000))*1000,
EELifePremiumFactor, EELifePremium: [EEBase]*[EELifePremiumFactor],
EEAD&DPremiumFactor, EEAD&DPremium:[EEBase]*[EEAD&DPremiumFactor],
Premium:[EELifePremium]+[EEAD&DPremium], UNUM (Criteria "Yes"),
UNUMTerminationDate
Append Query: qryExpectedMonthlyPremiumsAppend (Pulls from
qryExpectedCoverage)
Fields: EmployeeID, Premium, PremiumMonth:[Type Month to Be Entered
(99/0000):], UNUMTerminationDate
EmployeeID, Premium & PremiumMonth append to fields of the same name in a
table called tblUNUMMonthlyPremiums.
Also the SQLs for the queries are below (in case that's easier for you to
use). I hope I included everything! Feel free if you need additional
information or clarification! Thank you so much for your help!
Tandy
SQLs:
Query: qryPremiumFactors
SELECT tblPremiumFactors.PremiumFactorYear,
tblPremiumFactors.EELifePremiumFactor, tblPremiumFactors.[EEAD&DPremiumFactor]
FROM tblPremiumFactors
WHERE (((tblPremiumFactors.PremiumFactorYear)=[Type Premium Factors Year:]));
Query: qryExpectedCoverage
SELECT tblAnnualSalaries.SalaryYear, tblEmployees.EmployeeID, [LastName] &
", " & [FirstName] & " " & [MiddleInitial] AS Name,
tblAnnualSalaries.AnnualSalary, -(Int(-[AnnualSalary]*1.5/1000))*1000 AS
EEBase, qryPremiumFactors_1.EELifePremiumFactor,
[EEBase]*[EELifePremiumFactor] AS EELifePremium,
qryPremiumFactors_1.[EEAD&DPremiumFactor], [EEBase]*[EEAD&DPremiumFactor] AS
[EEAD&DPremium], [EELifePremium]+[EEAD&DPremium] AS Premium,
tblEmployees.LastName, tblEmployees.UNUMTerminationDate, tblEmployees.UNUM
FROM qryPremiumFactors AS qryPremiumFactors_1, tblAnnualSalaries INNER JOIN
tblEmployees ON tblAnnualSalaries.EmployeeID = tblEmployees.EmployeeID
WHERE (((tblAnnualSalaries.SalaryYear)=[Type Salary Year:]) AND
((tblEmployees.UNUM)="Yes"))
ORDER BY tblEmployees.EmployeeID;
Append Query: qryExpectedMonthlyPremiumsAppend
INSERT INTO tblUNUMMonthlyPremiums ( EmployeeID, Premium, PremiumMonth )
SELECT qryExpectedCoverage.EmployeeID, qryExpectedCoverage.Premium, [Type
Month To Be Entered (99/0000):] AS PremiumMonth
FROM qryExpectedCoverage
ORDER BY [Type Month To Be Entered (99/0000):];