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