Subversion Repositories DevTools

Rev

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

Rev 5061 Rev 5172
Line 65... Line 65...
65 
End If
 65 
End If
66 
 
 66 
 
67 
If bcan_unlock Then
 67 
If bcan_unlock Then
68 
  If rsQry("dlocked") = "N" Then
 68 
  If rsQry("dlocked") = "N" Then
69 
    Call LockPackage ()
 69 
    Call LockPackage ()
70 
    If bis_patch Then
 - 
 
71 
      Response.Redirect ( "_generate_release_notes.asp?rfile=dependencies.asp&pv_id="& parPv_id &"&rtag_id="& parRtag_id )
 - 
 
72 
    else
 - 
 
73 
      Response.Redirect ( "fixed_issues.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id )
 70 
      Response.Redirect ( "fixed_issues.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id )
74 
    End If
 - 
 
75 
  Else
 71 
  Else
76 
    Call RaiseMsg(enum_MSG_ERROR, "Can only lock a " & spkgtype & " that is currently unlocked." )
 72 
    Call RaiseMsg(enum_MSG_ERROR, "Can only lock a " & spkgtype & " that is currently unlocked." )
77 
  End If
 73 
  End If
78 
Else
 74 
Else
79 
  Call RaiseMsg(enum_MSG_ERROR, "You do not have permissions to lock/unlock " & spkgtype & "." )
 75 
  Call RaiseMsg(enum_MSG_ERROR, "You do not have permissions to lock/unlock " & spkgtype & "." )