--- omni2db.pl 2002/09/11 20:54:24 1.3 +++ omni2db.pl 2002/09/12 07:59:57 1.4 @@ -12,15 +12,17 @@ sub db { return if (scalar keys %omni != 6); - my $rv = $dbh->do("update gantt + my $sql = "update gantt set finish=now() where sessionid='$omni{SessionID}' and type='$omni{Session_type}' and status='$omni{Session_status}' and - user_group_host='".$omni{'User.Group@Host'}||''."' and - specification='$omni{Backup_Specification}'"); + user_group_host='".$omni{'User.Group@Host'}."' and + specification='$omni{Backup_Specification}'"; - print "rv: $rv\n" if ($debug); + my $rv = $dbh->do($sql); + + print "sql:\n$sql\nrv: $rv\n" if ($debug); $dbh->do ("insert into gantt (sessionid,type,status, user_group_host,specification) values