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

a couple 'typos' in the upgrade script

Browse source
This commit is contained in:
daviddelikat 2009-11-04 10:24:46 -06:00
parent 6932ddfeb3
commit 69a997aff9
1 changed files with 4 additions and 2 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

@ -53,6 +53,7 @@ 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
@ -61,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';
} }
$activity = $workflow->addActivity('WebGUI::Workflow::Activity::ProcessEMSApprovals'); my $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
@ -80,6 +81,7 @@ 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 (