ASP call Crystal and Store Procedure (5)

<%@ language= "VBSCRIPT"%>
<%
On Error Resume Next
' The Oemf object is a helper object-Create EMFs (ecapsulated Messages) for the viewers.
' The viewers use EMFs to display errors and navigate to specific pages of the.
If not IsObject (session ("OEMF")) Then
Set session ("oemf") = Server.CreateObject ("Cremfgen.cremfgen.1")
Call Checkforerror
End If
' Initialize all Global variables
' These would contain the page generator and page collection
Dim gopagegenerator ' page Generator object
Dim gopagecollection ' Page collection Object
Dim Gopagegeneratordrill ' page generator object in Drill
Dim gopage ' the Page object
Dim GVGROUPPATHDD ' Drill down group path.
Dim Gvgrouppath ' This are branch, aka Group Path converted from string passed on QS, it's an Array
Dim Gvgrouplevel ' This are the Group level, converted from the string passed on the QS, it are an Array
Dim Gvmaxnode ' This represents the number of nodes to retrieve for the Totaller, it is set to a empty array
Dim Gvtotallerinfo ' This represents the group path of the requested Totaller.
Dim GlX ' This is the X coordinate for a-drill down on a graph or Map
Dim gly ' This are the Y coordinate for a drill down on a graph or Map
Dim Gvpagenumber ' holds the requested page number
Dim Gvurl ' URL to redirect to
Dim Gserrortext ' holds the error text to is sent to the viewer.
Dim exportoptions ' Export Options Object
Dim SLX ' This is the X coordinate to a selection of out of place subreport
Dim Sly ' This is the Y coordinate to a selection of out of place subreport