sub ProcessRecords() {
		my ($myNbr, $totalChilds, $totalAccts, @acctArray) = @_;

##</code><code>##

sub ProcessRecords() {
    my ($ref_acctArray,$myNbr,$totalChilds,$totalAccts) = @_;

##</code><code>##

ProcessRecords( \@SharedPlanAccts, $i1, $n, $totalAccts );