| Line 63... |
Line 63... |
| 63 |
Const LIMG_MERGE = "<img src='images/bt_move_all_right.gif' title='Click to merge.' border='0'>"
|
63 |
Const LIMG_MERGE = "<img src='images/bt_move_all_right.gif' title='Click to merge.' border='0'>"
|
| 64 |
Const LIMG_MERGE_WARN = "<img src='images/bt_move_warn_right.gif' title='Right hand side version is newer.' border='0'>"
|
64 |
Const LIMG_MERGE_WARN = "<img src='images/bt_move_warn_right.gif' title='Right hand side version is newer.' border='0'>"
|
| 65 |
Const LIMG_REMOVE = "<img src='images/bt_remove.gif' title='Remove this version from release.' border='0'>"
|
65 |
Const LIMG_REMOVE = "<img src='images/bt_remove.gif' title='Remove this version from release.' border='0'>"
|
| 66 |
Const LIMG_UNDO = "<img src='images/bt_undo.gif' title='Undo merge/remove.' border='0'>"
|
66 |
Const LIMG_UNDO = "<img src='images/bt_undo.gif' title='Undo merge/remove.' border='0'>"
|
| 67 |
'------------ Variable Init -------------------
|
67 |
'------------ Variable Init -------------------
|
| 68 |
Set rsCQ = Server.CreateObject("ADODB.Recordset")
|
- |
|
| 69 |
parRtagA = Request("rtagA")
|
68 |
parRtagA = Request("rtagA")
|
| 70 |
parRtagB = Request("rtagB")
|
69 |
parRtagB = Request("rtagB")
|
| 71 |
parSBOMA = Request("sbomA")
|
70 |
parSBOMA = Request("sbomA")
|
| 72 |
parSBOMB = Request("sbomB")
|
71 |
parSBOMB = Request("sbomB")
|
| 73 |
Set objRelCollectorA = CreateObject("Scripting.Dictionary")
|
72 |
Set objRelCollectorA = CreateObject("Scripting.Dictionary")
|
| Line 122... |
Line 121... |
| 122 |
SSsql = Replace( SSsql, "/*TDSEiss*/", TDSEiss)
|
121 |
SSsql = Replace( SSsql, "/*TDSEiss*/", TDSEiss)
|
| 123 |
SSsql = Replace( SSsql, "/*VT5DMiss*/", VT5DMiss)
|
122 |
SSsql = Replace( SSsql, "/*VT5DMiss*/", VT5DMiss)
|
| 124 |
SSsql = Replace( SSsql, "/*VTSUPiss*/", VTSUPiss)
|
123 |
SSsql = Replace( SSsql, "/*VTSUPiss*/", VTSUPiss)
|
| 125 |
|
124 |
|
| 126 |
retVal = Get_CQ_Issues ( SSsql, rsCQ )
|
125 |
retVal = Get_CQ_Issues ( SSsql, rsCQ )
|
| 127 |
|
- |
|
| 128 |
|
126 |
|
| 129 |
sqlstrC.MoveNext
|
127 |
sqlstrC.MoveNext
|
| 130 |
|
128 |
|
| 131 |
Wend
|
129 |
Wend
|
| 132 |
|
130 |
|
| Line 208... |
Line 206... |
| 208 |
|
206 |
|
| 209 |
End Function
|
207 |
End Function
|
| 210 |
'---------------------------------------------------------------------------------------------------------------------------
|
208 |
'---------------------------------------------------------------------------------------------------------------------------
|
| 211 |
Function Get_CQ_Issues ( SSsql, OOrsCQ )
|
209 |
Function Get_CQ_Issues ( SSsql, OOrsCQ )
|
| 212 |
|
210 |
|
| 213 |
If OOrsCQ.State = 1 Then
|
- |
|
| 214 |
OOrsCQ.Close
|
- |
|
| 215 |
End If
|
- |
|
| 216 |
|
- |
|
| 217 |
On Error Resume Next
|
211 |
On Error Resume Next
|
| 218 |
OOrsCQ.ActiveConnection = CQ_conn
|
212 |
Set OOrsCQ = OraDatabase.DbCreateDynaset( SSsql, cint(0))
|
| 219 |
OOrsCQ.Source = SSsql
|
- |
|
| 220 |
OOrsCQ.CursorType = 0
|
- |
|
| 221 |
OOrsCQ.CursorLocation = 2
|
- |
|
| 222 |
OOrsCQ.LockType = 3
|
- |
|
| 223 |
OOrsCQ.Open()
|
- |
|
| 224 |
Get_CQ_Issues = Err.Number
|
213 |
Get_CQ_Issues = Err.Number
|
| 225 |
|
214 |
|
| 226 |
End Function
|
215 |
End Function
|
| 227 |
'--------------------------------------------------------------------------------------------------------------------------
|
216 |
'--------------------------------------------------------------------------------------------------------------------------
|
| 228 |
Public Function TextToHTML ( sString )
|
217 |
Public Function TextToHTML ( sString )
|