HP ALM Workflow VBScript

This category will provide articles regarding usage of Visual Basic Script in the workflow module of HP ALM.

Recently I had to remove the history from some fields in HP ALM Quality Center.

In order to do that go to a projects customization and uncheck the History checkbox in a fields customization details.

However, I recently learned this will not always delete the Audit records in the underlying database :0).

Combines key value pairs from two collections of type Scripting.Dictionary.

Source Code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
' @Author - Alexander Bolte
' @ChangeDate - 2015-02-11
' @Description - Combines the fields of two handed collections where fields
' are understood as a key value pair.
' @Param aColl - a collection of type Scripting.Dictionary holding values for
' field labels, which are not available in collection 'bColl'.
' @Param bColl - a collection of type Scripting.Dictionary holding values for
' field labels, which are not available in collection 'aColl'.
' @Returns a collection of type Scripting.Dictionary holding all key value pairs
' from both handed collections for each unique key.
Function combineFields(aColl, bColl) ' As Scripting.Dictionary
	Dim bKey ' As String()
	Dim i ' As Integer
 
	bKey = bColl.keys
	For i = lBound(bKey) To uBound(bKey)
		If Not (aColl.Exists(bKey(i))) Then
			aColl.add bKey(i), bColl(bKey(i))
		End If
	Next
 
	Set combineFields = aColl
End Function

 

Referenced API 

http://www.w3schools.com/asp/asp_ref_dictionary.asp

In case you have to append a comment to an HP ALM memo field, the following method might be of help.

Source Code