Returns a FieldInfo object containing the value that the specified field will revert to, if the action is cancelled.
When you initiate an action, Rational ClearQuest caches the original values of the record's fields in case the action is cancelled. You can use this method to return the original value of a field that you have modified. You can get the original value of a field only while the record is editable. The record's notification hook is the last opportunity to get the original value before a new value takes effect.
VBScript
entity.GetFieldOriginalValue (field_name)
Perl
$entity->GetFieldOriginalValue(field_name);
VBScript
' Iterate through the fields and report which ones have changed. fieldNameList = GetFieldNames For Each fieldName in fieldNameList originalValue = GetFieldOriginalValue(fieldName).GetValue currentValue = GetFieldValue(fieldName).GetValue If currentValue <> originalValue Then ' Report a change in the field value OutputDebugString "The value in field " & fieldName & " has changed." End If Next
Perl
my($FieldNamesRef) = $entity->GetFieldNames(); foreach $FN (@$FieldNamesRef) { # Get the field's original value... $FieldInfo = $entity->GetFieldOriginalValue($FN); #... }