tmm=0 tmf=0 tcm=0 tcf=0 tim=0 tif=0 tom=0 tof=0 tmm=Totalmf( "Malay", "M" ) *etc. for each function passing the variables REPORT FORM <name> TO PRINT FUNCTION Totalmf() PARAMETERS pcRace, pcSex lnCount = 0 SELECT emp COUNT TO lnCount FOR ; emp.Resign = .F. AND ; emp.Race = pcRace AND ; emp.Sex = pcSex RETURN lnCountHTH