Subversion Repositories DevTools

Rev

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

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