Add in userpanewl and fix up table sub in template

Templates/custom.pm.tem

@@ -76,9 +76,9 @@ sub get_${tablecontrol[0]} {
 	my $c = shift;
     my @source_records = $c->actual_${tablecontrol[0]}();
     my @transformed_records;
-    my %Field_Mapping = ${tablecontrol[0]}_FIELD_MAPPING;
+    my %Field_Mapping = ${tablecontrol[0]}_FIELD_MAPPING();
     # Iterate over each record in the source array
-    for my $source_record (@$source_records) {
+    for my $source_record (@source_records) {
         my %transformed_record;
         # Iterate over each key-value pair in the $Field_Mapping constant
         while (my ($target, $source) = each %Field_Mapping) {