| Line 86... |
Line 86... |
| 86 |
|
86 |
|
| 87 |
ElseIf canActionControlInProject("EditCriticalInfoForLockedPackage") Then
|
87 |
ElseIf canActionControlInProject("EditCriticalInfoForLockedPackage") Then
|
| 88 |
' For Packages in Release
|
88 |
' For Packages in Release
|
| 89 |
aTabBtnsDef = Array("btnNewVersion", "btnVersionHistory", "width=20", "btnDestroyWip" ,"btnRemovePackage", "btnMoveWIPToRelease", "width=20", _
|
89 |
aTabBtnsDef = Array("btnNewVersion", "btnVersionHistory", "width=20", "btnDestroyWip" ,"btnRemovePackage", "btnMoveWIPToRelease", "width=20", _
|
| 90 |
"btnAddDaemonInstTestBuildPackage", "btnMakePending", "btnApprovePackage", "btnApproveMerge", "btnMakeRelease", "btnRejectPackage", "btnRejectAutobuildPackage", "btnMakeUnrelease", "width=20", _
|
90 |
"btnAddDaemonInstTestBuildPackage", "btnMakePending", "btnApprovePackage", "btnApproveMerge", "btnMakeRelease", "btnRejectPackage", "btnRejectAutobuildPackage", "btnMakeUnrelease", "width=20", _
|
| 91 |
"btnMoveToView", "btnReversionPackage","btnLockPackage","btnUnLockPackage", "width=20", "btnStickyNotes", "btnDeprecation", "btnUnDeprecation", "btnAddDaemonInstRipplePackage")
|
91 |
"btnMoveToView", "btnReversionPackage","btnLockPackage","btnUnLockPackage", "width=20", "btnStickyNotes", "btnDeprecation", "btnUnDeprecation", "btnAddDaemonInstRipplePackage", "btnDelDaemonInstRipplePackage", "btnDelDaemonInstTestPackage")
|
| 92 |
Else
|
92 |
Else
|
| 93 |
' For Packages in Release
|
93 |
' For Packages in Release
|
| 94 |
aTabBtnsDef = Array("btnNewVersion", "btnVersionHistory", "width=20", "btnDestroyWip","btnRemovePackage", "btnMoveWIPToRelease", "width=20", _
|
94 |
aTabBtnsDef = Array("btnNewVersion", "btnVersionHistory", "width=20", "btnDestroyWip","btnRemovePackage", "btnMoveWIPToRelease", "width=20", _
|
| 95 |
"btnAddDaemonInstTestBuildPackage", "btnMakePending", "btnApprovePackage", "btnApproveMerge", "btnMakeRelease", "btnRejectPackage", "btnRejectAutobuildPackage", "width=20", _
|
95 |
"btnAddDaemonInstTestBuildPackage", "btnMakePending", "btnApprovePackage", "btnApproveMerge", "btnMakeRelease", "btnRejectPackage", "btnRejectAutobuildPackage", "width=20", _
|
| 96 |
"btnMoveToView", "btnReversionPackage", "width=20", "btnStickyNotes", "btnDeprecation", "btnUnDeprecation", "btnAddDaemonInstRipplePackage")
|
96 |
"btnMoveToView", "btnReversionPackage", "width=20", "btnStickyNotes", "btnDeprecation", "btnUnDeprecation", "btnAddDaemonInstRipplePackage", "btnDelDaemonInstRipplePackage", "btnDelDaemonInstTestPackage")
|
| 97 |
End If
|
97 |
End If
|
| 98 |
Else
|
98 |
Else
|
| 99 |
' Non-Editable Packages in Release
|
99 |
' Non-Editable Packages in Release
|
| 100 |
If AssocMASSREF Then
|
100 |
If AssocMASSREF Then
|
| 101 |
aTabBtnsDef = Array("btnNewVersion-MASSREF", "btnVersionHistory", "btnStickyNotes", "btnDeprecation", "btnUnDeprecation")
|
101 |
aTabBtnsDef = Array("btnNewVersion-MASSREF", "btnVersionHistory", "btnStickyNotes", "btnDeprecation", "btnUnDeprecation")
|
| Line 151... |
Line 151... |
| 151 |
Call objBtnControl.Visible("btnUnDeprecation", "N")
|
151 |
Call objBtnControl.Visible("btnUnDeprecation", "N")
|
| 152 |
Call objBtnControl.Active ("btnApproveMerge", "N")
|
152 |
Call objBtnControl.Active ("btnApproveMerge", "N")
|
| 153 |
Call objBtnControl.Visible("btnApproveMerge", "N")
|
153 |
Call objBtnControl.Visible("btnApproveMerge", "N")
|
| 154 |
Call objBtnControl.Active ("btnAddDaemonInstRipplePackage", "N")
|
154 |
Call objBtnControl.Active ("btnAddDaemonInstRipplePackage", "N")
|
| 155 |
Call objBtnControl.Visible("btnAddDaemonInstRipplePackage", "N")
|
155 |
Call objBtnControl.Visible("btnAddDaemonInstRipplePackage", "N")
|
| - |
|
156 |
Call objBtnControl.Active ("btnDelDaemonInstRipplePackage", "N")
|
| - |
|
157 |
Call objBtnControl.Visible("btnDelDaemonInstRipplePackage", "N")
|
| - |
|
158 |
Call objBtnControl.Active ("btnDelDaemonInstTestPackage", "N")
|
| - |
|
159 |
Call objBtnControl.Visible("btnDelDaemonInstTestPackage", "N")
|
| 156 |
Call objBtnControl.Active ("btnAddDaemonInstTestBuildPackage", "N")
|
160 |
Call objBtnControl.Active ("btnAddDaemonInstTestBuildPackage", "N")
|
| 157 |
Call objBtnControl.Visible("btnAddDaemonInstTestBuildPackage", "N")
|
161 |
Call objBtnControl.Visible("btnAddDaemonInstTestBuildPackage", "N")
|
| 158 |
Call objBtnControl.Active ("btnMoveWIPToRelease", "N")
|
162 |
Call objBtnControl.Active ("btnMoveWIPToRelease", "N")
|
| 159 |
Call objBtnControl.Visible("btnMoveWIPToRelease", "N")
|
163 |
Call objBtnControl.Visible("btnMoveWIPToRelease", "N")
|
| 160 |
Call objBtnControl.Active ("btnDestroyWip", "N")
|
164 |
Call objBtnControl.Active ("btnDestroyWip", "N")
|
| Line 226... |
Line 230... |
| 226 |
End If
|
230 |
End If
|
| 227 |
|
231 |
|
| 228 |
Call objBtnControl.Visible("btnMakePending", "N")
|
232 |
Call objBtnControl.Visible("btnMakePending", "N")
|
| 229 |
Call objBtnControl.Visible("btnMakeRelease", "N")
|
233 |
Call objBtnControl.Visible("btnMakeRelease", "N")
|
| 230 |
Call objBtnControl.Visible("btnApprovePackage", "N")
|
234 |
Call objBtnControl.Visible("btnApprovePackage", "N")
|
| - |
|
235 |
|
| 231 |
Call objBtnControl.Visible("btnAddDaemonInstRipplePackage", "Y")
|
236 |
Call objBtnControl.Visible("btnAddDaemonInstRipplePackage", "Y")
|
| 232 |
Call ActivateButtonAccordingToReleaseModeAndPermissions("btnAddDaemonInstRipplePackage", "ApproveForAutoBuild")
|
237 |
Call ActivateButtonAccordingToReleaseModeAndPermissions("btnAddDaemonInstRipplePackage", "ApproveForAutoBuild")
|
| 233 |
|
238 |
|
| - |
|
239 |
If pkgInfoHash.Item("hasRippleInstr") <> "" Then
|
| - |
|
240 |
Call objBtnControl.Visible("btnDelDaemonInstRipplePackage", "Y")
|
| - |
|
241 |
Call ActivateButtonAccordingToReleaseModeAndPermissions("btnDelDaemonInstRipplePackage", "ApproveForAutoBuild")
|
| - |
|
242 |
End If
|
| - |
|
243 |
|
| - |
|
244 |
If pkgInfoHash.Item("hasTestInstr") <> "" Then
|
| - |
|
245 |
Call objBtnControl.Visible("btnDelDaemonInstTestPackage", "Y")
|
| - |
|
246 |
Call ActivateButtonAccordingToReleaseModeAndPermissions("btnDelDaemonInstTestPackage", "ApproveForAutoBuild")
|
| - |
|
247 |
End If
|
| - |
|
248 |
|
| - |
|
249 |
If pkgInfoHash.Item("hasRippleInstr") <> "" AND pkgInfoHash.Item("hasTestInstr") <> "" Then
|
| - |
|
250 |
Call objBtnControl.Active("btnAddDaemonInstRipplePackage", "N")
|
| - |
|
251 |
End If
|
| - |
|
252 |
|
| 234 |
' Unlock patch or package.
|
253 |
' Unlock patch or package.
|
| 235 |
Call objBtnControl.Visible("btnUnLockPackage", "Y")
|
254 |
Call objBtnControl.Visible("btnUnLockPackage", "Y")
|
| 236 |
Call objBtnControl.Active ("btnUnLockPackage", "Y")
|
255 |
Call objBtnControl.Active ("btnUnLockPackage", "Y")
|
| 237 |
|
256 |
|
| 238 |
ElseIf pkgInfoHash.Item("dlocked") = "P" Then
|
257 |
ElseIf pkgInfoHash.Item("dlocked") = "P" Then
|
| Line 479... |
Line 498... |
| 479 |
Call objBtnControl.Active("btnMoveToView", "N")
|
498 |
Call objBtnControl.Active("btnMoveToView", "N")
|
| 480 |
Call objBtnControl.Active("btnMoveWIPToRelease", "N")
|
499 |
Call objBtnControl.Active("btnMoveWIPToRelease", "N")
|
| 481 |
Call objBtnControl.Active("btnDeprecation", "N")
|
500 |
Call objBtnControl.Active("btnDeprecation", "N")
|
| 482 |
Call objBtnControl.Active("btnUnDeprecation", "N")
|
501 |
Call objBtnControl.Active("btnUnDeprecation", "N")
|
| 483 |
Call objBtnControl.Active("btnAddDaemonInstRipplePackage", "N")
|
502 |
Call objBtnControl.Active("btnAddDaemonInstRipplePackage", "N")
|
| - |
|
503 |
Call objBtnControl.Active("btnDelDaemonInstRipplePackage", "N")
|
| - |
|
504 |
Call objBtnControl.Active("btnDelDaemonInstTestPackage", "N")
|
| 484 |
Call objBtnControl.Active ("btnUnLockPackage", "N")
|
505 |
Call objBtnControl.Active ("btnUnLockPackage", "N")
|
| 485 |
Call objBtnControl.Active ("btnLockPackage", "N")
|
506 |
Call objBtnControl.Active ("btnLockPackage", "N")
|
| 486 |
End If
|
507 |
End If
|
| 487 |
|
508 |
|
| 488 |
If (NOT objAccessControl.UserLogedIn) OR (NOT canActionInProject() ) Then
|
509 |
If (NOT objAccessControl.UserLogedIn) OR (NOT canActionInProject() ) Then
|