Totaling subreport in crystal report

I am building a crystal report that list 401k employee deduction and company match data by pay period.  I then need to have the report total.  I have built the report with two subreport - one that pulls the employee deduction and the other pulls the company match.  I am having a problem with the grand total on the main report.  If I do NOT link the report using the employee id, I get the correct total but incorrect lisitngs .  If I use the employee id link, I get the correct listing but an incorrect total. Here is the way I currently have the report constructed (I'm only supplying info for one subreport since if we can get one to work, I can get the other one to!):

Report Selection on Main Report:
{PRPayCheck.CheckDate} = {?Check Date} and
{PRPayCheck.Status} <> 6

Report Selection on Subreport 1 (401kEE):
({PRTimeCard.FKPREmployee} = {?Pm-PREmployee.SKPREmployee}
and {PRTimeCard.TC1_PayType} = 21
and {PRTimeCard.TC1_FKPayTypeID} = 1
and {PRPayCheck.Status} <> 6)
and {PRPayCheck.CheckDate} = {?Pm-?Check Date}
or
({PRPayCheck.FKPREmployee} = {?Pm-PREmployee.SKPREmployee}
and {PRTimeCard.TC2_PayType} = 21
and {PRTimeCard.TC2_FKPayTypeID} = 1
and {PRTimeCard.Status} = 2
and {PRPayCheck.Status} <> 6)
and {PRPayCheck.CheckDate} = {?Pm-?Check Date}

Formula in SubReport 1 Detail:
if {PRTimeCard.TC1_PayType} = 21 and {PRTimeCard.TC1_FKPayTypeID} = 1 then {PRTimeCard.TC1_ActualWages}
else
if {PRTimeCard.TC2_PayType} = 21 and {PRTimeCard.TC2_FKPayTypeID} = 1 and {PRTimeCard.Status} = 2 then{PRTimeCard.TC2_ActualWages};

In Report footer on subreport:
WhilePrintingRecords;
Shared CurrencyVar SubTotal := Sum({@401ke})   (I only get the last record data using this)

In Report footer on main report:
WhilePrintingRecords;
Shared CurrencyVar Subtotal;
Subtotal