Subversion Repositories DevTools

Rev

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

Rev 149 Rev 151
Line 158... Line 158...
158
Call objBtnControl.Visible ( "btnUnDeprecation", "N" )
158
Call objBtnControl.Visible ( "btnUnDeprecation", "N" )
159
Call objBtnControl.Active  ( "btnApproveMerge", "N" )
159
Call objBtnControl.Active  ( "btnApproveMerge", "N" )
160
Call objBtnControl.Visible ( "btnApproveMerge", "N" )
160
Call objBtnControl.Visible ( "btnApproveMerge", "N" )
161
Call objBtnControl.Active  ( "btnAddDaemonInstRipplePackage", "N" )
161
Call objBtnControl.Active  ( "btnAddDaemonInstRipplePackage", "N" )
162
Call objBtnControl.Visible ( "btnAddDaemonInstRipplePackage", "N" )
162
Call objBtnControl.Visible ( "btnAddDaemonInstRipplePackage", "N" )
163
Call objBtnControl.Active  ( "btnAddDaemonInstTestBuildPackage", "Y" )  ' Active for Manual and Auto-Build types
163
Call objBtnControl.Active  ( "btnAddDaemonInstTestBuildPackage", "N" )
164
Call objBtnControl.Visible ( "btnAddDaemonInstTestBuildPackage", "N" )
164
Call objBtnControl.Visible ( "btnAddDaemonInstTestBuildPackage", "N" )
165
 
165
 
166
 
166
 
167
 
167
 
168
 
168
 
Line 309... Line 309...
309
   Call objBtnControl.Active ( "btnMakePending", "Y" )
309
   Call objBtnControl.Active ( "btnMakePending", "Y" )
310
 
310
 
311
   Call objBtnControl.Visible ( "btnApprovePackage", "N" )
311
   Call objBtnControl.Visible ( "btnApprovePackage", "N" )
312
   Call objBtnControl.Visible ( "btnRejectPackage", "N" )
312
   Call objBtnControl.Visible ( "btnRejectPackage", "N" )
313
 
313
 
-
 
314
   If objAccessControl.IsDataActive ("PROJECTS", DB_PROJ_ID, "EditProjects") Then
-
 
315
      Call objBtnControl.Active  ( "btnAddDaemonInstTestBuildPackage", "Y" )
314
   Call objBtnControl.Visible ( "btnAddDaemonInstTestBuildPackage", "Y" )
316
      Call objBtnControl.Visible ( "btnAddDaemonInstTestBuildPackage", "Y" )
-
 
317
   End If
315
End If
318
End If
316
 
319
 
317
 
320
 
318
If IsNull(pkgInfoHash.Item ("is_obsolete")) Then
321
If IsNull(pkgInfoHash.Item ("is_obsolete")) Then
319
   Call objBtnControl.Visible ( "btnObsoletePatch", "Y" )
322
   Call objBtnControl.Visible ( "btnObsoletePatch", "Y" )