Существует очень простой способ получить имя прогона / теста:
Получить имя прогона:
Dim CurrentRun
Set CurrentRun = QCUtil.CurrentRun
Reporter.ReportEvent 2,"Current Run", CurrentRun.Name
Получить имя теста :
Dim strTestname
strTestname = QCUtil.CurrentTest.Name
Имейте в виду, что оба свойства не будут доступны при запуске uft без интеграции alm.
Существует официальная документация всех объектов vbscript который может использоваться в UFT gui.
Получить название теста с помощью API Тестовый пример сложнее, я могу опубликовать свое решение, если потребуется