SGGR#23236

svn path=/Website/trunk/; revision=12432

CUST/SGGR/custfunctions.wsc

@@ -0,0 +1,84 @@
+<?xml version="1.0"?>
+<component>
+<?component error="true" debug="true"?>
+<registration
+	description="custfunctions"
+	progid="custfunction.wsc"
+	version="1.00"
+	classid="{4C7BB514-8D2F-4425-B9A5-7B5B0BE653C1}"
+>
+</registration>
+
+<public>
+
+<!-- properties -->
+	<property name="Oracle">
+		<put/>
+	</property>
+	<property name="__Log">
+		<put/>
+	</property>
+	<property name="__DoLog">
+		<put/>
+	</property>
+	<property name="safe">
+		<put/>
+	</property>
+
+<!-- methods -->
+	<method name="API_PHONEBOOK">
+		<PARAMETER name="prs_key"/>
+		<PARAMETER name="data"/>
+	</method>
+</public>
+
+<script language="javascript">
+<![CDATA[
+
+/*	properties	*/
+function put_Oracle(newValue)	{Oracle		= newValue};
+function put___Log(newValue)	{__Log		= newValue};
+function put___DoLog(newValue)	{__DoLog	= newValue};
+function put_safe(newValue)	    {safe		= newValue};
+
+/*	methods	*/
+/*
+    $Revision$
+    $Id$
+
+    File:   SGGRcustfunction.wsc
+
+*/
+
+/* Dit zijn de enige drie functies die je mag gebruiken */
+var Oracle;
+var __Log;
+var __DoLog;
+var safe;
+
+API_PHONEBOOK =
+function (prs_key, data)
+{
+    var result = {};
+    //
+    // Toestel
+    //
+    var sql = "SELECT prs_kenmerklink_waarde"
+            + "  FROM prs_kenmerklink"
+            + " WHERE prs_link_key = " + prs_key
+            + "   AND prs_kenmerklink_niveau = 'P'"
+            + "   AND prs_kenmerklink_verwijder IS NULL"
+            + "   AND prs_kenmerk_key = 1000"; // toestel
+    var oRs = Oracle.Execute(sql);
+    if (!oRs.Eof)
+    {
+        result.sggr_toestel = safe.html(oRs("prs_kenmerklink_waarde").Value);
+    }
+    //
+
+    return result;
+};
+
+]]>
+</script>
+</component>