<%@language = "javascript" %>
<% /*
    $Revision$
    $Id$

    File:           dwf_verify_proc.asp
    Description:    Generate an PNG image
    Parameters:     dwf: bestandsnaam van de dwf
    Context:
    Note:
*/
DOCTYPE_Disable = 1;
%>

<!--#include file='../Shared/common.inc'-->
<!--#include file="../SlnkDWF/Slnk2IMG.inc" -->
<%
user.checkAutorisation("WEB_FACTAB");
if (Server.ScriptTimeout<600) Server.ScriptTimeout=600;

dwfPath = getQParam("dwf");

function myContourProcessor(cHandle)
{
    for (var i2=0; i2 < cHandle.ContourCount; i2++)
    {
        var c = cHandle.ContourItem(i2);
        if (c.Key)
        {
            c.Label = "[u][i]" + c.Key;
            c.SetColor(0x00FF00, 32);
            if (c.Area)
                c.SetUrl("", (c.Area / 1e6).toFixed(1) + "mē"); // Tooltip
        }
        else
        {
            c.SetUrl("", "Wel contour maar geen label gevonden");
            c.SetColor(0xFF0000);

        }
        //if (oLabel && oOpp)
    }

//    cHandle.SetLabel("", "[u][i]"); // initieel originele ruimtenummer onderstreept
    cHandle.SetLabelFont("Arial", 600);

    ll = getQParamArray("layers", [".*"]);
    for (l in ll)
        ll[l] = ll[l].replace(/\|/g,"\\|");
    var llt = "{"+ll.join("}|{") +"}";
    cHandle.SetFilterLayers("{SLNK Labels}|{SLNK Contours}|" + llt);
    //cHandle.SetFilterLayers("{A--LSE--_ruimte element}");

    // Response.AddHeader("jgl", llt);

    //cHandle.SetColor("", S("fg_contourColor"), S("S("fg_contourAlpha")")); // Alle herkende ruimtes initieel transparant
    //cHandle.SetColor("", 0x00FF00, 32); // Alle herkende ruimtes initieel transparant
    //cHandle.HighlightUnrecognized(); // Deze worden rood
    //
}
function myImageProcessor(cHandle)
{
    cHandle.PaperColor = 0xE0E0FF;
}


if (dwfPath)
{
    var mySLNKDWF = new SLNKDWF({ dwfFile      : dwfPath,
                                  dwfProcessor : myContourProcessor,
                                  imgProcessor : myImageProcessor,
                                  contourLayers: getQParam("contLayer", "NOTEXIST"),
                                  labelLayers  : getQParam("labelLayer", "NOTEXIST"),
                                  tempFolder   : Server.MapPath("../../Temp"),
                                  keepTemp: (Session("logging") & 8) == 8
                                });
    mySLNKDWF.Process();
};
%>
