Subversion Repositories DevTools

Rev

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

Rev 6688 Rev 7022
Line 124... Line 124...
124 
            ElseIf pkgInfoHash.Item ("dlocked") = "P" Then
 124 
            ElseIf pkgInfoHash.Item ("dlocked") = "P" Then
125 
              lState = enum_imgPending
 125 
              lState = enum_imgPending
126 
            ElseIf (pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R") Then
 126 
            ElseIf (pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R") Then
127 
              'ElseIf (irtag_id<>"") Then
 127 
              'ElseIf (irtag_id<>"") Then
128 
              lState = enum_imgBuilding
 128 
              lState = enum_imgBuilding
- 
 
 129 
            ElseIf (pkgInfoHash.Item ("dlocked") = "A") Then
- 
 
 130 
                lState = "<img src='icons/i_approved.gif' width='11' height='17' border='0' title='Approved to Build" & "&#13;" & "Click to view details." & "' onClick=""location.href='build_status.asp?rtag_id=" & irtag_id & "';"" >"
129 
            End If
 131 
            End If
130 
            If NOT isEmpty(lState) Then Response.write "<td>" & lState & "</td>"
 132 
            If NOT isEmpty(lState) Then Response.write "<td>" & lState & "</td>"
131 
 
 133 
 
132 
            If pkgInfoHash.Item ("product_state") = 4 Then
 134 
            If pkgInfoHash.Item ("product_state") = 4 Then
133 
                Response.write "<td>" & enum_imgProductRejected & "</td>"
 135 
                Response.write "<td>" & enum_imgProductRejected & "</td>"
Line 202... Line 204...
202 
                Response.write "<td>"
 204 
                Response.write "<td>"
203 
                Response.write "<img src='images/Test.gif' width='17' height='17' border='0' title='Test Build Request." & "&#13;" & "Click to view details." & "' onClick=""location.href='build_status.asp?rtag_id=" & irtag_id & "';"" >"
 205 
                Response.write "<img src='images/Test.gif' width='17' height='17' border='0' title='Test Build Request." & "&#13;" & "Click to view details." & "' onClick=""location.href='build_status.asp?rtag_id=" & irtag_id & "';"" >"
204 
                Response.write "</td>"
 206 
                Response.write "</td>"
205 
            End If
 207 
            End If
206 
 
 208 
 
- 
 
 209 
            If pkgInfoHash.Item("hasFutureBuild") <> "" Then
- 
 
 210 
                Response.write "<td>"
- 
 
 211 
                Response.write "<img src='images/future.png' width='17' height='17' border='0' title='Scheduled Build" & "&#13;" & "Click to view details." & "' onClick=""location.href='build_status.asp?rtag_id=" & irtag_id & "';"" >"
- 
 
 212 
                Response.write "</td>"
- 
 
 213 
            End If
- 
 
 214 
 
- 
 
 215 
            If pkgInfoHash.Item("isBuilding") Then
- 
 
 216 
                Response.write "<td>"
- 
 
 217 
                Response.write "<img src='images/compile.png' width='17' height='17' border='0' title='Package is currently building" & "&#13;" & "Click to view details." & "' onClick=""location.href='build_status.asp?rtag_id=" & irtag_id & "';"" >"
- 
 
 218 
                Response.write "</td>"
- 
 
 219 
            End If
207 
 
 220 
 
208 
            ' check if this package has a build failure file
 221 
            ' check if this package has a build failure file
209 
            If pkgInfoHash("has_build_failure") Then
 222 
            If pkgInfoHash("has_build_failure") Then
210 
                Response.write "<td>"
 223 
                Response.write "<td>"
211 
                Response.write "<img src='icons/i_build_failure.gif' width='19' height='17' border='0' title='Package build failure." & "&#13;" & "Click to view details." &"' onClick=""location.href='build_status.asp?rtag_id=" & irtag_id & "';"" >"
 224 
                Response.write "<img src='icons/i_build_failure.gif' width='19' height='17' border='0' title='Package build failure." & "&#13;" & "Click to view details." &"' onClick=""location.href='build_status.asp?rtag_id=" & irtag_id & "';"" >"
Line 225... Line 238...
225 
                     Response.write enum_imgNotInArchive
 238 
                     Response.write enum_imgNotInArchive
226 
                     Response.write "</td>"
 239 
                     Response.write "</td>"
227 
                 End If
 240 
                 End If
228 
             End If
 241 
             End If
229 
 
 242 
 
230 
             ' Warn if the package has hit a rippel stop and is waiting for the user
 243 
             ' Warn if the package has hit a ripple stop and is waiting for the user
231 
             If (pkgInfoHash.Item ("ripple_stop") = "w") Then
 244 
             If (pkgInfoHash.Item ("ripple_stop") = "w") Then
232 
                 Response.write "<td>"
 245 
                 Response.write "<td>"
233 
                 Response.write enum_imgRippleStop
 246 
                 Response.write enum_imgRippleStop
234 
                 Response.write "</td>"
 247 
                 Response.write "</td>"
235 
             ElseIf (pkgInfoHash.Item ("ripple_stop") = "g") Then
 248 
             ElseIf (pkgInfoHash.Item ("ripple_stop") = "g") Then
Line 237... Line 250...
237 
                 Response.write enum_imgRippleGo
 250 
                 Response.write enum_imgRippleGo
238 
                 Response.write "</td>"
 251 
                 Response.write "</td>"
239 
             End If
 252 
             End If
240 
 
 253 
 
241 
 
 254 
 
242 
 
 - 
 
243 
             ' Warn if the package versionis not in the release
 255 
             ' Warn if the package version is not in the release
244 
             If pkgInfoHash.Exists("notInRelease")  Then
 256 
             If pkgInfoHash.Exists("notInRelease")  Then
245 
                     Response.write "<td>"
 257 
                     Response.write "<td>"
246 
 
 258 
 
247 
                     If pkgInfoHash.Exists("pv_id_InRelease") Then Response.write "<a href=gotoLatestInRelease.asp?pv_id=" & pkgInfoHash.Item("pv_id") & "&rtag_id="&irtag_id & "&page=" & scriptName & ">"
 259 
                     If pkgInfoHash.Exists("pv_id_InRelease") Then Response.write "<a href=gotoLatestInRelease.asp?pv_id=" & pkgInfoHash.Item("pv_id") & "&rtag_id="&irtag_id & "&page=" & scriptName & ">"
248 
                     Response.write enum_imgNotInRelease
 260 
                     Response.write enum_imgNotInRelease