Zooming and Scrolling with Viewport Control (Web)

File	Description
viewportcontroldemo.asp	Main source code for this demo.
scrollew.gif zoomInIcon.gif zoomOutIcon.gif goto.gif	The images used in the push buttons in this demo.
cdjcv.js zoomin.cur zoomout.cur wait.gif	The script file for JsChartViewer and JsViewPortControl, and the supporting cursor and image files. They must be in the same directory.
[Web Version (in ASP)] aspdemo\viewportcontroldemo.asp
<%@ language="vbscript" %>
<%
Set cd = CreateObject("ChartDirector.API")

'
' Initialize the WebChartViewer when the page is first loaded
'
Sub initViewer(viewer)
    ' The full x-axis range is from Jan 1, 2007 to Jan 1, 2012
    startDate = DateSerial(2010, 1, 1)
    endDate = DateSerial(2015, 1, 1)
    Call viewer.setFullRange("x", startDate, endDate)

    ' Initialize the view port to show the last 366 days (out of 1826 days)
    viewer.ViewPortWidth = 366.0 / 1826
    viewer.ViewPortLeft = 1 - viewer.ViewPortWidth

    ' Set the maximum zoom to 10 days (out of 1826 days)
    viewer.ZoomInWidthLimit = 10.0 / 1826
End Sub

'
' Create a random table for demo purpose.
'
Function getRandomTable()
    Set r = cd.RanTable(127, 4, 1828)
    Call r.setDateCol(0, DateSerial(2010, 1, 1), 86400)
    Call r.setCol(1, 150, -10, 10)
    Call r.setCol(2, 200, -10, 10)
    Call r.setCol(3, 250, -8, 8)
    Set getRandomTable = r
    Exit Function
End Function

'
' Draw the chart
'
Sub drawChart(viewer)
    ' Determine the visible x-axis range
    viewPortStartDate = cd.NTime(viewer.getValueAtViewPort("x", viewer.ViewPortLeft))
    viewPortEndDate = cd.NTime(viewer.getValueAtViewPort("x", viewer.ViewPortLeft + _
        viewer.ViewPortWidth))

    ' We need to get the data within the visible x-axis range. In real code, this can be by using a
    ' database query or some other means as specific to the application. In this demo, we just
    ' generate a random data table, and then select the data within the table.
    Set r = getRandomTable()

    ' Select the data for the visible date range viewPortStartDate to viewPortEndDate. It is
    ' possible there is no data point at exactly viewPortStartDate or viewPortEndDate. In this case,
    ' we also need the data points that are just outside the visible date range to "overdraw" the
    ' line a little bit (the "overdrawn" part will be clipped to the plot area) In this demo, we do
    ' this by adding a one day margin to the date range when selecting the data.
    Call r.selectDate(0, DateAdd("d", -1, viewPortStartDate), DateAdd("d", 1, viewPortEndDate))

    ' The selected data from the random data table
    timeStamps = r.getCol(0)
    dataSeriesA = r.getCol(1)
    dataSeriesB = r.getCol(2)
    dataSeriesC = r.getCol(3)

    '
    ' Now we have obtained the data, we can plot the chart.
    '

    '================================================================================
    ' Configure overall chart appearance.
    '================================================================================

    ' Create an XYChart object of size 640 x 400 pixels
    Set c = cd.XYChart(640, 400)

    ' Set the plotarea at (55, 55) with width 80 pixels less than chart width, and height 90 pixels
    ' less than chart height. Use a vertical gradient from light blue (f0f6ff) to sky blue (a0c0ff)
    ' as background. Set border to transparent and grid lines to white (ffffff).
    Call c.setPlotArea(55, 55, c.getWidth() - 80, c.getHeight() - 90, c.linearGradientColor(0, 55, _
        0, c.getHeight() - 35, &Hf0f6ff, &Ha0c0ff), -1, cd.Transparent, &Hffffff, &Hffffff)

    ' As the data can lie outside the plotarea in a zoomed chart, we need to enable clipping.
    Call c.setClipping()

    ' Add a title box using dark grey (0x333333) 18pt Arial Bold font
    Call c.addTitle("   Zooming and Scrolling with Viewport Control", "Arial Bold", 15, &H333333)

    If viewer.IsAttachmentRequest Then
        Set b = c.addLegend(55, 28, False, "Arial Bold", 10)
        Call b.setBackground(cd.Transparent, cd.Transparent)
        Call b.setLineStyleKey()
    End If

    ' Set the x and y axis stems to transparent and the label font to 10pt Arial
    Call c.xAxis().setColors(cd.Transparent)
    Call c.yAxis().setColors(cd.Transparent)
    Call c.xAxis().setLabelStyle("Arial", 10)
    Call c.yAxis().setLabelStyle("Arial", 10)

    ' Add axis title using 10pt Arial Bold font
    Call c.yAxis().setTitle("Ionic Temperature (C)", "Arial Bold", 10)

    '================================================================================
    ' Add data to chart
    '================================================================================

    '
    ' In this example, we represent the data by lines. You may modify the code below to use other
    ' layer types (areas, scatter plot, etc).
    '

    ' Add a line layer for the lines, using a line width of 2 pixels
    Set layer = c.addLineLayer2()
    Call layer.setLineWidth(2)

    ' In this demo, we do not have too many data points. In real code, the chart may contain a lot
    ' of data points when fully zoomed out - much more than the number of horizontal pixels in this
    ' plot area. So it is a good idea to use fast line mode.
    Call layer.setFastLineMode()

    ' Now we add the 3 data series to a line layer, using the color red (0xff3333), green (0x008800)
    ' and blue (0x3333cc)
    Call layer.setXData(timeStamps)
    Call layer.addDataSet(dataSeriesA, &Hff3333, "Alpha")
    Call layer.addDataSet(dataSeriesB, &H008800, "Beta")
    Call layer.addDataSet(dataSeriesC, &H3333cc, "Gamma")

    '================================================================================
    ' Configure axis scale and labelling
    '================================================================================

    ' Set the x-axis as a date/time axis with the scale according to the view port x range.
    Call viewer.syncDateAxisWithViewPort("x", c.xAxis())

    ' For the automatic y-axis labels, set the minimum spacing to 30 pixels.
    Call c.yAxis().setTickDensity(30)

    '
    ' In this demo, the time range can be from a few years to a few days. We demonstrate how to set
    ' up different date/time format based on the time range.
    '

    ' If all ticks are yearly aligned, then we use "yyyy" as the label format.
    Call c.xAxis().setFormatCondition("align", 360 * 86400)
    Call c.xAxis().setLabelFormat("{value|yyyy}")

    ' If all ticks are monthly aligned, then we use "mmm yyyy" in bold font as the first label of a
    ' year, and "mmm" for other labels.
    Call c.xAxis().setFormatCondition("align", 30 * 86400)
    Call c.xAxis().setMultiFormat(cd.StartOfYearFilter(), "<*font=bold*>{value|mmm<*br*>yyyy}", _
        cd.AllPassFilter(), "{value|mmm}")

    ' If all ticks are daily algined, then we use "mmm dd<*br*>yyyy" in bold font as the first label
    ' of a year, and "mmm dd" in bold font as the first label of a month, and "dd" for other labels.
    Call c.xAxis().setFormatCondition("align", 86400)
    Call c.xAxis().setMultiFormat(cd.StartOfYearFilter(), _
        "<*block,halign=left*><*font=bold*>{value|mmm dd<*br*>yyyy}", cd.StartOfMonthFilter(), _
        "<*font=bold*>{value|mmm dd}")
    Call c.xAxis().setMultiFormat2(cd.AllPassFilter(), "{value|dd}")

    ' For all other cases (sub-daily ticks), use "hh:nn<*br*>mmm dd" for the first label of a day,
    ' and "hh:nn" for other labels.
    Call c.xAxis().setFormatCondition("else")
    Call c.xAxis().setMultiFormat(cd.StartOfDayFilter(), "<*font=bold*>{value|hh:nn<*br*>mmm dd}", _
        cd.AllPassFilter(), "{value|hh:nn}")

    '================================================================================
    ' Step 5 - Output the chart
    '================================================================================

    If viewer.IsAttachmentRequest Then
        ' Output as PDF attachment
        Call viewer.setChart(c, cd.PDF)
        Call viewer.streamChart(Response, "viewportcontroldemo.pdf")
        Response.End
    Else
        ' Output the chart
        Call viewer.setChart(c, cd.SVG)

        ' Output Javascript chart model to the browser to support tracking cursor
        viewer.ChartModel = c.getJsChartModel()
    End If
End Sub

Sub drawFullChart(vp, viewer)
    ' We need to draw a small thumbnail chart for the full data range. The simplest method is to
    ' simply get the full data to draw the chart. If the full data are very large (eg. millions of
    ' points), for such a small thumbnail chart, it is often acceptable to just retreive a small
    ' sample of the data.
    '
    ' In this example, there are only around 5500 points for the 3 data series. This amount is not
    ' large to ChartDirector, so we simply pass all the data to ChartDirector.
    Set r = getRandomTable()

    ' Get all the data from the random table
    timeStamps = r.getCol(0)
    dataSeriesA = r.getCol(1)
    dataSeriesB = r.getCol(2)
    dataSeriesC = r.getCol(3)

    ' Create an XYChart object of size 640 x 60 pixels
    Set c = cd.XYChart(640, 60)

    ' Set the plotarea with the same horizontal position as that in the main chart for alignment.
    ' The vertical position is set to equal to the chart height.
    Call c.setPlotArea(55, 0, c.getWidth() - 80, c.getHeight() - 1, &Hc0d8ff, -1, &H888888, _
        cd.Transparent, &Hffffff)

    ' Set the x axis stem to transparent and the label font to 10pt Arial
    Call c.xAxis().setColors(cd.Transparent)
    Call c.xAxis().setLabelStyle("Arial", 10)

    ' Put the x-axis labels inside the plot area by setting a negative label gap. Use
    ' setLabelAlignment to put the label at the right side of the tick.
    Call c.xAxis().setLabelGap(-1)
    Call c.xAxis().setLabelAlignment(1)

    ' Set the y axis stem and labels to transparent (that is, hide the labels)
    Call c.yAxis().setColors(cd.Transparent, cd.Transparent)

    ' Add a line layer for the lines with fast line mode enabled
    Set layer = c.addLineLayer2()
    Call layer.setFastLineMode()

    ' Now we add the 3 data series to a line layer, using the color red (0xff3333), green (0x008800)
    ' and blue (0x3333cc)
    Call layer.setXData(timeStamps)
    Call layer.addDataSet(dataSeriesA, &Hff3333)
    Call layer.addDataSet(dataSeriesB, &H008800)
    Call layer.addDataSet(dataSeriesC, &H3333cc)

    ' The x axis scales should reflect the full range of the view port
    Call c.xAxis().setDateScale(viewer.getValueAtViewPort("x", 0), viewer.getValueAtViewPort("x", _
        1))

    ' For the automatic x-axis labels, set the minimum spacing to 75 pixels.
    Call c.xAxis().setTickDensity(75)

    ' For the auto-scaled y-axis, as we hide the labels, we can disable axis rounding. This can make
    ' the axis scale fit the data tighter.
    Call c.yAxis().setRounding(False, False)

    ' Output the chart
    chartQuery = c.makeSession(Session, vp.Id)

    ' Set the chart URL and chart metrics to the viewport control
    vp.ImageUrl = "getchart.asp?" & chartQuery
    vp.ChartMetrics = c.getChartMetrics()
End Sub

'
' This script handles both the full page request, as well as the subsequent partial updates (AJAX
' chart updates). We need to determine the type of request first before we processing it.
'

' Create the WebChartViewer object
Set viewer = cd.WebChartViewer(Request, "chart1")

If viewer.IsPartialUpdateRequest Then
    ' Is a partial update request. Draw the chart and perform a partial response.
    Call drawChart(viewer)
    Response.Write viewer.partialUpdateChart()
    Response.End
End If

'
' If the code reaches here, it is a full page request.
'

' Initialize the WebChartViewer and draw the chart.
Call initViewer(viewer)
Call drawChart(viewer)

' Create the WebViewPortControl object
Set viewPortCtrl = cd.WebViewPortControl("fullchart1")
Call drawFullChart(viewPortCtrl, viewer)
%>

<!DOCTYPE html>
<html>
<head>
    <title>Zooming and Scrolling with Viewport Control</title>
    <script type="text/javascript" src="cdjcv.js"></script>
    <style type="text/css">
        .chartButton { font:12px Verdana; border-bottom:#000000 1px solid; padding:5px; cursor:pointer;}
        .chartButtonSpacer { font:12px Verdana; border-bottom:#000000 1px solid; padding:5px;}
        .chartButton:hover { box-shadow:inset 0px 0px 0px 2px #444488; }
        .chartButtonPressed { background-color: #CCFFCC; }
    </style>
</head>
<body style="margin:0px;">
<script type="text/javascript">

//
// Execute the following initialization code after the web page is loaded
//
JsChartViewer.addEventListener(window, 'load', function() {
    // Update the chart when the view port has changed (eg. when the user zooms in using the mouse)
    var viewer = JsChartViewer.get('<%=viewer.Id%>');
    viewer.attachHandler("ViewPortChanged", viewer.partialUpdate);

    // Initialize the navigation pad
    JsViewPortControl.get('<%=viewPortCtrl.Id%>').setViewer(viewer);

    // Draw track cursor when mouse is moving over plotarea or if the chart updates
    viewer.attachHandler(["MouseMovePlotArea", "TouchStartPlotArea", "TouchMovePlotArea", "PostUpdate",
        "Now", "ChartMove"], function(e) {
        this.preventDefault(e);   // Prevent the browser from using touch events for other actions
        trackLineLegend(viewer, viewer.getPlotAreaMouseX());
    });
});

//
// Draw track line with legend
//
function trackLineLegend(viewer, mouseX)
{
    // Remove all previously drawn tracking object
    viewer.hideObj("all");

    // The chart and its plot area
    var c = viewer.getChart();
    var plotArea = c.getPlotArea();

    // Get the data x-value that is nearest to the mouse, and find its pixel coordinate.
    var xValue = c.getNearestXValue(mouseX);
    var xCoor = c.getXCoor(xValue);
    if (xCoor == null)
        return;

    // Draw a vertical track line at the x-position
    viewer.drawVLine("trackLine", xCoor, plotArea.getTopY(), plotArea.getBottomY(), "black 1px dotted");

    // Array to hold the legend entries
    var legendEntries = [];

    // Iterate through all layers to build the legend array
    for (var i = 0; i < c.getLayerCount(); ++i)
    {
        var layer = c.getLayerByZ(i);

        // The data array index of the x-value
        var xIndex = layer.getXIndexOf(xValue);

        // Iterate through all the data sets in the layer
        for (var j = 0; j < layer.getDataSetCount(); ++j)
        {
            var dataSet = layer.getDataSetByZ(j);

            // We are only interested in visible data sets with names, as they are required for legend entries.
            var dataName = dataSet.getDataName();
            var color = dataSet.getDataColor();
            if ((!dataName) || (color == null))
                continue;

            // Build the legend entry, consist of a colored square box, the name and the data value.
            var dataValue = dataSet.getValue(xIndex);
            legendEntries.push("<nobr>" + viewer.htmlRect(10, 10, color) + " " + dataName + ": " +
                ((dataValue == null) ? "N/A" : dataValue.toPrecision(4)) + viewer.htmlRect(20, 0) + "</nobr> ");

            // Draw a track dot for data points within the plot area
            var yCoor = c.getYCoor(dataSet.getPosition(xIndex), dataSet.getUseYAxis());
            if ((yCoor != null) && (yCoor >= plotArea.getTopY()) && (yCoor <= plotArea.getBottomY()))
            {
                viewer.showTextBox("dataPoint" + i + "_" + j, xCoor, yCoor, JsChartViewer.Center,
                    viewer.htmlRect(9, 9, color));
            }
        }
    }

    // Create the legend by joining the legend entries.
    var legend = "<nobr>[" + c.xAxis().getFormattedLabel(xValue, "mm/dd/yyyy") + "]" + viewer.htmlRect(20, 0) +
        "</nobr> " + legendEntries.reverse().join("");

    // Display the legend on the top of the plot area
    viewer.showTextBox("legend", plotArea.getLeftX(), plotArea.getTopY(), JsChartViewer.BottomLeft, legend,
        "padding:0px 0px 3px 3px; font:bold 13px Arial; -webkit-text-size-adjust:100%;");
}

//
// This method is called when the user clicks on the Pointer, Zoom In or Zoom Out buttons
//
function setMouseMode(mode)
{
    var viewer = JsChartViewer.get('<%=viewer.Id%>');
    if (mode == viewer.getMouseUsage())
        mode = JsChartViewer.Default;

    // Set the button color based on the selected mouse mode
    document.getElementById("scrollButton").className = "chartButton" +
        ((mode  == JsChartViewer.Scroll) ? " chartButtonPressed" : "");
    document.getElementById("zoomInButton").className = "chartButton" +
        ((mode  == JsChartViewer.ZoomIn) ? " chartButtonPressed" : "");
    document.getElementById("zoomOutButton").className = "chartButton" +
        ((mode  == JsChartViewer.ZoomOut) ? " chartButtonPressed" : "");

    // Set the mouse mode
    viewer.setMouseUsage(mode);
}

//
// This method is called when the user clicks on the buttons that selects the last NN days
//
function setTimeRange(duration)
{
    var viewer = JsChartViewer.get('<%=viewer.Id%>');

    // Set the view port width to represent the required duration (as a ratio to the total x-range)
    viewer.setViewPortWidth(Math.min(1,
        duration / (viewer.getValueAtViewPort("x", 1) - viewer.getValueAtViewPort("x", 0))));

    // Set the view port left so that the view port is moved to show the latest data
    viewer.setViewPortLeft(1 - viewer.getViewPortWidth());

    // Trigger a view port change event
    viewer.raiseViewPortChangedEvent();
}

</script>
<form method="post" id="ZoomScrollTrack" runat="server">
<table cellspacing="0" cellpadding="0" style="border:black 1px solid;">
    <tr>
        <td align="right" colspan="2" style="background:#000088; color:#ffff00; padding:0px 4px 2px 0px;">
            <a style="color:#FFFF00; font:italic bold 10pt Arial; text-decoration:none" href="http://www.advsofteng.com/">
                Advanced Software Engineering
            </a>
        </td>
    </tr>
    <tr valign="top">
        <td style="width:130px; background:#c0c0ff;">
           <div style="width:130px">
            <!-- The following table is to create 3 cells for 3 buttons to control the mouse usage mode. -->
            <table style="width:100%; padding:0px; border:0px; border-spacing:0px;">
                <tr>
                    <td class="chartButton" id="scrollButton" onclick="setMouseMode(JsChartViewer.Scroll)"
                        ontouchstart="this.onclick(event); event.preventDefault();">
                        <img src="scrollew.gif" style="vertical-align:middle" alt="Drag" />&nbsp;&nbsp;Drag to Scroll
                    </td>
                </tr>
                <tr>
                    <td class="chartButton" id="zoomInButton" onclick="setMouseMode(JsChartViewer.ZoomIn)"
                        ontouchstart="this.onclick(event); event.preventDefault();">
                        <img src="zoomInIcon.gif" style="vertical-align:middle" alt="Zoom In" />&nbsp;&nbsp;Zoom In
                    </td>
                </tr>
                <tr>
                    <td class="chartButton" id="zoomOutButton" onclick="setMouseMode(JsChartViewer.ZoomOut)"
                        ontouchstart="this.onclick(event); event.preventDefault();">
                        <img src="zoomOutIcon.gif" style="vertical-align:middle" alt="Zoom Out" />&nbsp;&nbsp;Zoom Out
                    </td>
                </tr>
                <tr>
                    <td class="chartButtonSpacer">
                        <div style="padding:2px">&nbsp;</div>
                    </td>
                </tr>
                <tr>
                    <td class="chartButton" onclick="setTimeRange(30 * 86400);"
                        ontouchstart="this.onclick(event); event.preventDefault();">
                        <img src="goto.gif" style="vertical-align:middle" alt="Last 30 days" />&nbsp;&nbsp;Last 30 days
                    </td>
                </tr>
                <tr>
                    <td class="chartButton" onclick="setTimeRange(90 * 86400);"
                        ontouchstart="this.onclick(event); event.preventDefault();">
                        <img src="goto.gif" style="vertical-align:middle" alt="Last 90 days" />&nbsp;&nbsp;Last 90 days
                    </td>
                </tr>
                <tr>
                    <td class="chartButton" onclick="setTimeRange(366 * 86400);"
                        ontouchstart="this.onclick(event); event.preventDefault();">
                        <img src="goto.gif" style="vertical-align:middle" alt="Last Year" />&nbsp;&nbsp;Last Year
                    </td>
                </tr>
                <tr>
                    <td class="chartButton" onclick="setTimeRange(1E15);"
                        ontouchstart="this.onclick(event); event.preventDefault();">
                        <img src="goto.gif" style="vertical-align:middle" alt="All Time" />&nbsp;&nbsp;All Time
                    </td>
                </tr>
            </table>
            <br />
            <br />
            <br />
            <br />
            <div style="text-align:center;">
                <input type="button" value="Download PDF" style="font:13px Arial; width:124px;"
                    onclick="JsChartViewer.get('<%=viewer.Id%>').partialUpdateAsAttachment();" />
            </div>
        </div>
        </td>
        <td style="border-left:black 1px solid; padding:10px 5px 10px 5px;">
            <!-- ****** Here is the chart image ****** -->
            <%=viewer.renderHTML()%><br />
            <!-- ****** Here is the view port control ****** -->
            <%=viewPortCtrl.renderHTML()%>
        </td>
    </tr>
</table>
</form>
</body>
</html>