是需要强行修改SL状态的结束时间么?这样需要用Perl写个脚本来做。
可以用ModifyCR这个API,详细的参考 附件
ModifyCR
Apply the modified Change Request data. Only data objects that have been flagged as modified are submitted to the ChangeSynergy server. The attributes problem_number, modify_time, and cvid, should not be altered. The api classes will automatically process these attributes when needed. The return result is an instance of the apiData class.
Note: The apiObjectData's member method setValue("") will automatically set the modified flag when invoked.
Parameters:
apiUser aUser: The current api user's login data.
apiObjectVector data : The data to be processed by the api function.
Returns: apiData
results on if the modify was successful
Example:
my $csapi = new ChangeSynergy::csapi();
eval
{
$csapi->setUpConnection("http", "angler", 8600);
my $aUser = $csapi->Login("u00001", "u00001", "User", "\\\\angler\\ccmdb\\cm_database");
my $tmp = $csapi->AttributeModifyCRData($aUser, "100", "crstatus");
or
my $tmp = $csapi->AttributeModifyCRData($aUser, "100");
or
my $tmp = $csapi->ModifyCRData($aUser, "100", "CRDetail");
or
my $tmp = $csapi->GetCRData($aUser, "100", "problem_synopsis|problem_description|keyword");
$tmp->getDataObjectByName("problem_synopsis")->setValue("I modified the synopsis through the csapi...");
$tmp->getDataObjectByName("problem_description")->setValue("I modified the description through the csapi...");
$tmp->getDataObjectByName("keyword")->setValue("csapi");
my $tmpstr = $csapi->ModifyCR($aUser, $tmp);
};
if ($@)
{
print $@;
}
附件
-
perlapi.chm
(103.18 KB, 2008-3-14 16:02)
-
关于附件奖励,
下载次数 2,
使用阶层: 通用
, 推荐星级: 无 , 出售价格: 2 金钱 , 你的购买价格: 2 金钱