I have figured out how to do it automatically:

Add this code to the 'ActionCanExecute' function:

If Actionname = ''act_run'' Then
Set us = TDConnection.UserSettings
us.Open ''MySettings''
us.Value(''LastTestInstanceID'') = TestSetTest_Fields(''TC_TESTCYCL_ID'').Value
us.Close
us.Post
Set us = Nothing
End If
If Actionname = ''act_end_run'' or ActionName = ''RfrshAct'' Then
Set us = TDConnection.UserSettings
us.Open ''MySettings''
us.DeleteValue ''LastTestInstanceID''
us.Close
End If

Add this code to the Bug_AfterPost function:

Set us = TDConnection.UserSettings
us.Open ''MySettings''
lTestInstanceId = us.Value(''LastTestInstanceID'')
BugID = Bug_Fields(''BG_BUG_ID'').Value
us.Close

if lTestInstanceId <> '''' then

Set td = TDConnection
Set objTCtestFac = td.TSTestFactory
Set ojbTCtest = objTCtestFac.Item(lTestInstanceId)
Set objBugLinkFac = ojbTCtest.BugLinkFactory
Set objLink = objBugLinkFac.AddItem(BugID)
objLink.LinkType = ''Related''
objLink.Post
End If
Set us = Nothing

This will automatically link any defect you raise while running a test to the test INSTANCE.
Note that this may skew defect reports as it will say there are two linkages, one to the instance and another to the step/run.

hi,

using this :
us.Value(''LastTestInstanceID'') = TestSetTest_Fields(''TC_TESTCYCL_ID'').Value,
you will always get the value of the test in testset that was selected when you clicked on 'run test' or 'run test set' button.

i suggest you use this instead :
us.Value(''LastTestInstanceID'') = Run_Fields(''RN_TESTCYCL_ID'').Value

best regards,
Maximilien.

I tweaked the code to work for newer versions of ALM including ALM 12.50 and ALM 12.53, I also included the revision to use the Run_Fields(''RN_TESTCYCL_ID'').Value vs the TestSetTest_Fields(''TC_TESTCYCL_ID'').Value

'Put this in ActionCanExecute

if actionname = ''StepsView.NewDefect'' then
Set us = TDConnection.UserSettings
us.Open ''MySettings''
us.Value(''LastTestInstanceID'') = Run_Fields.Field(''RN_TESTCYCL_ID'').Value
us.Close
us.Post
Set us = Nothing
End If
If Actionname = ''act_end_run'' or ActionName = ''RfrshAct'' Then
Set us = TDConnection.UserSettings
us.Open ''MySettings''
us.DeleteValue ''LastTestInstanceID''
us.Close
End If

'Put this in Bug_AfterPost

Set us = TDConnection.UserSettings
us.Open ''MySettings''
lTestInstanceId = us.Value(''LastTestInstanceID'')
BugID = Bug_Fields(''BG_BUG_ID'').Value
us.Close

if lTestInstanceId <> '''' then

Set td = TDConnection
Set objTCtestFac = td.TSTestFactory
Set ojbTCtest = objTCtestFac.Item(lTestInstanceId)
Set objBugLinkFac = ojbTCtest.BugLinkFactory
Set objLink = objBugLinkFac.AddItem(BugID)
objLink.LinkType = ''Related''
objLink.Post
End If
Set us = Nothing

1. Double click or Right-Click the test instance
2. go to ''Test Instance Properties'' > ''Linkage and Coverage''
3. Defects can be linked in the ''Linked Defects'' tab

You can also backtrack and link from the Defect to the Test Instance, but the method above is easier in my opinion.

Hi all,

We are running QC 12.2 . We are linking existing defects while manually running tests, However it does not automatically link it to the test instance. We want to be able to link it to the test instance. Or at least display the link icon in the list of test instances.

Is there any way to link existing defects automatically to test instance via script?

kind regards,
Swarna