Select Code to Download

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

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

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