В QC - на странице скриптов, при создании нового Requirement (в обработке события canPost) нужно проверить тип родительского Requirement. Не могу понять как обратиться к родит. объекту. Подскажите
QC. Скрипты. Обращение к Requirement
Автор Арманди, 15 мар 2012 13:21
Сообщений в теме: 2
#1
Отправлено 15 марта 2012 - 13:21
#2
Отправлено 19 марта 2012 - 06:21
Неужели через Factory, затем фильтрация по нужному id? Иначе никак?В QC - на странице скриптов, при создании нового Requirement (в обработке события canPost) нужно проверить тип родительского Requirement. Не могу понять как обратиться к родит. объекту. Подскажите
#3
Отправлено 23 марта 2012 - 15:14
как пример вот VB Srcipt который ты можешь использовать, чтобы получить тип родитесльского риквайеремента.
Function Req_CanPost
On Error Resume Next
dim x
dim comm
dim y
dim rec
dim r
set comm = TDConnection.Command
x = Req_Fields.Field("RQ_FATHER_ID").Value
comm.CommandText = "SELECT RQ_TYPE_ID FROM REQ WHERE RQ_REQ_ID = " & x
set rec = comm.Execute
y = rec.Fieldvalue("RQ_TYPE_ID")
comm.CommandText = "SELECT TPR_NAME FROM REQ_TYPE WHERE TPR_TYPE_ID = " & y
set rec = comm.Execute
r = rec.Fieldvalue("TPR_NAME")
'msgbox x
'msgbox y
msgbox r
Req_CanPost = DefaultRes
On Error GoTo 0
End Function
Function Req_CanPost
On Error Resume Next
dim x
dim comm
dim y
dim rec
dim r
set comm = TDConnection.Command
x = Req_Fields.Field("RQ_FATHER_ID").Value
comm.CommandText = "SELECT RQ_TYPE_ID FROM REQ WHERE RQ_REQ_ID = " & x
set rec = comm.Execute
y = rec.Fieldvalue("RQ_TYPE_ID")
comm.CommandText = "SELECT TPR_NAME FROM REQ_TYPE WHERE TPR_TYPE_ID = " & y
set rec = comm.Execute
r = rec.Fieldvalue("TPR_NAME")
'msgbox x
'msgbox y
msgbox r
Req_CanPost = DefaultRes
On Error GoTo 0
End Function
Количество пользователей, читающих эту тему: 1
0 пользователей, 1 гостей, 0 анонимных