Retreiving dcr from a workflow

I have a workflow that is being invoked from my template. My understanding is that the dcr is automatically attached. However when I try to use the following perl code my task->getfiles returns nothing to me. The code that I have pasted below resides in a perl script file that is being called from an external task in my workflow.

use TeamSite::WFtask;
use TeamSite::WFworkflow;
use TeamSite::Config;

(my $iwhome = TeamSite::Config::iwgethome());
my($iwperl)="$iwhome/iw-perl/bin/iwperl";
my($lbin)="$iwhome/local/bin";

my $filelist = "$iwhome/tmp/filelist";
open (FILELIST, ">$filelist");

my($jobid, $taskid, $area)=(@ARGV[0..2]);

print FILELIST "OK\n";

my($task)=TeamSite::WFtask->new($taskid);
my @files = $task->GetFiles();

print FILELIST "$task\n";
print FILELIST "@files[0]\n";
print FILELIST "$area\n";
print FILELIST "$files\n";

my $extcmd="$iwhome/bin iwextattr.exe -g TeamSite/Templating/DCR/Type";

foreach my $file (@files)
{
# print FILELIST "$area .$file\n";
my $taskfile = "$area . $file";
}
close FILELIST;

#my $cmdoutput = '$extcmd $taskfile';

#system('iwdd.ipl cfg=Y:/default/main/IIG/Workarea/IIG_Work/templatedata/Product_Information/Product_Detail/product_dd.cfg deployment=Product');

$task->CallBack(0,'Success');
exit(0);

Can somebody help me and tell me why this code does not return the dcr info. The code is not complete in terms of the logic that needs to be implemented after I retreive the file. I wanted to take this in baby steps. However I am not having any luck even retreiving the dcr info and printing it to a file.

Find more posts tagged with

Comments

Migrateduser

Have you looked at the task in WebDesk Pro to see if it has any files?

Have you tried running your script from the command line to see if it works there, or if it produces any error messages?

Brinko Kobrin
Interwoven Staff Engineer

akshathp

Can you try printing out "taskid"? Before we start debugging let's make sure it is fetching the taskid atleast.

Akshat Pramod Sharma
Interwoven Inc.

akshathp

1. In your script you are using print FILELIST "@files[0]\n";. use print FILELIST "@files\n";

2. And, if the taskid exists, try printing out the files in the foreach loop.

3. Also, try to run this script from shell and see what the output is. If it runs successfully at the shell prompt, it will return you the messafge that task doesn't exist. Else it will give the emssage for error.

Hope this helps!

Akshat Pramod Sharma
Interwoven Inc.

Smeeta

the taskid prints out fine. The area path prints out fine too. I have tried running the script from the command promt too and I do not have any syntax errors. It tells me that the task does not exist which is natural since I am running it from the command prompt.

In regards to the files I tried printing $files. Since @files is an array $files should give me the count right? I don't get anything there either.

Listed below is the output of my file.
OK
TeamSite::WFtask=HASH(0x344e30)

\default\main\IIG\WORKAREA\IIG_Work

so you can see it is only the files part that is a problem.

Migrateduser

Please try running your script from the command line and give it the id of a task that exists and that has a file.

You will need to include the arguments jobID, taskID and areavpath on the command line after any other arguments that may be passed to your script.

Brinko Kobrin
Interwoven Staff Engineer

Field Mapping.docx