| Line 1173... |
Line 1173... |
| 1173 |
OraDatabase.Parameters.Remove "Rtag_id"
|
1173 |
OraDatabase.Parameters.Remove "Rtag_id"
|
| 1174 |
OraDatabase.Parameters.Remove "results"
|
1174 |
OraDatabase.Parameters.Remove "results"
|
| 1175 |
|
1175 |
|
| 1176 |
|
1176 |
|
| 1177 |
If rsQry.RecordCount > 0 Then
|
1177 |
If rsQry.RecordCount > 0 Then
|
| 1178 |
|
- |
|
| 1179 |
nProjId = CDbl(rsQry("PROJ_ID"))
|
1178 |
nProjId = CDbl(rsQry("PROJ_ID"))
|
| 1180 |
nRtagId = CDbl(rsQry("RTAG_ID"))
|
1179 |
nRtagId = CDbl(rsQry("RTAG_ID"))
|
| 1181 |
|
1180 |
|
| 1182 |
End If
|
1181 |
End If
|
| 1183 |
|
1182 |
|
| Line 1285... |
Line 1284... |
| 1285 |
' Editable if ( (unlocked OR rejected)
|
1284 |
' Editable if ( (unlocked OR rejected)
|
| 1286 |
' OR ( NOT released/locked AND EditReleaseNotesInPending allowed)
|
1285 |
' OR ( NOT released/locked AND EditReleaseNotesInPending allowed)
|
| 1287 |
' OR (released/locked AND EditNonCriticalInfoForLockedPackage allowed)
|
1286 |
' OR (released/locked AND EditNonCriticalInfoForLockedPackage allowed)
|
| 1288 |
' )
|
1287 |
' )
|
| 1289 |
' AND user logged in
|
1288 |
' AND user logged in
|
| 1290 |
If (((cDlocked = "N") OR (cDlocked = "R")) OR ((cDlocked <> "Y") AND (objAccessControl.IsActive("EditReleaseNotesInPending"))) OR ((cDlocked = "Y") AND (objAccessControl.IsActive("EditNonCriticalInfoForLockedPackage")))) AND objAccessControl.UserLogedIn Then
|
1289 |
If (((cDlocked = "N") OR (cDlocked = "R")) OR ((cDlocked <> "Y") AND (canActionControlInProject("EditReleaseNotesInPending"))) OR ((cDlocked = "Y") AND (canActionControlInProject("EditNonCriticalInfoForLockedPackage")))) AND objAccessControl.UserLogedIn Then
|
| 1291 |
Is_Page_Editable = TRUE
|
1290 |
Is_Page_Editable = TRUE
|
| 1292 |
Else
|
1291 |
Else
|
| 1293 |
Is_Page_Editable = FALSE
|
1292 |
Is_Page_Editable = FALSE
|
| 1294 |
End If
|
1293 |
End If
|
| 1295 |
End Function
|
1294 |
End Function
|
| Line 1306... |
Line 1305... |
| 1306 |
' Editable if ( (unlocked OR rejected)
|
1305 |
' Editable if ( (unlocked OR rejected)
|
| 1307 |
' OR ( NOT released/locked AND EditReleaseNotesInPending allowed)
|
1306 |
' OR ( NOT released/locked AND EditReleaseNotesInPending allowed)
|
| 1308 |
' OR (released/locked AND EditCriticalInfoForLockedPackage allowed)
|
1307 |
' OR (released/locked AND EditCriticalInfoForLockedPackage allowed)
|
| 1309 |
' )
|
1308 |
' )
|
| 1310 |
' AND user logged in
|
1309 |
' AND user logged in
|
| 1311 |
If (((cDlocked = "N") OR (cDlocked = "R")) OR ((cDlocked <> "Y") AND (objAccessControl.IsActive("EditReleaseNotesInPending"))) OR ((cDlocked = "Y") AND (objAccessControl.IsActive("EditCriticalInfoForLockedPackage")))) AND objAccessControl.UserLogedIn Then
|
1310 |
If (((cDlocked = "N") OR (cDlocked = "R")) OR ((cDlocked <> "Y") AND (canActionControlInProject("EditReleaseNotesInPending"))) OR ((cDlocked = "Y") AND (canActionControlInProject("EditCriticalInfoForLockedPackage")))) AND objAccessControl.UserLogedIn Then
|
| 1312 |
Is_Critical_Section_Editable = TRUE
|
1311 |
Is_Critical_Section_Editable = TRUE
|
| 1313 |
Else
|
1312 |
Else
|
| 1314 |
Is_Critical_Section_Editable = FALSE
|
1313 |
Is_Critical_Section_Editable = FALSE
|
| 1315 |
End If
|
1314 |
End If
|
| 1316 |
End Function
|
1315 |
End Function
|