| Line 128... |
Line 128... |
| 128 |
objBtnControl.ButtonSpacer = 0
|
128 |
objBtnControl.ButtonSpacer = 0
|
| 129 |
objBtnControl.ImageHspace = 2
|
129 |
objBtnControl.ImageHspace = 2
|
| 130 |
|
130 |
|
| 131 |
|
131 |
|
| 132 |
'--- Set button conditions ---
|
132 |
'--- Set button conditions ---
|
| 133 |
objBtnControl.IsReadonlyAction = Eval( ReleaseMode = enumDB_RELEASE_IN_CLOSED_MODE OR ReleaseMode = enumDB_RELEASE_IN_ARCHIVE_MODE )
|
133 |
objBtnControl.IsReadonlyAction = Eval( ReleaseMode = enumDB_RELEASE_IN_CLOSED_MODE OR ReleaseMode = enumDB_RELEASE_IN_PRESERVE_MODE OR ReleaseMode = enumDB_RELEASE_IN_ARCHIVE_MODE )
|
| 134 |
objBtnControl.setClosed = Eval( ReleaseMode = enumDB_RELEASE_IN_CLOSED_MODE OR ReleaseMode = enumDB_RELEASE_IN_ARCHIVE_MODE )
|
134 |
objBtnControl.setClosed = Eval( ReleaseMode = enumDB_RELEASE_IN_CLOSED_MODE OR ReleaseMode = enumDB_RELEASE_IN_PRESERVE_MODE OR ReleaseMode = enumDB_RELEASE_IN_ARCHIVE_MODE )
|
| 135 |
|
135 |
|
| 136 |
|
136 |
|
| 137 |
' NOTE: At this point, all buttons are Active and Visible and must now be configured
|
137 |
' NOTE: At this point, all buttons are Active and Visible and must now be configured
|
| 138 |
' as appropriate by statements that follow.
|
138 |
' as appropriate by statements that follow.
|
| 139 |
|
139 |
|
| Line 370... |
Line 370... |
| 370 |
' make the approve merge button variant visible
|
370 |
' make the approve merge button variant visible
|
| 371 |
Call objBtnControl.Visible ( "btnApproveMerge", "Y" )
|
371 |
Call objBtnControl.Visible ( "btnApproveMerge", "Y" )
|
| 372 |
|
372 |
|
| 373 |
' These conditions match those used in Diff.asp that control whether the Merge button is visible or not.
|
373 |
' These conditions match those used in Diff.asp that control whether the Merge button is visible or not.
|
| 374 |
' Use them to enable or disable the approve merge button
|
374 |
' Use them to enable or disable the approve merge button
|
| 375 |
If ( ReleaseMode <> enumDB_RELEASE_IN_ARCHIVE_MODE AND ReleaseMode <> enumDB_RELEASE_IN_CLOSED_MODE AND ReleaseMode <> enumDB_RELEASE_IN_CCB_MODE AND canActionControlInProject("MergeRelease") ) _
|
375 |
If ( ReleaseMode <> enumDB_RELEASE_IN_ARCHIVE_MODE AND ReleaseMode <> enumDB_RELEASE_IN_PRESERVE_MODE AND ReleaseMode <> enumDB_RELEASE_IN_CLOSED_MODE AND ReleaseMode <> enumDB_RELEASE_IN_CCB_MODE AND canActionControlInProject("MergeRelease") ) _
|
| 376 |
OR ( ReleaseMode = enumDB_RELEASE_IN_CCB_MODE AND canActionControlInProject("MergeReleaseForCCB") ) Then
|
376 |
OR ( ReleaseMode = enumDB_RELEASE_IN_CCB_MODE AND canActionControlInProject("MergeReleaseForCCB") ) Then
|
| 377 |
|
377 |
|
| 378 |
Call objBtnControl.Active ( "btnApproveMerge", "Y" )
|
378 |
Call objBtnControl.Active ( "btnApproveMerge", "Y" )
|
| 379 |
Call objBtnControl.Active ( "btnRejectPackage", "Y" )
|
379 |
Call objBtnControl.Active ( "btnRejectPackage", "Y" )
|
| 380 |
Else
|
380 |
Else
|