<%@ 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
' Vaiables that represent what is passed on the Query String
Dim CMD ' This determines the main function to perform
Dim page ' the page to return
Dim Brch ' The branch is a mechanism to determine of the drill down level.
' A drill down level are like A view of the ' the ', a new tab
' is created to indicate ' It is a new view
Dim VIEWER ' This is the viewer-is calling the server
Dim vfmt ' The format that the viewer understands
Dim NODE ' currently not used??
Dim GRP ' This is a way of specifing the actual group
Dim COORD ' are the coordinates on the graph to process
Dim DIR ' This is the search direction
Dim CSE ' Indicates if the search is case sensitive
Dim TEXT ' This is the text to search for.
Dim INIT ' used to builds the frames for the HTML viewer
Dim Newbrch ' used to keep track the ' When a new branch are to be viewed.
Dim export_fmt ' used to hold the EXPORT format and type
Dim subrpt ' used to hold the out of place subreport page, number,
' and coordinates on the main.
Dim incomplete_page ' used to indicate whether the PAGE generated should contain.
Dim incomplete_page_count ' used to indicate whether the page should contain the total page COUNT if not yet generated.
Dim pversion ' used to indicate the protocol version of the viewer.
Dim ttl_info ' used to indicate the group path of the Totaller request.
' Constant Values
Dim creftwordforwindows
Dim Creftrichtext
Dim CREFTEXCEL21
Dim Creftcrystalreport
Dim Credtdiskfile
Dim Emfmimetype
Creftwordforwindows = 14
Creftrichtext = 4
CREFTEXCEL21 = 18
Creftcrystalreport = 1
Credtdiskfile = 1
Crallowplaceholders = 2
Crdelaytotalpagecountcalc = 1
Emfmimetype = "APPLICATION/X-EMF"
Epfmimetype = "APPLICATION/X-EPF"
Etfmimetype = "APPLICATION/X-ETF"
' Initialize Arrays
Gvgrouppath = Array ()
Gvgrouplevel = Array ()
Gvmaxnode = Array () ' Reteive all nodes
Gvtotallerinfo = Array ()
Newbrch = "0"
' To ensure ' the browser does CA
