$Amount =~ /-?(\d+)\.?(\d+)/;
	 $intergerpart = $1;
	 $decimalpart = $2;
if ($lengthdecimal gt 2 || $Amount =~ /[^0-9]\.?[^0-9]/) {
	 display_output($templatefile,); #HTML error file
 	 print <<EOF;                    #Continues Processing
}