Please read this article carefully before implementing and make sure that you understand the whole process. I will not be responsible for any issues. If possible, first implement it in a dummy/test ALM project. 

In this post we will discuss about how to create a workflow for moving test from Test Plan Module to Test Lab module in ALM.

How this workflow will work?

We will add a custom button in ALM and when you will select a folder in test plan and click on this custom button then all of your folder structure and tests will move from test plan to test lab.

Adding the custom button in ALM

Follow the below steps for adding the custom button in ALM.

1. Login to ALM and click on Tools -> Customize

   

2. Click on workflows and then click on script editor.

   

3. In Script editor, click on Toolbar button editor and from the command bar select Test Plan

   

4. Click on Add button at the bottom of the screen.

   

5. Change the Caption to Move_Tests_To_Lab and add the Hint as “Move test plan folder to test lab”.

   

6. Select an Icon from the right pane and click on apply.

7. Now copy the contents of the “Action Name is Workflow” textbox

we have just created a custom button in the test plan. To Save this change, Click on File -> Save.

Adding the Code to move the test from test plan to test lab

To add the code follow the below steps

1. Click on the Script Editor and open Common scripts under the Project Scripts

   

2. Add two Global variable here on the first line of the code. All function definitions must be below this line.

   Dim TestPlanFolderID
   Dim TestPlanFolderPath
   

   

3. Now inside “ActionCanExecute” function create a ‘If’ condition with the “Action Name in Workflow” Textbox value

   if ActionName = "UserDefinedActions.TestPlan_Action1" then
       copyToLab
   End IF
   

   We will create copyToLab function next. The whole “ActionCanExecute” function should look like this

   

   Every time you click on the custom button, this function will be called.

4. Now open the Test Plan Module Script and click on “TestFolder_MoveTo”

   

5. Add the following code to the TestFolder_MoveTo function

   TestPlanFolderID = TestFolder_Fields.Field("AL_ITEM_ID").Value
   set TreeMgr = TDConnection.TreeManager
   set TestPlanFolder = TreeMgr.NodeByID(TestPlanFolderID)
   TestPlanFolderPath = TestPlanFolder.Path
   Set TreeMgr = Nothing
   set TestPlanFolder = Nothing
   

   The whole function should look like this

   

6. Now open Extensions script.

   

7. Paste the below code to the Extensions script (There are issues with the below code because of how wordpress is processing the VB code. Please download the code from here)

    

   Dim OConnection

   Sub copyToLab()

   On Error Resume Next

   Dim OTestFact
   Dim OTestFilter
   Dim OTestList
   Dim mySNode
   Dim myPath
   Dim TStreemgr
   Dim OTSRootFolder
   Dim ParentFolderUnderRoot
   Dim CurrentTest
   Dim result

   ”Get TDObject
   Set OConnection = TDConnection

   ”Get TestFactory
   Set OTestFact = OConnection.TestFactory

   ”Get Test Factory Filters
   Set OTestFilter = OTestFact.Filter
   ”Filter Test Plan with the path of the selected folder
   OTestFilter.Filter(“TS_SUBJECT”) = “^\” & TestPlanFolderPath & “^”
   Set OTestList = OTestFilter.NewList
   result = MsgBox(OTestList.Count & ” Tests will be copied” & vbCRLF & “Begin copy of ” & TestPlanFolderPath & ” now?”,vbYesNo,”Moving Test Plan to Lab”)

   ‘Find if user wants to continue
   If result = vbNo Then
   msgbox “Test Plan to Lab Copy Cancelled”
   Exit Sub
   End If

   ”’Create a folder with datetime inside the test lab
   ParentFolderUnderRoot = Replace(Replace(now, “:”, “_”), “/”,”_”)

   Set TStreemgr = OConnection.TestSetTreeManager
   Set OTSRootFolder = TStreemgr.Root
   OTSRootFolder.AddNode(ParentFolderUnderRoot)
   OTSRootFolder.Post()
   OTSRootFolder.Refresh()

   ‘Move Tests Below
   For Each CurrentTest In OTestList
   ”’Call setup lab to create the folders and tests sets in lab
   result = SetupLab(CurrentTest.Field(“TS_Subject”).Path, CurrentTest, ParentFolderUnderRoot)
   Next

   Msgbox “TestSets Folders, TestSets and Test Instances Created Successfully”, vbOKOnly
   On Error GoTo 0

   End Sub

    

   Function SetupLab(CurrentPath, CurrentTest, ParentFolderUnderRoot)

   Dim TStmgr
   Dim LoopCounter
   Dim Path
   Dim NewNode
   Dim SubjectSplit
   Dim testSetFilter
   Dim TSList
   Dim OTestSet

   On Error Resume Next

   ””Create Folders Below
   Path = “Root\” & ParentFolderUnderRoot
   OldPath = “”
   SubjectSplit = Split(currentPath, “\”)
   Set TStmgr = OConnection.TestSetTreeManager

   ”””””””””” Create Folder Path ”””””””””””””””””
   For each OFolder in SubjectSplit
   if (Strcomp(OFolder, “Subject”, VBTextCompare) <> 0) then

   ”’Find if the folder exist
   Set NewNode = TStmgr.NodeByPath(Trim(Path) & “\” & OFolder)

   ”If Not Found then create
   if Err.Number <> 0 then
   TStmgr.NodeByPath(Path).addNode(OFolder).Post
   End If

   ”’Update the Path
   Path = Trim(Path) & “\” & OFolder
   End If
   Next

   ”””””””””” Create a test set ”””””””””””””””
   Set NewNode = TStmgr.NodeByPath(Trim(Path))

   ””””’ Find if test set exists ””””””””””””
   Set testSetFilter = NewNode.TestSetFactory.Filter
   testSetFilter.Filter(“CY_FOLDER_ID”) = NewNode.Nodeid
   testSetFilter.Filter(“CY_CYCLE”) = SubjectSplit(Ubound(SubjectSplit))
   Set TSList = testSetFilter.newList

   ”’Add Testset if necessary
   If TSList.Count = 0 Then
   Set OTestSet = NewNode.TestSetFactory.AddItem(Null)
   OTestSet.Name = SubjectSplit(Ubound(SubjectSplit))
   OTestSet.Status = “Open”
   OTestSet.Post
   Else
   Set OTestSet = TSList.Item(1)
   End If

   ”””””””””” Add Test ””””””””””””””””””””””
   OTestSet.TSTestFactory.AddItem(CurrentTest.ID).Post
   On Error GoTo 0

   End Function

Everything is done now. Save it. Lets run it.

8. Close the script Editor.

9. Click on Return on the upper right corner of ALM, select Major change on the Customization changes window and Click on OK Button.

Running the workflow

1. 1. Open the test plan and select the folder you want to move to test lab. Folder must be selected first before running the workflow or it will not do anything.

      

   2. Click on the Run workflow button
   3. Verify the folder and the count of tests in the dialog box an click on Yes.
   4.  Once the process is complete. Click on ok button.
   5. Go to Test lab and Click on refresh button

1.  
2.      6. Date time stamp folder will appear, one this folder you will have the complete           hierarchy and with tests sets and tests created in Lab.

That’s it. Now you can use it whenever you want to move the tests from test plan to test lab.

Let me know if you have any questions.