oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Reverting EMS Submission Form.

Browse source 
This reverts commit 69a997aff9.
This commit is contained in:
Colin Kuskie 2009-11-05 16:38:55 -08:00
parent fc68756975
commit 7aa60c7dce
1 changed files with 2 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

6
docs/upgrades/upgrade_7.8.3-7.8.4.pl
View file

@ -54,7 +54,6 @@ finish($session); # this line required
sub configEMSActivities { sub configEMSActivities {
my $session = shift; my $session = shift;
print "\tConfigure EMS Activities... " unless $quiet; print "\tConfigure EMS Activities... " unless $quiet;
my $config = $session->config;
$config->addToArray('workflowActivities/None', 'WebGUI::Workflow::Activity::CleanupEMSSubmissions'); $config->addToArray('workflowActivities/None', 'WebGUI::Workflow::Activity::CleanupEMSSubmissions');
$config->addToArray('workflowActivities/None', 'WebGUI::Workflow::Activity::ProcessEMSApprovals'); $config->addToArray('workflowActivities/None', 'WebGUI::Workflow::Activity::ProcessEMSApprovals');
my $workflow = WebGUI::Workflow->new($session, 'pbworkflow000000000001'); # Daily my $workflow = WebGUI::Workflow->new($session, 'pbworkflow000000000001'); # Daily
@ -63,13 +62,13 @@ sub configEMSActivities {
} }
my $activity = $workflow->addActivity('WebGUI::Workflow::Activity::CleanupEMSSubmissions'); my $activity = $workflow->addActivity('WebGUI::Workflow::Activity::CleanupEMSSubmissions');
$activity->set('title', 'Purge Denied EMS Submissions'); $activity->set('title', 'Purge Denied EMS Submissions');
$activity->set('description', 'Purges EMS Submissions that were denied and are aged according to parameters.'); $activity->set('description', 'Purges EMS Submissions that were denied and are aged according to parameters'');
} # end of BREAK block } # end of BREAK block
$workflow = WebGUI::Workflow->new($session, 'pbworkflow000000000004'); # Hourly $workflow = WebGUI::Workflow->new($session, 'pbworkflow000000000004'); # Hourly
BREAK: { foreach my $activity (@{ $workflow->getActivities }) { BREAK: { foreach my $activity (@{ $workflow->getActivities }) {
last BREAK if $activity->getName() eq 'WebGUI::Workflow::Activity::ProcessEMSApprovals'; last BREAK if $activity->getName() eq 'WebGUI::Workflow::Activity::ProcessEMSApprovals';
} }
my $activity = $workflow->addActivity('WebGUI::Workflow::Activity::ProcessEMSApprovals'); $activity = $workflow->addActivity('WebGUI::Workflow::Activity::ProcessEMSApprovals');
$activity->set('title', 'Process Approves EMS Submissions'); $activity->set('title', 'Process Approves EMS Submissions');
$activity->set('description', 'Create EMS Ticket Assets for approved submissions.'); $activity->set('description', 'Create EMS Ticket Assets for approved submissions.');
} # end of BREAK block } # end of BREAK block
@ -82,7 +81,6 @@ sub configEMSActivities {
sub addEMSSubmissionTables { sub addEMSSubmissionTables {
my $session = shift; my $session = shift;
print "\tCreate EMS Submission Tables... " unless $quiet; print "\tCreate EMS Submission Tables... " unless $quiet;
my $db = $session->db;
$db->write(<<ENDSQL); $db->write(<<ENDSQL);
CREATE TABLE EMSSubmissionForm ( CREATE TABLE EMSSubmissionForm (