my $eventChoice = shift;
 my @Records = @_;