diff --git a/docs/upgrades/upgrade_7.8.7-7.8.8.pl b/docs/upgrades/upgrade_7.8.7-7.8.8.pl index 03e6b70fc..6185d5d0e 100644 --- a/docs/upgrades/upgrade_7.8.7-7.8.8.pl +++ b/docs/upgrades/upgrade_7.8.7-7.8.8.pl @@ -31,6 +31,7 @@ my $quiet; # this line required my $session = start(); # this line required # upgrade functions go here +deleteFieldFromEMSSubmission($session); finish($session); # this line required @@ -44,6 +45,20 @@ finish($session); # this line required # print "DONE!\n" unless $quiet; #} +#---------------------------------------------------------------------------- +# Drop send mail on change collumn from ems submission table +sub deleteFieldFromEMSSubmission { + my $session = shift; + print "\tDrop collumn from EMS Submission Table... " unless $quiet; + my $db = $session->db; + + $db->write(<