nav[aria-label="Primary Navigation"] { padding: 0; & ul { list-style: none; width: 100%; display: flex; flex-direction: row; justify-content: start; align-items: start; gap: 30px; padding: 0; & li { margin: 0; } & ul li { list-style: none; } } }

Deleting WF database

Paul

Hi all, I am having a brain cramp. We have TeamSite 6.5 SP2 on Windows 2003 and I want to delete the wf database to get rid of all the workflows that are currently in the system but don't remember the right file to delete.

Find more posts tagged with

Comments

Valentine

it's part of the backing store.

stop teamsite
delete worklow directory from the backing store
start teamsite

Rohan_t1

it's part of the backing store.

stop teamsite
delete worklow directory from the backing store
start teamsite

IMO For second step mentioned, you can take a backup of the workflow directory, to create something like workflow.old and then start teamsite. And once you are happy that everything works fine after the teamsite restart, you may then delete the backup workflow directory.

Migrateduser

You can also delete your jobs with a perl script. Someone posted this a while back but I don't remember who it was.



use strict;
use TeamSite::Config;
use TeamSite::WFsystem;

my $iwhome = TeamSite::Config::iwgethome();
my $wfs = new TeamSite::WFsystem();
my @jobids = ();
push(@jobids, $_->GetId()) foreach (@{$wfs->GetWorkflows()});
print "No Jobs to remove\n" and exit(0) if (!@jobids);
# This loop is to avoid problems where there are more jobids
# than can fit on a single command line.  It slows things up
# a tiny bit, but it's better than failing outright
while(@jobids){
    my $jobids = "";
    while(length($jobids) < 200){
        $jobids .= shift(@jobids) . " ";
    }
    `$iwhome/bin/iwrmjob $jobids`;
    print "$jobids\n";
}
exit(0);

Crsb

You can also delete your jobs with a perl script. Someone posted this a while back but I don't remember who it was.



use strict;
use TeamSite::Config;
use TeamSite::WFsystem;

my $iwhome = TeamSite::Config::iwgethome();
my $wfs = new TeamSite::WFsystem();
my @jobids = ();
push(@jobids, $_->GetId()) foreach (@{$wfs->GetWorkflows()});
print "No Jobs to remove\n" and exit(0) if (!@jobids);
# This loop is to avoid problems where there are more jobids
# than can fit on a single command line.  It slows things up
# a tiny bit, but it's better than failing outright
while(@jobids){
    my $jobids = "";
    while(length($jobids) < 200){
        $jobids .= shift(@jobids) . " ";
    }
    `$iwhome/bin/iwrmjob $jobids`;
    print "$jobids\n";
}
exit(0);

I think you have to pass job IDs for this script to work?
To make it more efficient, add few lines of code to build a list of all active jobs.
First, get list of active tasks using CTL iwquerytasks, then get parent job id using $Task->GetWorkflowId() for each task id. this might result in duplicate job ids so you will have to remove duplicates. now you are left with list of active job and you can choose to delete all of them or delete by some condition (date, owner...)

Adam Stoller

I think you have to pass job IDs for this script to work?
To make it more efficient, add few lines of code to build a list of all active jobs.
First, get list of active tasks using CTL iwquerytasks, then get parent job id using $Task->GetWorkflowId() for each task id. this might result in duplicate job ids so you will have to remove duplicates. now you are left with list of active job and you can choose to delete all of them or delete by some condition (date, owner...)

Did you read the code?
It retrieves a list of all the active jobs (not tasks) and builds up command lines to delete those jobs using iwrmjob

Crsb

Did you read the code?
It retrieves a list of all the active jobs (not tasks) and builds up command lines to delete those jobs using iwrmjob

push(@jobids, $_->GetId()) foreach (@{$wfs->GetWorkflows()});

Ops i didnt see that line...

Migrateduser

Found this script on a forum:

use strict;
use TeamSite::Config;
use TeamSite::WFsystem;

my $system = new TeamSite::WFsystem();
my $wfs = $system->GetWorkflows();

foreach my $workflow (@{$wfs})
{

my $JOB_ID = $workflow->GetId();
print "Removing Job # $JOB_ID\n";
my $rm_string = "/usr/Interwoven/iw-home/TeamSite/bin/iwrmjob $JOB_ID";
my $result = `$rm_string`;
}

Worked well for me

Rick Poulin

Found this script on a forum: ...

That's basically the same script, except yours isn't portable and is slower, on account of forking a cmd line for each iwrmjob instead of batching them together.. Why resurrect this old thread with that?

TL;DR: anybody coming across this thread should use the script posted by taalgaard.