LISTING 1: Example Code That Populates Part 
of the Geology Fact Table

UPDATE tblAtlanticFact
SET  tblAtlanticFact.sandQuartz = conmar11A.Quartz,
 tblAtlanticFact.sandKFeldspar = conmar11A.KSpar,
 tblAtlanticFact.sandNaFeldspar = conmar11A.NaSpar,
 tblAtlanticFact.sandMica = conmar11A.Mica,
 tblAtlanticFact.sandHeavyMinerals = conmar11A.HeavyMinerals,
 tblAtlanticFact.sandPhosphorite = conmar11A.Phosphorite,
 tblAtlanticFact.sandGlauconite = conmar11A.Glauconite,
 tblAtlanticFact.sandDiatoms = conmar11A.Diatoms,
 tblAtlanticFact.sandSpicules = conmar11A.Spicules,
 tblAtlanticFact.sandRadiolarians = conmar11A.Rads,
 tblAtlanticFact.sandWoodPlant = conmar11A.WoodPlants,
 tblAtlanticFact.sandOther = conmar11A.Other
FROM  tblAtlanticFact, conmar11A
WHERE  tblAtlanticFact.SampleIDPK = conmar11A.sampleID