Summarizing Three (3) Formulas (When Using "Sum" Within Each Formula)

Question

I'm getting an error (i.e. 'This field cannot be summarized.") when
trying to summarize three (3) formulas.  I figured out that it is
probably because that there is a "Sum" in each formula.  I need totals
only for specific officers (not all officers). Can someone tell me how
to accomplish this ?  Thanks  ! ! !
Formula #1
NumberVar PeteTotal;
PeteTotal := 0;
If = "Pete"  And
   <> ["5001", "5030", "5031", "5032"] Then
   PeteTotal := Sum (, )
Formula #2
NumberVar MikeTotal;
MikeTotal := 0;
If = "Mike"  And
   <> ["5001", "5030", "5031", "5032"] Then
   MikeTotal := Sum (, )
Formula #3
NumberVar TonyTotal;
TonyTotal := 0;
If = "Tony"  And
   <> ["5001", "5030", "5031", "5032"] Then
   TonyTotal := Sum (, )
Formula #4
NumberVar AllTotals;
AllTotals :=0;
AllTotals := Sum(@PeteTotal, @MikeTotal, @TonyTotal)

Answer 1

I got zeros . . .  below is the code  . . .  do you see anything wrong ?
Formula #1
NumberVar Total;
Total := 0;
Whilereadingrecords;
If in ["Pete","Mike","Tony"]  And
   in ["5001", "5030", "5031", "5032"] Then
   Total :=
Else
0;
Formula #2
NumberVar GroupTotal;
GroupTotal := 0;
GroupTotal := Sum({@Formula #1});