UnmarkEntityAsDuplicate

Descrizione

Rimuove l'indicazione che il record specificato è un duplicato di un altro record.

Questo metodo interrompe il collegamento tra un oggetto Entity duplicato e originale. È possibile richiamare questo metodo per interrompere un collegamento stabilito dall'utente oppure richiamando il metodo MarkEntityAsDuplicate. Se l'azione DUPLICATE annullata ha provocato una transizione di stato, la transizione viene annullata a meno che non si sia verificata una successiva transizione di stato in seguito all'azione DUPLICATE. Una volta restituito questo metodo, il record è modificabile e deve essere convalidato e deve esserne eseguito il commit utilizzando rispettivamente i metodi Validate e Commit dell'oggetto Entity.

Nota: questo metodo non rimuove l'associazione nella tabella Entity padre-figlio. Il metodo rimuove le informazioni duplicate dall'oggetto Entity figlio, ma non rimuove le informazioni duplicate dall'oggetto Entity padre.

Sintassi

VBScript

session.UnmarkEntityAsDuplicate duplicate, action_name 

Perl

$session->UnmarkEntityAsDuplicate(duplicate, action_name); 
Identificativo
Descrizione
session
L'oggetto Session che rappresenta la sessione di accesso al database corrente.
duplicate
L'Oggetto Entity (al momento contrassegnato come duplicato) che deve essere modificato.
action_name
Una stringa che specifica l'azione da eseguire sul duplicato. Questo parametro deve contenere il nome di un'azione valida come definito nello schema. Tale azione deve disporre dell'UNDUPLICATE ActionType.
Valore di ritorno
Nessuno.

Esempi

VBScript

set sessionObj = GetSession 

' Remove the duplicate status of the entity with ID="BUGID00010345". 
' Use the action named "unduplicate". 
set oldDupEntityObj = sessionObj.GetEntity("defect", "BUGID00010345")
sessionObj.UnmarkEntityAsDuplicate oldDupEntityObj, "unduplicate" 

' Validate and commit the entity since it is currently modifiable. 
error = oldDupEntityObj.Validate 
if error = "" then 
   oldDupEntityObj.Commit 
End If 

Perl

#Get a Rational ClearQuest session

$sessionObj = $entity->GetSession();



#Get the entity BUGID00010345

$oldDupEntityObj = $sessionObj->GetEntity( "defect", "BUGID00010345" );



#Remove the duplicate status of the entity with #ID="BUGID00010345"

#using the action "unduplicate"

$sessionObj->UnmarkEntityAsDuplicate( $oldDupEntityObj, "unduplicate" );



#Validate and commit the entity since it is currently modifiable.

$error = $oldDupEntityObj->Validate();



if ( $error eq "" ) {

   $oldDupEntityObj->Commit();

} 

Feedback