Subversion Repositories DevTools

Rev

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

Rev 5506 Rev 5957
Line 82... Line 82...
82 
   If View_Name_Exists( parViewName, objAccessControl.UserId ) Then
 82 
   If View_Name_Exists( parViewName, objAccessControl.UserId ) Then
83 
      Session("reqParam") = ""
 83 
      Session("reqParam") = ""
84 
      Session("ERRlog") = ""
 84 
      Session("ERRlog") = ""
85 
      Session("ERRlogFULL") = ""
 85 
      Session("ERRlogFULL") = ""
86 
      Session("AdditionalParams") = "$PERSONALVIEWNAME$,"& parViewName
 86 
      Session("AdditionalParams") = "$PERSONALVIEWNAME$,"& parViewName
- 
 
 87 
      Call Destroy_All_Objects
87 
      Response.Redirect("message.asp?msg=202-9")
 88 
      Response.Redirect("message.asp?msg=202-9")
88 
   End If
 89 
   End If
89 
 
 90 
 
90 
   'COMPLETE THE REQUEST...
 91 
   'COMPLETE THE REQUEST...
91 
   Call Create_New_View ( parViewName, parPkgInc, parPubread )
 92 
   Call Create_New_View ( parViewName, parPkgInc, parPubread )
92 
 
 93 
 
- 
 
 94 
   Call Destroy_All_Objects
93 
   Response.Redirect("members_personal_view.asp")
 95 
   Response.Redirect("members_personal_view.asp")
94 
Else
 96 
Else
95 
   Response.write "Some mandatory parameters are missing!" & "<br>" 'TODO
 97 
   Response.write "Some mandatory parameters are missing!" & "<br>" 'TODO
96 
   Response.write QSTR_FullQuery
 98 
   Response.write QSTR_FullQuery
97 
End If
 99 
End If
98 
%>
 100 
%>
99 
 
 - 
 
100 
<!-- DESTRUCTOR ------->
 101 
<!-- DESTRUCTOR ------->
101 
<!--#include file="common/destructor.asp"-->
 102 
<!--#include file="common/destructor.asp"-->