Subversion Repositories DevTools

Rev

Rev 4553 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4553 Rev 5061
Line 570... Line 570...
570 
                  If (NOT rsCQ.BOF) AND (NOT rsCQ.EOF) Then
 570 
                  If (NOT rsCQ.BOF) AND (NOT rsCQ.EOF) Then
571 
                     rsCQ.MoveTo( 1+(rspMax * (rspPage - 1)))
 571 
                     rsCQ.MoveTo( 1+(rspMax * (rspPage - 1)))
572 
 
 572 
 
573 
                     While ((NOT rsCQ.BOF) AND (NOT rsCQ.EOF) AND (rspCount < rspMax))
 573 
                     While ((NOT rsCQ.BOF) AND (NOT rsCQ.EOF) AND (rspCount < rspMax))
574 
 
 574 
 
575 
                        If (objAccessControl.IsActive("ImportOpenIssues")) Then
 575 
                        If (canActionControlInProject("ImportOpenIssues")) Then
576 
                           Select Case UCase( rsCQ("state") )
 576 
                           Select Case UCase( rsCQ("state") )
577 
                           Case "OPEN"
 577 
                           Case "OPEN"
578 
                              disabled = ""
 578 
                              disabled = ""
579 
                           Case "SUSPENDED"
 579 
                           Case "SUSPENDED"
580 
                              disabled = ""
 580 
                              disabled = ""
581 
                           Case Else
 581 
                           Case Else
582 
                              disabled = ""
 582 
                              disabled = ""
583 
                           End Select
 583 
                           End Select
584 
                        End If
 584 
                        End If
585 
 
 585 
 
586 
                        If NOT (objAccessControl.IsActive("ImportOpenIssues")) Then
 586 
                        If NOT (canActionControlInProject("ImportOpenIssues")) Then
587 
                           If (parSkipOpen <> "") Then
 587 
                           If (parSkipOpen <> "") Then
588 
                              Select Case UCase( rsCQ("state") )
 588 
                              Select Case UCase( rsCQ("state") )
589 
                              Case "OPEN"
 589 
                              Case "OPEN"
590 
                                 disabled = "disabled"
 590 
                                 disabled = "disabled"
591 
                              Case Else
 591 
                              Case Else