レポートを保存する HTML のバージョンを指定できます。
SetHTMLFileName メソッド呼び出しの後、ExecuteReport メソッド呼び出しの前に、このメソッドを呼び出して、レポート出力ファイルの HTML 書式タイプを設定します。
定数 | 値 | 説明 |
---|---|---|
_REPORT_FORMAT_HTML32 | 1 | HTML 3.2 書式でファイルを生成します。 |
_REPORT_FORMAT_HTML40 | 2 | HTML 4.0 書式でファイルを生成します。 |
デフォルト書式は、HTML 3.2 書式 (_REPORT_FORMAT_HTML32) です。 SetFormat メソッドを先に使用せずに ExecuteReport を呼び出した場合、出力はデフォルトの書式で生成されます。
VBScript
reportMgr.SetFormat format
Perl
$reportMgr->SetFormat(format);
VBScript
Dim cq_user,cq_pass,dbset,userdb
cq_user="admin"
cq_pass=""
dbset="7.0.0"
userdb="sampl"
'Create external session object
Set sessionObj = CreateObject("CLEARQUEST.SESSION")
sessionObj.UserLogon cq_user, cq_pass , userdb, AD_PRIVATE_SESSION, dbset
Set wkspc = sessionObj.GetWorkSpace
Set repMgr = wkspc.GetReportMgr("Public Queries/Reports/Defect Detail (All)")
repMgr.SetHTMLFileName "W:¥Shared¥Defects¥out_report_format32.html"
repMgr.SetFormat AD__REPORT_FORMAT_HTML32
repMgr.ExecuteReport
' Remove the reference
Set sessionObj = Nothing
Perl
use CQPerlExt;
$CQSessionobj = CQSession::Build();
$CQSessionobj->UserLogon('admin', '', 'sampl', '7.0.0');
$CQWorkSpace = $CQSessionobj->GetWorkSpace();
$CQReportMgr = $CQWorkSpace->GetReportMgr('Public Queries/Reports/Defect Detail (All)');
$CQReportMgr->SetHTMLFileName("W:¥¥Shared¥¥Defects¥¥out_pl_CQ_REPORT_FORMAT_HTML40.html");
$CQReportMgr->SetFormat($CQPerlExt::CQ_REPORT_FORMAT_HTML40);
$CQReportMgr->ExecuteReport();
CQSession::Unbuild($CQSessionobj);