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

added: DataForm can now trigger workflow when adding an entry

Browse source
This commit is contained in:
Doug Bell 2008-10-25 05:38:08 +00:00
parent 91812b74eb
commit 5e967d9b82
5 changed files with 156 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

18
docs/upgrades/upgrade_7.6.1-7.6.2.pl
View file

@ -36,6 +36,7 @@ changeDefaultPaginationInSearch($session);
upgradeToYui26($session);
addUsersOnlineMacro($session);
addProfileExtrasField($session);
addWorkflowToDataform( $session );
finish($session); # this line required
#----------------------------------------------------------------------------
@ -107,6 +108,23 @@ sub addProfileExtrasField {
print "DONE!\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Add the workflow property to DataForm
sub addWorkflowToDataform {
my $session = shift;
print "\tAdding Workflow to DataForm... " unless $quiet;
my $sth = $session->db->read('DESCRIBE `DataForm`');
while (my ($col) = $sth->array) {
if ( $col eq 'workflowIdAddEntry' ) {
print "Already done, skipping.\n" unless $quiet;
return;
}
}
$session->db->write( "ALTER TABLE DataForm ADD COLUMN workflowIdAddEntry CHAR(22) BINARY" );
print "DONE!\n" unless $quiet;
}
# -------------- DO NOT EDIT BELOW THIS LINE --------------------------------