SetFormat

Description

Consente di specificare la versione dell'HTML in cui salvare il prospetto.

È necessario richiamare tale metodo una volta richiamato il metodo SetHTMLFileName e prima di richiamare il metodo ExecuteReport per impostare il tipo di formato HTML del file di output di prospetto.

Specificare una delle seguenti costanti formato prospetto nel parametro format.
Nota: ciascuna costante viene preceduta da AD per VBScript o da $CQPerlExt::CQ per Perl. Ad esempio, AD_REPORT_FORMAT_HTML32
Costante Value Description
_NULL_REPORTFORMAT 0 Un valore non valido per l'inizializzazione
_REPORT_FORMAT_HTML32 1 Genera un file in formato HTML 3.2
_REPORT_FORMAT_HTML40 2 Genera un file in formato HTML 4.0

Il formato predefinito è il formato HTML 3.2 (_REPORT_FORMAT_HTML32). Se _NULL_REPORTFORMAT viene specificato come valore dell'argomento o se il metodo SetFormat non viene utilizzato prima di richiamare ExecuteReport, l'output viene generato nel formato predefinito.

Nota: questo metodo è nuovo nella versione 7.0.0.1 (e nella 2003.06.16)

Sintassi

VBScript

reportMgr.SetFormat format 

Perl

$reportMgr->SetFormat(format); 
Identificativo
Description
reportMgr
L'oggetto ReportMgr associato alla sessione corrente.
format
Un valore Long che specifica il tipo di formato HTML del file di prospetto.
Valore di ritorno
Nessuno.

Esempi

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);


Feedback