Subversion Repositories DevTools

Rev

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

Rev 7468 Rev 7493
Line 128... Line 128...
128
'----------------------------------------------
128
'----------------------------------------------
129
%>
129
%>
130
<%
130
<%
131
'--------------------------------------------------------------------------------------------------------------------------
131
'--------------------------------------------------------------------------------------------------------------------------
132
' Determines if the specified filter is on/off and returns a string to use to check the associated checkbox accordingly
132
' Determines if the specified filter is on/off and returns a string to use to check the associated checkbox accordingly
-
 
133
Function isListFilterChecked (nFilterId)
-
 
134
    isListFilterChecked = dListFilter.Exists ( "'" & CStr(nFilterId) & "'"  )
-
 
135
End Function
-
 
136
 
-
 
137
 
133
Function GetIsListFilterChecked( nFilterId )
138
Function GetIsListFilterChecked( nFilterId )
134
   GetIsListFilterChecked = ""
139
   GetIsListFilterChecked = ""
135
 
140
 
136
  If bIsaTreeView Then
141
  If bIsaTreeView AND nFilterId <> enumDB_RELEASE_IN_SNAPSHOT_MODE Then
137
       ' Disable the control in Tree View
142
       ' Disable the control in Tree View
138
       GetIsListFilterChecked = GetIsListFilterChecked & " checked disabled"
143
       GetIsListFilterChecked = GetIsListFilterChecked & "checked disabled"
139
  Else
144
  Else
140
       If dListFilter.Exists ( "'" & CStr(nFilterId) & "'"  ) Then
145
       If isListFilterChecked (nFilterId) Then
141
          GetIsListFilterChecked = "checked"
146
          GetIsListFilterChecked = "checked"
142
       End If
147
       End If
143
  End If
148
  End If
144
 
149
 
145
End Function
150
End Function
Line 286... Line 291...
286
             if ( pageTriggerDelay != 0 ) {
291
             if ( pageTriggerDelay != 0 ) {
287
                 clearTimeout(pageTriggerDelay);
292
                 clearTimeout(pageTriggerDelay);
288
                 pageTriggerDelay = 0;
293
                 pageTriggerDelay = 0;
289
             }
294
             }
290
 
295
 
291
             // Sanity test
-
 
292
             // If no check boxes are check - check all
-
 
293
             //
-
 
294
             if ($('#stateFilter input:checked').length <= 0){
-
 
295
                 jQuery.each($('#stateFilter input'),function(i,val){
-
 
296
                            $(this).prop('checked', true);
-
 
297
                            });
-
 
298
             }
-
 
299
 
-
 
300
             pageTriggerDelay = setTimeout(function(){
296
             pageTriggerDelay = setTimeout(function(){
301
                 $("#updateForm" ).trigger( "click" );
297
                 $("#updateForm" ).trigger( "click" );
302
                 }, 1000);
298
                 }, 1000);
303
        });
299
        });
304
});
300
});
Line 338... Line 334...
338
            </tr>
334
            </tr>
339
            <tr class=form_field_grey_bg>
335
            <tr class=form_field_grey_bg>
340
               <td><img src="images/i_rtag_archive_mode.gif" width="15" height="14"></td>
336
               <td><img src="images/i_rtag_archive_mode.gif" width="15" height="14"></td>
341
               <td><span class="body_txt"><input name="listFilter" type="checkbox" value="'<%=enumDB_RELEASE_IN_ARCHIVE_MODE%>'" <%=GetIsListFilterChecked(enumDB_RELEASE_IN_ARCHIVE_MODE)%>>Archive Mode</span></td>
337
               <td><span class="body_txt"><input name="listFilter" type="checkbox" value="'<%=enumDB_RELEASE_IN_ARCHIVE_MODE%>'" <%=GetIsListFilterChecked(enumDB_RELEASE_IN_ARCHIVE_MODE)%>>Archive Mode</span></td>
342
            </tr>
338
            </tr>
-
 
339
            <tr class=form_field_grey_bg>
-
 
340
               <td><img src='images/snapshot.png' height="14"></td>
-
 
341
               <td><span class="body_txt"><input name="listFilter" type="checkbox" value="'<%=enumDB_RELEASE_IN_SNAPSHOT_MODE%>'" <%=GetIsListFilterChecked(enumDB_RELEASE_IN_SNAPSHOT_MODE)%>>Snapshots</span></td>
-
 
342
            </tr>
343
            <%If NOT bIsaTreeView Then%>
343
            <%If NOT bIsaTreeView OR TRUE Then%>
344
             <tr>
344
             <tr>
345
                <td>&nbsp;</td>
345
                <td>&nbsp;</td>
346
                <td><input id=updateForm name="btn" type="submit" class="form_btn" value="Update" disabled></td>
346
                <td><input id=updateForm name="btn" type="submit" class="form_btn" value="Update" disabled></td>
347
             </tr>
347
             </tr>
348
             <tr>
348
             <tr>
Line 417... Line 417...
417
                    </thead>
417
                    </thead>
418
                   <%
418
                   <%
419
                   OraDatabase.Parameters.Add "PROJ_ID",  parProjId,  ORAPARM_INPUT, ORATYPE_NUMBER
419
                   OraDatabase.Parameters.Add "PROJ_ID",  parProjId,  ORAPARM_INPUT, ORATYPE_NUMBER
420
                   OraDatabase.Parameters.Add "USER_ID",  objAccessControl.UserId,  ORAPARM_INPUT, ORATYPE_NUMBER
420
                   OraDatabase.Parameters.Add "USER_ID",  objAccessControl.UserId,  ORAPARM_INPUT, ORATYPE_NUMBER
421
 
421
 
-
 
422
                   Dim treeFilter : treeFilter = ""
-
 
423
                   If NOT isListFilterChecked(enumDB_RELEASE_IN_SNAPSHOT_MODE) Then
-
 
424
                       treeFilter = " AND rt.OFFICIAL != 'S'"
-
 
425
                   End If
-
 
426
                   rsQryStr = GetQuery ("ReleaseVersionTree.sql")
-
 
427
                   rsQryStr = Replace(rsQryStr, "/*TREE_FILTER*/", treeFilter )
-
 
428
 
422
                   Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ReleaseVersionTree.sql") , ORADYN_DEFAULT )
429
                   Set rsQry = OraDatabase.DbCreateDynaset( rsQryStr, ORADYN_DEFAULT )
423
                   lastLevel = 0
430
                   lastLevel = 0
424
 
431
 
425
                   OraDatabase.Parameters.Remove "USER_ID"
432
                   OraDatabase.Parameters.Remove "USER_ID"
426
                   OraDatabase.Parameters.Remove "PROJ_ID"
433
                   OraDatabase.Parameters.Remove "PROJ_ID"
427
 
434
 
Line 443... Line 450...
443
                             createdBy = createdBy & "<br>Creator can delete"
450
                             createdBy = createdBy & "<br>Creator can delete"
444
                         End If
451
                         End If
445
                         
452
                         
446
                         %>
453
                         %>
447
                         <tr>
454
                         <tr>
448
                            <td nowrap>
455
                            <td nowrap valign=top>
449
                               <%Call RenderIndent( lastLevel, currLevel )%>
456
                               <%Call RenderIndent( lastLevel, currLevel )%>
450
                               <%Call RenderActions(rsQry("rtag_id"),rsQry("official"),rsQry("userCanDelete"))%>
457
                               <%Call RenderActions(rsQry("rtag_id"),rsQry("official"),rsQry("userCanDelete"))%>
451
                               <a href="dependencies.asp?rtag_id=<%=rsQry("rtag_id")%>" class="body_link" >
458
                               <a href="dependencies.asp?rtag_id=<%=rsQry("rtag_id")%>" class="body_link" >
452
                               <%=ReleaseIcon( rsQry("official") )%>&nbsp;<%=rsQry("rtag_name")%></a>
459
                               <%=ReleaseIcon( rsQry("official") )%>&nbsp;<%=rsQry("rtag_name")%></a>
453
                            </td>
460
                            </td>
Line 495... Line 502...
495
                   <%
502
                   <%
496
                      OraDatabase.Parameters.Add "PROJ_ID",  parProjId,                ORAPARM_INPUT, ORATYPE_NUMBER
503
                      OraDatabase.Parameters.Add "PROJ_ID",  parProjId,                ORAPARM_INPUT, ORATYPE_NUMBER
497
                      OraDatabase.Parameters.Add "USER_ID",  objAccessControl.UserId,  ORAPARM_INPUT, ORATYPE_NUMBER
504
                      OraDatabase.Parameters.Add "USER_ID",  objAccessControl.UserId,  ORAPARM_INPUT, ORATYPE_NUMBER
498
 
505
 
499
                      rsQryStr = GetQuery ("ReleaseVersionList.sql")
506
                      rsQryStr = GetQuery ("ReleaseVersionList.sql")
500
                      rsQryStr = Replace(rsQryStr, "/*SHOW_FILTER*/", parShowFilter)
507
                      rsQryStr = Replace(rsQryStr, "/*SHOW_FILTER*/", parShowFilter )
501
 
508
 
502
                      Set rsQry = OraDatabase.DbCreateDynaset( rsQryStr, ORADYN_DEFAULT )
509
                      Set rsQry = OraDatabase.DbCreateDynaset( rsQryStr, ORADYN_DEFAULT )
503
 
510
 
504
                      OraDatabase.Parameters.Remove "USER_ID"
511
                      OraDatabase.Parameters.Remove "USER_ID"
505
                      OraDatabase.Parameters.Remove "PROJ_ID"
512
                      OraDatabase.Parameters.Remove "PROJ_ID"