Subversion Repositories DevTools

Rev

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

Rev 5506 Rev 5957
Line 76... Line 76...
76 
End If
 76 
End If
77 
 
 77 
 
78 
If bcan_unlock  Then
 78 
If bcan_unlock  Then
79 
  If rsQry("dlocked") = "Y" Then
 79 
  If rsQry("dlocked") = "Y" Then
80 
    Call UnlockPackage (bis_patch)
 80 
    Call UnlockPackage (bis_patch)
- 
 
 81 
    Call Destroy_All_Objects
81 
    Response.Redirect ( "fixed_issues.asp?rtag_id="& parRtag_id &"&pv_id="& parPv_id)
 82 
    Response.Redirect ( "fixed_issues.asp?rtag_id="& parRtag_id &"&pv_id="& parPv_id)
82 
  Else
 83 
  Else
83 
    Call RaiseMsg(enum_MSG_ERROR, "Can only unlock a " & spkgtype & " that is currently locked." )
 84 
    Call RaiseMsg(enum_MSG_ERROR, "Can only unlock a " & spkgtype & " that is currently locked." )
84 
  End If
 85 
  End If
85 
Else
 86 
Else
Line 88... Line 89...
88 
 
 89 
 
89 
rsQry.Close
 90 
rsQry.Close
90 
Set rsQry = nothing
 91 
Set rsQry = nothing
91 
 
 92 
 
92 
%>
 93 
%>
93 
 
 - 
 
94 
<!-- DESTRUCTOR ------->
 94 
<!-- DESTRUCTOR ------->
95 
<!--#include file="common/destructor.asp"-->
 95 
<!--#include file="common/destructor.asp"-->