Subversion Repositories DevTools

Rev

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

Rev 5506 Rev 5590
Line 414... Line 414...
414
    Call objBtnControl.Active ( "btnDeprecation",  "N")
414
    Call objBtnControl.Active ( "btnDeprecation",  "N")
415
    Call objBtnControl.Active ( "btnUnDeprecation",  "N")
415
    Call objBtnControl.Active ( "btnUnDeprecation",  "N")
416
    Call objBtnControl.Active ( "btnAddDaemonInstRipplePackage", "N")
416
    Call objBtnControl.Active ( "btnAddDaemonInstRipplePackage", "N")
417
End If
417
End If
418
 
418
 
-
 
419
If (pkgInfoHash.Item("base_view_id") = "") Then
-
 
420
    Call objBtnControl.Active ( "btnMoveToView",  "N")
-
 
421
End IF
-
 
422
 
419
'--- Other Access Control Action Relationships ---
423
'--- Other Access Control Action Relationships ---
420
If ( ReleaseMode = enumDB_RELEASE_IN_CCB_MODE )  Then Call objBtnControl.SetRelationship ( "btnMakeRelease", "ApprovePackageReleaseForRestrictiveMode" )
424
If ( ReleaseMode = enumDB_RELEASE_IN_CCB_MODE )  Then Call objBtnControl.SetRelationship ( "btnMakeRelease", "ApprovePackageReleaseForRestrictiveMode" )
421
 
425
 
422
Call objBtnControl.SetRelationship ( "btnPendingIntegration", "ApproveForPendingIntegration" )
426
Call objBtnControl.SetRelationship ( "btnPendingIntegration", "ApproveForPendingIntegration" )
423
Call objBtnControl.SetRelationship ( "btnPendingTest", "ApproveForPendingTest" )
427
Call objBtnControl.SetRelationship ( "btnPendingTest", "ApproveForPendingTest" )