so say you have a basic cqperl script that plans to change a value:
use CQPerlExt;
$sessionObj = CQSession::Build();
$sessionObj->UserLogon( "vobadm", "somepassword", "MR", "7.0.0" );
my $record1 = $sessionObj->GetEntity( "DR", $defectId );
$sessionObj->EditEntity($record1,"Modify");
$record1->SetFieldValue($fieldName, $newComment);
$status = $record1->Validate();
if ($status) { $record1->Revert; }
else { $record1->Commit(); }
now you want to change a state.. you have to do it in the stead of Modify… e.g.
$sessionObj->EditEntity($record1,$newStateName);
On a side note, I really wish Rational (IBM) would release CQPerlExt.pm as a standard perl module. I hate having to install CQ just to get it.
for the moment
you can see the old website here: http://72.29.72.117/~ragingl/
Guten Tag
Hola, Guten Tag, Bon Jour, Halo.
This will be my new home. Too many blogs out there. I plan to keep it geeky, so beware. Things of our shared life will live in the main blog Ink Runway. I’ve already set f3600 and ragingliberal to redirect over to here. Those sites are backed up so no data is gone.
- Why the change?
- I was paying nearly 40 bucks in hosting fees to HostDime and their performance was shotty and I would have at least a day of downtime every month. Recently, after crashing a disk, I couldnt get wordpress on the iPhone to post (either security restrictions, database restrictions or something else prevented it).
- Ink Runway?
- It’s a clever double entendre – My wife and I share few areas of interest – so we could have gone with something Scrabble ™ related but we’ve played that theme to death. We both like movies (i have a greater tolerance for crappy ones), we both like music but not always the same. But the real passion for Anna is art – especially printmaking. For me, my hobby has been radio control planes. So an ink runway could be a plate or press or the runway for a plane. Well, I thought it was rather clever…












