Subversion Repositories DevTools

Rev

Rev 7250 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7250 Rev 7261
Line 164... Line 164...
164
            "  p.PKG_NAME, " &_
164
            "  p.PKG_NAME, " &_
165
            "  NVL(pv.V_EXT, '') AS V_EXT, " &_
165
            "  NVL(pv.V_EXT, '') AS V_EXT, " &_
166
            "  TO_CHAR(bi.TIMESTAMP, 'Dy DD-Mon-YYYY HH24:MI:SS') AS TIMESTAMPTXT, " &_
166
            "  TO_CHAR(bi.TIMESTAMP, 'Dy DD-Mon-YYYY HH24:MI:SS') AS TIMESTAMPTXT, " &_
167
            "  DECODE(bi.reason, 'N', 'New Version', 'R', 'Ripple', 'T', 'Test', 'P', 'Restored', 'F', 'ForcedRipple', 'Unknown') AS REASON, " &_
167
            "  DECODE(bi.reason, 'N', 'New Version', 'R', 'Ripple', 'T', 'Test', 'P', 'Restored', 'F', 'ForcedRipple', 'Unknown') AS REASON, " &_
168
            "  DECODE(bi.state, 'B', 'Buiding', 'C', 'Complete', 'E', 'Error', 'S', 'SysErr', 'Unknown') AS STATE, " &_
168
            "  DECODE(bi.state, 'B', 'Buiding', 'C', 'Complete', 'E', 'Error', 'S', 'SysErr', 'Unknown') AS STATE, " &_
169
            "  bi.build_id " &_
169
            "  bi.build_id, " &_
-
 
170
            "  bi.build_ref " &_
170
            "FROM BUILD_INSTANCES bi, " &_
171
            "FROM BUILD_INSTANCES bi, " &_
171
            "  projects pj, " &_
172
            "  projects pj, " &_
172
            "  RELEASE_TAGS rt, " &_
173
            "  RELEASE_TAGS rt, " &_
173
            "  packages p, " &_
174
            "  packages p, " &_
174
            "  PACKAGE_VERSIONS pv " &_
175
            "  PACKAGE_VERSIONS pv " &_
Line 225... Line 226...
225
       Dim v_ext        : v_ext = fields(7)
226
       Dim v_ext        : v_ext = fields(7)
226
       Dim timestamp    : timestamp = fields(8)
227
       Dim timestamp    : timestamp = fields(8)
227
       Dim reason       : reason = fields(9)
228
       Dim reason       : reason = fields(9)
228
       Dim state        : state = fields(10)
229
       Dim state        : state = fields(10)
229
       Dim buildId      : buildId = fields(11)
230
       Dim buildId      : buildId = fields(11)
-
 
231
       Dim buildRef     : buildRef = fields(12)
230
       Dim tcount       : tcount = fields(13)
232
       Dim tcount       : tcount = fields(14)
231
       Dim pkg_version  : pkg_version = fields(14)
233
       Dim pkg_version  : pkg_version = fields(15)
232
       Dim description  : description = CleanUpJson(Server.HTMLEncode(fields(15)))
234
       Dim description  : description = CleanUpJson(Server.HTMLEncode(fields(16)))
233
       Dim comments     : comments = CleanUpJson(Server.HTMLEncode(fields(16)))
235
       Dim comments     : comments = CleanUpJson(Server.HTMLEncode(fields(17)))
234
       Dim buildTime    : buildTime = Server.HTMLEncode(fields(17))
236
       Dim buildTime    : buildTime = Server.HTMLEncode(fields(18))
-
 
237
       Dim buildLog     : buildLog = ""
235
 
238
 
236
       Set fields = nothing
239
       Set fields = nothing
237
 
240
 
238
        If buildTime <= 0 Then buildTime = ""
241
        If buildTime <= 0 Then buildTime = ""
239
        If tcount <= 0 Then tcount = ""
242
        If tcount <= 0 Then tcount = ""
240
 
243
 
-
 
244
        If buildRef <> "" Then
-
 
245
			BuildLog = "<span class=vixIframeDialog title='Associated Log Files' href='_iframe_build_logs.asp?rtag_id="&rtag_id&"&build_ref="&buildRef&"'><img src='images/log_file-512.png' height=13px'></span>"
-
 
246
		Else
-
 
247
            BuildLog = "<span title='Associated Log Files not available'><img src='images/log_file-512.png' height=13px' class=lessOpacity></span>"
-
 
248
		End If 
-
 
249
 
241
        newitem(0) = "<a href='rtree.asp?proj_id=" & proj_id & "'>" & proj_name &"</a>"
250
        newitem(0) = "<a href='rtree.asp?proj_id=" & proj_id & "'>" & proj_name &"</a>"
242
        newitem(1) = "<a href='dependencies.asp?rtag_id=" & rtag_id & "'>" & rtag_name & "</a>"
251
        newitem(1) = "<a href='dependencies.asp?rtag_id=" & rtag_id & "'>" & rtag_name & "</a>"
243
        newitem(2) = "<a href=view_by_version.asp?pkg_id=" & pkg_id & "&fpkgversion=*" & v_ext & " title='" & description & "'>" & pkg_name & "</a>"
252
        newitem(2) = "<a href=view_by_version.asp?pkg_id=" & pkg_id & "&fpkgversion=*" & v_ext & " title='" & description & "'>" & pkg_name & "</a>"
244
        newitem(3) =  "<a href='dependencies.asp?pv_id=" & pv_id & "&rtag_id=" & rtag_id &"' title='" & comments & "'>" & pkg_version & "</a>"
253
        newitem(3) =  "<a href='dependencies.asp?pv_id=" & pv_id & "&rtag_id=" & rtag_id &"' title='" & comments & "'>" & pkg_version & "</a>"
245
        newitem(4) = timestamp
254
        newitem(4) = timestamp
246
        newitem(5) = reason
255
        newitem(5) = reason
247
        newitem(6) = buildTime
256
        newitem(6) = buildTime
248
        newitem(7) = "<a href='unit_test_log.asp?rtag_id=" & rtag_id & "&pv_id=" & pv_id & "'>" & state & "</a>"
257
        newitem(7) = "<a href='unit_test_log.asp?rtag_id=" & rtag_id & "&pv_id=" & pv_id & "'>" & state & "</a>"
249
        newitem(8) = tcount
258
        newitem(8) = tcount
-
 
259
        newitem(9) = BuildLog
250
 
260
        
251
       rsQry.MoveNext
261
       rsQry.MoveNext
252
   Wend
262
   Wend
253
End IF
263
End IF
254
 
264
 
255
rsQry.Close
265
rsQry.Close