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

2010-12-29 20:30:08 +00:00
parent 9efdac73bc
commit 3dd5de2e9c
26 changed files with 2990 additions and 0 deletions
--- a/CUST/AAEN/Enexis.gif
+++ b/CUST/AAEN/Enexis.gif
--- a/CUST/AAEN/cust.css
+++ b/CUST/AAEN/cust.css
@@ -0,0 +1,53 @@
+/*
+ *    $Revision: 1 $
+ *    $Modtime: 19-11-10 10:56 $
+ */
+#headerblok
+{
+    background: url(Enexis.gif) no-repeat;
+    background-color: #FFFFFF;
+    background-position: 5px 5px;
+    color: #000002;
+}
+
+
+.E td { background-color: #EEEEEE; 
+        border:1px solid #FFFFFF;
+}
+.O td { background-color: #EEEEEE;
+        border:1px solid #FFFFFF;
+}
+
+/* for colored rows and others*/
+.unsolved td {
+  font-weight: bold;
+}
+.sleepy td {
+  color: #808080;
+}
+
+#editbody .fcltblock {
+    background-color:#FAFAFA;
+    border:2px solid #D0D0D0;
+}
+#editbody .fcltblockhead {
+    background-color:#D0D0D0;
+}
+
+.rescat_p_c {
+  width: 40px;
+  text-align:right;
+  padding-right:2px;
+}
+
+.rescat_tp_c {
+  width: 60px;
+  text-align:right;
+  padding-right:2px;
+}
+
+.catline .number {
+  width: 40px;
+  text-align:right;
+  padding-right:2px;
+}
--- a/CUST/AAEN/cust.inc
+++ b/CUST/AAEN/cust.inc
@@ -0,0 +1,84 @@
+<% /*
+     $Revision: 1 $
+     $Modtime: 21-12-10 10:10 $
+*/ %>
+
+<!-- #include file="../AAXX/cust.inc" -->
+
+<%
+// This is THE place to define customer specific *overrules* for the standard Facilitor application texts.
+// Handle with care!
+
+customerId = "AAEN";
+
+// FrontOffice heet Servicedesk van Arcadis Aqumen.
+lcl_contact_FO                  = 'Neem kontakt op met de Servicedesk van Arcadis Aqumen.'
+lcl_res_fe_edit_option_only     = "De reservering is al definitief. Neem contact op met de Servicedesk van Arcadis Aqumen voor wijzigingen.";
+lcl_res_obj_lastminute = "Waarschuwing: last-minute: Neem contact op met de Servicedesk van Arcadis Aqumen om zeker te zijn dat uw reservering is doorgekomen";
+lcl_facilitor_welcome           = "Welkom bij de <strong>Online Servicedesk</strong>";
+lcl_search_product              = "Zoek....";
+lcl_fac_emptyprodset2           = ".<br><br>Probeer een andere zoekterm, of maak een algemene keuze uit het menu.<br>Kunt u het niet vinden, neem dan contact op met <a href='mailto:servicedeskchemelot@aa-fm.com'>de Servicedesk</a>, tel. 60.000.";
+lcl_do_upload_image             = "Upload";
+lcl_hour_rate                   = "Uurtarief ex. BTW";
+lcl_mater_cost                  = "Materiaal ex. BTW";
+lcl_correct                     = "Correctie ex. BTW";
+lcl_total_cost                  = "Totaal ex. BTW";
+
+LCL.res.lastmin                 = "Deze reservering is te nabij voor deze wijziging. Voor last-minute bestellingen kunt u direct contact opnemen met de restaurants.";
+
+dep_name_level1 = 'Afd niveau 1';
+dep_name_level2 = 'Afd niveau 2';
+
+lcl_enddate           = "SLA datum";
+show_ordernr              = 0;
+mld_ord_show_ordernr      = 0;
+
+// System parameters
+  helppage_url = "https://www.aafmportal.com/Enexis/Pages/Handleidingen.aspx";
+  image_path_virtual = "../" + custpath + "/photos/";
+  
+// Performance meting:
+  perfmon_threshold = 2000;
+  PerformInterval       = 600; // time (seconds) between backgrounder refreshes
+  prs_collegas_used = 1;            // Can FE users indicate collegues for replacement (1) or not (0)
+  prs_werkplek_implicit = 1;
+
+// General settings
+  currency_pref = '<27> ';
+  portalnewslength = 90;
+// Module settings
+
+//phonebook
+  // Oeioeioei, wat vies die span hierin ;-|
+  prs_phonebook_info = "Houdt uw gegevens actueel, dit bevordert uw bereikbaarheid.";
+  ph_loc_search = true;
+  ph_bedr_search = true;
+  phone_usrrap_key = -1;
+  lcl_pb_customrapport = 'Afdelingen';
+  ph_persliddetails_page = 'appl/fac/fac_user_info_phone.asp';
+
+// ALG
+  photo_kenmerk_key = 1000;
+
+// PRS
+  prs_max_dep_level = 2;            // number of levels between prs_bedijf and prs_perslid (max = 5)
+// RES
+  kosten_klant_default = 1;         // kosten klant checkbox is unchecked (off) - res only
+  res_fe_show_plantooltip = 1;      // FE can(1) or cannot (0) see who has reserved a room in the planboard
+  res_default_CVAB_mode = 2;        // 0 (00)=Te kiezen&default Afhalen, 1 (01)=Te kiezen, default Bezorgen (default),
+                                    // 2 (10)=Vast     &default Afhalen  3 (11)=Vast,      default Bezorgen
+// FIN
+  fin_defaultboekmaand = 2;         // How to determine default "boekmaand" for entered invoice: 1=sysdate, 2=orderdate
+// MLD
+  mld_same_mld_days = 1;            // in days
+  mld_fe_force_vakgroep = 1;
+  mld_afmelden_extern = 2;
+  mld_order_autoprint = 3;
+  mld_enable_workflow = 1;          // enable workflow in call handling {0=workflow disabled | 1=workflow enabled }
+
+
+  fg_rap_alg   = '../../cust/aaen/rap_alg.asp';
+
+ %>
+<!-- #include file="custenv.inc" -->
+
--- a/CUST/AAEN/custenv.inc
+++ b/CUST/AAEN/custenv.inc
@@ -0,0 +1,21 @@
+<% /*
+     $Revision: 1 $
+     $Modtime: 3-11-10 13:43 $
+*/ %>
+<%
+// Contains Facilitor settings that differ across the various environments
+// Included by cust.inc
+
+lcl_facilitor_header_prefix = "Pre-productie";
+
+  FCLTAPIS["PHONEBOOK"] = { apikey: "EF65B87AB775FE33",
+                            file: "appl/api/phonebook_js.asp",
+                            os_login: "_GAST", // zorg dat er een _GAST gebruiker is!
+                            options: { detailurl: ph_persliddetails_page,
+                                       toonWerkplekken: true,
+                                       detailWidth : 400
+                                     } // sample
+                          };
+
+
+%>
--- a/CUST/AAEN/export/gen_export.ini
+++ b/CUST/AAEN/export/gen_export.ini
@@ -0,0 +1,183 @@
+[ADO]
+ConnectionString 		= "File Name=..\Oracle.udl"
+Database_Name 			= "ORACLE"
+
+[SYSTEM]
+Loglevel            = "1"
+User                = 'AAEN'
+
+[BUDGET_TRACKER]
+LocalPath           =.\BUDGET_TRACKER
+ExportFilePrefix    = 'aaen_BudgetTracker'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[RES_RUIMTE_XML]
+LocalPath           =.\RES_RUIMTE_XML
+ExportFilePrefix    = 'Reservering_'
+ExportFilePostfix   = '.xml'
+BackupFileTimeStamp = 'ddmmyyyy'
+LogFilePostfix      = '.log'
+
+[RUIMTE_XML]
+LocalPath           =.\RUIMTE_XML
+ExportFilePrefix    = 'ExportRmt'
+ExportFilePostfix   = '.xml'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[EXACT]
+LocalPath           =.\EXACT
+ExportFilePrefix    = 'aaen_exact_'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = 'yyyymmdd'
+LogFilePostfix      = '.log'
+Manual              = '1'
+
+[VERWERK_EXACT]
+LocalPath           =.\VERWERK_EXACT
+ExportFilePrefix    = 'aaen_vw_exact_'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = 'yyyymmdd'
+LogFilePostfix      = '.log'
+Manual              = '1'
+
+[EXACT_VERKOOP]
+LocalPath           =.\EXACT_VERKOOP
+ExportFilePrefix    = 'exact_vk_aaen_'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = 'yyyymmdd'
+LogFilePostfix      = '.log'
+Manual              = '1'
+
+[BUNDEL_CATERING]
+LocalPath           =.\BUNDEL_CATERING
+ExportFilePrefix    = 'catering_aaen_'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = 'yyyymmdd'
+LogFilePostfix      = '.log'
+Manual              = '1'
+
+[LOGIN]
+LocalPath           =./LOGIN
+ExportFilePrefix    = 'LOGIN'
+ExportFilePostfix   = 'dat.csv'
+BackupFileTimeStamp = 'yymmdd'
+LogFilePostfix      = '.log'
+Manual              = '0'
+
+[HV_FREEZE]
+LocalPath           =./HV_FREEZE
+ExportFilePrefix    = 'HV_FEEZE'
+ExportFilePostfix   = 'dat.csv'
+BackupFileTimeStamp = 'yymmdd'
+LogFilePostfix      = '.log'
+Manual              = '1'
+
+
+[NOTIFICATIE]
+LocalPath           =./NOTIFICATIE
+ExportFilePrefix    = 'NOTIFICATIE'
+ExportFilePostfix   = 'dat.csv'
+BackupFileTimeStamp = 'yymmdd'
+LogFilePostfix      = '.log'
+Manual              = '0'
+
+[DWH_CNT_ALGEMEEN]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_contract'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_MLD_ALGEMEEN]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_melding'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_RES_ALGEMEEN]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_reservering'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_PRS_BEDRIJF]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_bedrijf'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_PRS_AFDELING]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_afdeling'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_PRS_PERSLID]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_perslid'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_PRS_KOSTENSR]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_kostensoort'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_PRS_KOSTENPL]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_kostenplaats'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_FIN_FACTUUR]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_factuur'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_MLD_KENM_MLD]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_kenmerk_melding'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_MLD_KENM_OPD]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_kenmerk_opdracht'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_RES_KENMERK]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_res_kenmerk'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_ALG_ONRGOED]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_alg_onrgoed'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
+
+[DWH_ALG_KENMERK]
+LocalPath           =.\DWH
+ExportFilePrefix    = 'aaen_dwh_alg_kenmerk'
+ExportFilePostfix   = '.csv'
+BackupFileTimeStamp = '-'
+LogFilePostfix      = '.log'
--- a/CUST/AAEN/export/gen_export_budget_tracker.bat
+++ b/CUST/AAEN/export/gen_export_budget_tracker.bat
@@ -0,0 +1,20 @@
+REM GEN_EXPORT_BUDGET_TRACKER.BAT
+REM
+REM AAEN
+REM
+REM Exporteert informatie naar een export-bestand
+REM
+REM Context : roep deze file aan indien nodig, of schedule deze
+REM Verseist: de randvoorwaarde voor het gebruik van gen_export
+REM
+REM $Revision: 1 $
+REM $Modtime: 29-12-10 22:17 $
+REM
+REM (c) 2009, SG facilitor, +31 (53) 4800710, helpdesk@sgfacilitor.nl
+REM
+
+
+..\..\..\utils\gen_export\gen_export.exe BUDGET_TRACKER
+REM ..\..\..\utils\gen_export\gen_export.exe BUDGET_TRACK_M2
+
+
--- a/CUST/AAEN/export/gen_export_dwh.bat
+++ b/CUST/AAEN/export/gen_export_dwh.bat
@@ -0,0 +1,44 @@
+REM GEN_EXPORT_DWH.BAT
+REM
+REM AAEN
+REM
+REM Exporteert informatie naar een export-bestand
+REM
+REM Context : dit bestand verzorgt de export naar het datawarehouse van AA
+REM Verseist: de randvoorwaarde voor het gebruik van gen_export
+REM
+REM $Revision: 1 $
+REM $Modtime: 29-12-10 22:16 $
+REM
+REM (c) 2005, Dijkoraad IT bv, +31 (53) 4800700, facilitorsupport@it.dijkoraad.nl
+REM
+
+del dwh\*.csv
+
+..\..\..\utils\gen_export\gen_export.exe DWH_CNT_ALGEMEEN
+
+..\..\..\utils\gen_export\gen_export.exe DWH_MLD_ALGEMEEN
+
+..\..\..\utils\gen_export\gen_export.exe DWH_RES_ALGEMEEN
+
+..\..\..\utils\gen_export\gen_export.exe DWH_PRS_BEDRIJF
+
+..\..\..\utils\gen_export\gen_export.exe DWH_PRS_AFDELING
+
+..\..\..\utils\gen_export\gen_export.exe DWH_PRS_PERSLID
+
+..\..\..\utils\gen_export\gen_export.exe DWH_PRS_KOSTENSR
+
+..\..\..\utils\gen_export\gen_export.exe DWH_PRS_KOSTENPL
+
+..\..\..\utils\gen_export\gen_export.exe DWH_FIN_FACTUUR
+
+..\..\..\utils\gen_export\gen_export.exe DWH_MLD_KENM_MLD
+
+..\..\..\utils\gen_export\gen_export.exe DWH_MLD_KENM_OPD
+
+..\..\..\utils\gen_export\gen_export.exe DWH_RES_KENMERK
+
+..\..\..\utils\gen_export\gen_export.exe DWH_ALG_ONRGOED
+
+..\..\..\utils\gen_export\gen_export.exe DWH_ALG_KENMERK
--- a/CUST/AAEN/export/gen_export_exact.bat
+++ b/CUST/AAEN/export/gen_export_exact.bat
@@ -0,0 +1,23 @@
+REM GEN_EXPORT_EXACT.BAT
+REM
+REM AAEN
+REM
+REM Exporteert informatie naar een export-bestand
+REM
+REM Context : roep deze file aan indien nodig, of schedule deze
+REM Verseist: de randvoorwaarde voor het gebruik van gen_export
+REM
+REM $Revision: 1 $
+REM $Modtime: 29-12-10 22:16 $
+REM
+REM (c) 2010, SG|facilitor bv, +31 (53) 4800700, support@sgfacilitor.nl
+REM
+
+
+..\..\..\utils\gen_export\gen_export.exe EXACT
+
+..\..\..\utils\gen_export\gen_export.exe VERWERK_EXACT
+
+..\..\..\utils\gen_export\gen_export.exe BUNDEL_CATERING
+
+..\..\..\utils\gen_export\gen_export.exe EXACT_VERKOOP
--- a/CUST/AAEN/export/gen_export_res_ruimte_xml.bat
+++ b/CUST/AAEN/export/gen_export_res_ruimte_xml.bat
@@ -0,0 +1,20 @@
+REM GEN_EXPORT_RES_RUIMTE_XML.BAT
+REM
+REM AAFM
+REM
+REM Bevries de huisvestingssituatie.
+REM
+REM Context : roep deze file aan indien nodig, of schedule deze
+REM Verseist: de randvoorwaarde voor het gebruik van gen_export
+REM
+REM $Revision: 1 $
+REM $Modtime: 16-12-10 14:54 $
+REM
+REM (c) 2005, Dijkoraad IT bv, +31 (53) 4800700, facilitorsupport@it.dijkoraad.nl
+REM
+
+
+REM ================================================== create exportfile
+..\..\..\utils\gen_export\gen_export.exe RES_RUIMTE_XML
+
+REM ================================================== cleanup
--- a/CUST/AAEN/export/gen_export_ruimte_xml.bat
+++ b/CUST/AAEN/export/gen_export_ruimte_xml.bat
@@ -0,0 +1,20 @@
+REM GEN_EXPORT_RES_RUIMTE_XML.BAT
+REM
+REM AAFM
+REM
+REM Bevries de huisvestingssituatie.
+REM
+REM Context : roep deze file aan indien nodig, of schedule deze
+REM Verseist: de randvoorwaarde voor het gebruik van gen_export
+REM
+REM $Revision: 1 $
+REM $Modtime: 16-12-10 14:54 $
+REM
+REM (c) 2005, Dijkoraad IT bv, +31 (53) 4800700, facilitorsupport@it.dijkoraad.nl
+REM
+
+
+REM ================================================== create exportfile
+..\..\..\utils\gen_export\gen_export.exe RUIMTE_XML
+
+REM ================================================== cleanup
--- a/CUST/AAEN/infobord/.gitignore
+++ b/CUST/AAEN/infobord/.gitignore
--- a/CUST/AAEN/infobord/infobord.asp
+++ b/CUST/AAEN/infobord/infobord.asp
@@ -0,0 +1,92 @@
+<%@ language = "JavaScript" %>
+<% /*
+    $Revision: 1 $
+    $Modtime: 30-11-10 15:05 $
+    File:               infobordvk.asp
+    Description:        A deeplink call to display information on the infobord
+    Parameters:
+        vk              verkoopkamer: the number of the verkoopkamer
+    Context:            
+    Note:               
+*/ %>
+
+<%
+  Response.Expires=0;
+  Session("customerId") = 'AAEN';
+  Session("user_key")  = 6241;
+%>
+
+<!-- #include file="../../../cust/install.inc" -->
+<% FCLTHeader.Set({root: "../../../appl/"}); %>
+<!-- #include file="../../../appl/Shared/date_sql.inc" -->
+<!-- #include file="../../../appl/shared/check_sso.inc"-->
+
+<html>
+
+<head>
+<%  FCLTHeader.Generate(); %>
+<%
+
+  if (typeof Session("user_key") == "undefined")
+    doCheckSSO();
+
+  // specific params needed to find the reservation which has to be deleted
+  var refreshrate      = getQParamInt("refreshrate", -1);
+  var locatie_code     = getQParam("locatie_code", "leeg");
+  var gebouw_code      = getQParam("gebouw_code", "leeg");
+  var verdieping_code  = getQParam("verdieping_code", "leeg");
+  var ruimte_nr        = getQParam("ruimte_nr", "leeg");
+  var alg_ruitme_key   = -1;
+
+  where = " 1=1 ";
+  if (locatie_code != "leeg") {
+    where += " and alg_locatie_code = " + safe.quoted_sql(locatie_code);
+  }
+  if (gebouw_code != "leeg") {
+    where += " and alg_gebouw_upper = "  + safe.quoted_sql(gebouw_code);
+  }
+  if (verdieping_code != "leeg") {
+    where += " and alg_verdieping_code = "  + safe.quoted_sql(verdieping_code);
+  }
+  if (ruimte_nr != "leeg") {
+     where += " and alg_ruimte_nr = "  + safe.quoted_sql(ruimte_nr);
+     sql = "SELECT alg_ruimte_key FROM alg_v_ruimte_gegevens rg"
+         + " WHERE " + where;
+     oRs = Oracle.Execute(sql);
+     if (!oRs.eof) {
+       alg_ruimte_key = oRs(0).value;
+       where = " and alg_ruimte_key = " + alg_ruimte_key;
+     }
+  }
+  else {
+    alg_ruimte_key = -1;
+  }
+
+  where = "&sqlWhere=1=1 " + where;
+  // find the key of the usr_report
+  var fac_usrrap_key = -1;
+  sql = "SELECT fac_usrrap_key"
+      + " FROM fac_usrrap ur"
+      + " WHERE UPPER(fac_usrrap_view_name) = 'AAEN_V_INFO_VERGADERRUIMTE'";
+  oRs = Oracle.Execute(sql);
+  if (!oRs.eof) {
+    fac_usrrap_key = oRs(0).value;
+  }
+
+%>
+
+</head>
+<body leftmargin=0 topmargin=0 onLoad="Loaded();">
+<script language="javascript">
+  function Loaded()
+  {
+<%  if (fac_usrrap_key == -1 || alg_ruimte_key == -1) { %>
+      alert ("rapport kan niet gevonden worden of ruimte is niet uniek");
+<%  } else { %>
+        var s = "../../../appl/fac/fac_usrrap_infobord.asp?rap_key=<%=fac_usrrap_key%><%=where%>&refreshrate=<%=refreshrate%>";
+        window.navigate(s);
+<%  } %>
+  }
+  </script>
+</body>
+</head>
--- a/CUST/AAEN/mld_statusupdate.asp
+++ b/CUST/AAEN/mld_statusupdate.asp
@@ -0,0 +1,86 @@
+<%@ language = "JavaScript" %>
+<% /*
+    $Revision: 1 $
+    $Modtime: 15-12-10 16:58 $
+    File:               mld_statusupdate.asp
+    Description:        A deeplink call from the reports section of Facilitor to accept or reject lease car requests.
+    Parameters:
+        meldingnr       Id of the mld_melding
+        mld_info        Information that will be logged in the complain (as part of Opmerking)
+        mld_status      Key of mld_statusses
+    Context:            Client specific file to handle a deeplink call.
+    Note:
+*/ %>
+<%
+DOCTYPE_Disable = 1;
+%>
+<!-- #include file="../install.inc" -->
+<!-- #include file="../../appl/Shared/json2.js" -->
+<!-- #include file="../../appl/Shared/funcodes.inc" -->
+<%
+  message = "";
+  var mld_opdr_key = -1;
+  var mld_melding_key = -1;
+  var meldingnr = getQParamInt("meldingnr", -1);
+  var mld_info = getQParam("mld_info","");
+  var mld_status = getQParamInt("mld_status", -1);
+__Log('voor select');
+  sql = " SELECT mld_melding_key FROM mld_melding WHERE mld_melding_key = " + meldingnr;
+
+  oRs = Oracle.Execute(sql);
+  if (!oRs.eof) {
+    // meldingnummer is gevonden
+    mld_melding_key = oRs(0).value;
+  }
+
+  if (mld_info != "") {
+    sql = " UPDATE mld_melding "
+        + "    SET mld_melding_opmerking = DECODE (mld_melding_opmerking, NULL, " + safe.quoted_sql(mld_info) + ", " + safe.quoted_sql(mld_info) + " || '\n' || SUBSTR (mld_melding_opmerking , 1, (4000 - " + mld_info.length + "))) "
+        + "  WHERE mld_melding_key = " + mld_melding_key
+        + "    AND mld_melding_status IN (2, 3, 4, 7) ";
+    Oracle.Execute(sql);
+  }
+__Log('voor mld_status==1');
+ if (mld_status == 1) {
+    // melding afwijzen; ALLEEN door geautoriseerde medewerkers!
+    if (func_enabled["WEB_USER02"]) {
+      if (mld_info == "") {
+        message = 'Bij afwijzen is het invoeren van een reden verplicht.';
+      }
+      else {
+        message = 'Lease auto aanvraag afgewezen.';
+
+        sql = "BEGIN mld.setmeldingstatus("+ mld_melding_key +", 1, " + user_key + "); END;";
+        Oracle.Execute(sql);
+      }
+    }
+    else {
+      message = lcl_no_auth;
+    }
+
+    result = { success : true, message : message }
+
+    Response.Write(JSON.stringify(result));
+  }
+  else if (mld_status == 4) {
+    // melding accepteren; ALLEEN door geautoriseerde medewerkers!
+    __Log('voor func_enabled');
+    if (func_enabled["WEB_USER02"]) {
+      message = 'lease auto aanvraag geaccepteerd.';
+
+      // melding accepteren
+      sql = "BEGIN mld.setmeldingstatus("+ mld_melding_key +", 4, " + user_key + "); END;";
+      Oracle.Execute(sql);
+      // melding afmelden
+      sql = "BEGIN mld.setmeldingstatus("+ mld_melding_key + ", 5, "+ user_key + "); END;";
+      Oracle.Execute(sql);
+      // en de volgende workflowstep aanroepen
+      sql = "BEGIN mld.mld_nextworkflowstep ("+ mld_melding_key + ", 1); END;";
+      Oracle.Execute(sql);
+    }
+
+    result = { success : true, message : message }
+
+    Response.Write(JSON.stringify(result));
+  }
+%>
--- a/CUST/AAEN/rap_alg.asp
+++ b/CUST/AAEN/rap_alg.asp
@@ -0,0 +1,149 @@
+<%@ language="javascript"%>
+<% /*
+     $Revision: 1 $
+     $Modtime: 22-12-10 10:57 $
+
+     File:        CAD/rap_alg.asp
+     Description: Inhoud van het ALG-tabblad van FG
+     Parameters:  floorKey (required)
+                  highlight (optional list of room-keys to filter)
+     Context:     -
+*/%>
+
+<!-- #include file="../../cust/install.inc" -->
+<!-- #include file="../../Appl/Shared/resultset_table_v2.inc" -->
+
+<%
+var floorKey   = getQParam("vKey", -1);
+var highlight  = getQParam("highlight", "-1"); // Comma-separated room_key_list (terrains). Optional
+if (highlight == "") highlight = "-1";  // dat kan dus ook nog
+
+var outputmode = getQParam("outputmode" ,0);
+var showall    = getQParam("showall" ,0);
+
+var sql = "";
+if (floorKey != -1)
+{
+  sql = " SELECT alg_ruimte_key, alg_ruimte_aanduiding, alg_srtruimte_omschrijving, prs_ruimteafdeling_bezetting, "
+      + "        alg_ruimte_bruto_vloeropp, alg_ruimte_omschrijving, alg_ruimte_opp_alt1, alg_ruimte_opp_alt2, "
+      + "        werkplekken, afdeling "
+      + "   FROM aaen_v_ruimte_bezetting "
+      + "  WHERE alg_verdieping_key = " + floorKey
+      + (highlight != "-1"
+        ? " AND alg_ruimte_key IN (" + highlight + ")"
+        : "")
+      + " ORDER BY alg_ruimte_aanduiding, afdeling";
+}
+else
+{ // Er is (nog) geen verdieping bekend
+  sql = "SELECT * FROM DUAL WHERE 1 = 0";
+}
+%>
+<html>
+  <head>
+<%  FCLTHeader.Generate({ outputmode: outputmode, root: "../../appl/" }); %>
+    <script type="text/javascript">
+      function onClickRuimteAlternatief(room_key)
+      {
+        sl = parent.parent.document.getElementById("rooms");
+        if( sl.selectedIndex == -1 || sl.options[sl.selectedIndex].value != room_key )
+        {
+          for (i = 0; i < sl.length; i++)
+          {
+            if (sl.options[i].value == room_key)
+            {
+              sl.selectedIndex = i;
+              parent.parent.OnRoomChanged(sl);
+            }
+          }
+        }
+      }
+      function onClickRuimte(row)
+      {
+        FcltMgr.openDetail("appl/ALG/alg_ruimte.asp?key=" + row.getAttribute("ROWKEY"), "<%=lcl_estate_ruimte_title%>");
+      }
+    </script>
+  </head>
+
+  <body class="tabpage">
+<%
+    var summaryParams = {selectedopp: 0, selectedoppAlt1: 0, selectedoppAlt2: 0, selectedWP: 0}
+
+    function fnsummaryCalc(oRs)
+    {
+      with (summaryParams)
+      {
+        selectedopp = selectedopp + (oRs("alg_ruimte_bruto_vloeropp").value != null? oRs("alg_ruimte_bruto_vloeropp").value : 0);
+        selectedWP = selectedWP + (oRs("werkplekken").value != null? oRs("werkplekken").value : 0);
+        selectedoppAlt1 = selectedoppAlt1 + (oRs("alg_ruimte_opp_alt1").value != null? oRs("alg_ruimte_opp_alt1").value : 0);
+        selectedoppAlt2 = selectedoppAlt2 + (oRs("alg_ruimte_opp_alt2").value != null? oRs("alg_ruimte_opp_alt2").value : 0);
+      }
+      return;
+    }
+
+    function fnsummaryShow()
+    {
+      var status_row = "<label>" + lcl_estate_totaal_opp + "</label> "
+                     + "<label>" + lcl_estate_ruimte_bruto_vloeropp + "</label>: " + summaryParams.selectedopp.toFixed(2) + " " + lcl_estate_ruimte_opp_m2;
+      if (fg_contourlayers_alt1 != "" && fg_labellayers_alt1 != "")
+        status_row += ", <label>" + lcl_estate_ruimte_opp_alt1 + "</label>: " + summaryParams.selectedoppAlt1.toFixed(2) + " " + lcl_estate_ruimte_opp_m2;
+      if (fg_contourlayers_alt2 != "" && fg_labellayers_alt2 != "")
+        status_row += ", <label>" + lcl_estate_ruimte_opp_alt2 + "</label>: " + summaryParams.selectedoppAlt2.toFixed(2) + " " + lcl_estate_ruimte_opp_m2;
+      status_row += ", <label>" + "Aantal werkplekken" + "</label>: " + summaryParams.selectedWP + " " ;
+      return status_row;
+    }
+
+    var lastValue = null;
+    function showRoomDesc(oRs)
+    { // leek leuk om herhalingen te onderdrukken, maar sorteren maakt het waardeloos
+      if (false && outputmode == 0 && safe.htmlattr(oRs("alg_ruimte_aanduiding").value) == lastValue)
+      var result = null;
+      else
+        var result = safe.htmlattr(oRs("alg_ruimte_aanduiding").value);
+      lastValue = result;
+      return result;
+    }
+
+    function fnOpp(oRs)
+    {
+      return (oRs("alg_ruimte_bruto_vloeropp").value != null? "" + oRs("alg_ruimte_bruto_vloeropp").value.toFixed(2) : "-");
+    }
+
+    function fnOppAlt1(oRs)
+    {
+      return (oRs("alg_ruimte_opp_alt1").value != null? "" + oRs("alg_ruimte_opp_alt1").value.toFixed(2) : "-");
+    }
+
+    function fnOppAlt2(oRs)
+    {
+      return (oRs("alg_ruimte_opp_alt2").value != null? "" + oRs("alg_ruimte_opp_alt2").value.toFixed(2) : "-");
+    }
+
+    var rst = new ResultsetTable({ ID : "cadalgtable",
+                                   keyColumn: "alg_ruimte_key",
+                                   title: lcl_space_manage_h,
+                                   sql: sql,
+                                   outputmode: outputmode,
+                                   showAll: showall,
+                                   summaryCalc: fnsummaryCalc,
+                                   summaryShow: fnsummaryShow
+                                 });
+
+    rst.addColumn(new Column({caption: lcl_obj_inf_room, content: showRoomDesc}));
+    rst.addColumn(new Column({caption: lcl_fg_func_names, content: "alg_srtruimte_omschrijving"}));
+    rst.addColumn(new Column({caption: lcl_descr, content: "alg_ruimte_omschrijving"}));
+    rst.addColumn(new Column({caption: lcl_department, content: "afdeling"}));
+    rst.addColumn(new Column({caption: "Bezetting", content: "prs_ruimteafdeling_bezetting", datatype: "integer"}));
+    rst.addColumn(new Column({caption: lcl_estate_ruimte_bruto_vloeropp, content: fnOpp, datatype: "float"}));
+    if (fg_contourlayers_alt1 != "" && fg_labellayers_alt1 != "")
+      rst.addColumn(new Column({caption: lcl_estate_ruimte_opp_alt1, content: fnOppAlt1, datatype: "float"}));
+    if (fg_contourlayers_alt2 != "" && fg_labellayers_alt2 != "")
+      rst.addColumn(new Column({caption: lcl_estate_ruimte_opp_alt2, content: fnOppAlt2, datatype: "float"}));
+
+    rst.addColumn(new Column({caption: 'Aantal werkplekken', content: "werkplekken", datatype: "integer"}));
+    rst.addAction({ action: "onClickRuimte", caption: lcl_edit, isDefault: true } );
+    var cnt = rst.processResultset();
+%>
+  </body>
+</html>
+
--- a/CUST/AAEN/sso.asp
+++ b/CUST/AAEN/sso.asp
@@ -0,0 +1,19 @@
+<%@ language = "JavaScript" %>
+<% /*
+    $Revision: 1 $
+    $Modtime: 3-09-10 10:55 $
+    File:        cust/aaen/sso.asp
+    Description: Single Sign On script
+    Parameters:
+    Context:
+    Note:
+*/ %>
+<%
+    Response.Expires=-1;
+    Session("customerId") = "AAEN";
+%>
+<!-- #include file="../../cust/install.inc" -->
+<!-- #include file="../../appl/shared/login.inc" -->
+<%
+    SecureSSO({ strSharedKey: "830329", Timeout: 10}); //Sharedkey - Should be the same at customer side
+%>
--- a/CUST/AAEN/sso/.gitignore
+++ b/CUST/AAEN/sso/.gitignore
--- a/CUST/AAEN/sso/SSOprodAAEN.asp
+++ b/CUST/AAEN/sso/SSOprodAAEN.asp
@@ -0,0 +1,114 @@
+<%@language="VBScript"%>
+<%
+'*******************************************************************
+'Script: SSO.asp
+'
+'        $Revision: 1 $
+'        $Modtime: 3-09-10 10:55 $
+'
+
+'Doel:   SSO bewerkstelligen voor ASP providers - deel 1 van 2
+'Auteur: Thorwald Beeris 
+'*******************************************************************
+'* declare *********************************************************
+Dim strGUID, strCTID, strUserName, strKey, strASPUrl, strSharedKey
+Dim strEncryptedCode, strControlEncryptedCode
+'* variables *******************************************************
+strASPUrl = "https://aaen.facilitor.nl/cust/aaen/sso.asp" 'HTTPS URL adres van ASP
+strSharedKey = "830329" 'Sharedkey - Should be the same at target side
+'*******************************************************************
+response.Buffer=true
+%>
+<HTML>
+<HEAD>
+<SCRIPT LANGUAGE="JavaScript">
+function fnSubmit() {
+  window.document.form.submit();
+  return;
+}
+</SCRIPT>
+</HEAD>
+<BODY LANGUAGE="javascript" onload="return fnSubmit()">
+Een moment aub.
+<form action='<%=strASPUrl%>' method="post" name="form" ID="Form1">
+<input type="hidden" name="returnurl" value="<%="http://" & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("SCRIPT_NAME")%>" ID="Hidden1">
+<%
+'* request action = requestid ***************************************
+strGUID = Request.form("guid")
+strCTID = Request.form("ctid")
+if strGUID = "" or strCTID = "" then
+	'* first flow: requestid ****************************************
+	%>
+	<input type="hidden" name="action" value="requestid" ID="Hidden2">
+	<input type="hidden" name="jumpTo" value="<%=Request.Querystring("jumpTo")%>" ID="jumpTo">
+	<%
+else
+	'* second flow: create code *************************************
+	strUserName = Request.ServerVariables("LOGON_USER")
+	if strUserName = "" then
+	  strUserName = Request.ServerVariables("REMOTE_USER")
+	  if strUserName = "" then
+	    strUserName = Request.ServerVariables("HTTP_USER")
+	    if strUserName = "" then
+	      strUserName = Request.ServerVariables("HTTP_LOGIN")
+	      if strUserName = "" then
+      		'Forse user to authenticate
+      		response.Clear
+      		response.Status = 401
+      		response.Flush
+      		response.End
+      	end if
+      end if
+    end if
+	end if
+
+	' * Strip domain name
+	Do While instr(strUserName, "\")>0
+	    strUserName = Mid(strUserName, instr(strUserName, "\") + 1)
+	Loop
+	'* crypt ********************************************************
+	'First coding phase
+	strKey = mid(strSharedKey & strGUID,1,Len(strUserName))
+	strEncryptedCode = EnCrypt(strUserName)
+	'Second coding phase
+	strKey = mid(strGUID,1,Len(strEncryptedCode))
+	strEncryptedCode = EnCrypt(strEncryptedCode)
+	'* crypt Controlkey *********************************************
+	'First coding phase
+	strKey = mid(strSharedKey & strCTID,1,Len(strCTID))
+	strControlEncryptedCode = EnCrypt("http://" & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("SCRIPT_NAME"))
+	'Second coding phase
+	strKey = mid(strCTID,1,Len(strControlEncryptedCode))
+	strControlEncryptedCode = EnCrypt(strControlEncryptedCode)
+	%>
+	<input type="hidden" name="action" value="processcode" ID="Hidden3">
+	<input type="hidden" name="code" value="<%=ConvertToAsc(strEncryptedCode)%>" ID="Hidden4">
+	<input type="hidden" name="ctcode" value="<%=ConvertToAsc(strControlEncryptedCode)%>" ID="Hidden5">
+	<input type="hidden" name="ltcode" value="<%=len(strUserName)%>" ID="Hidden6">
+	<%
+end if
+'* Functions ********************************************************
+Function EnCrypt(strCryptThis)
+   Dim strChar, iKeyChar, iStringChar, i
+   for i = 1 to Len(strCryptThis)
+      iKeyChar = Asc(mid(strKey,i,1))
+      iStringChar = Asc(mid(strCryptThis,i,1))
+      iCryptChar = iKeyChar Xor iStringChar
+      strEncrypted =  strEncrypted & Chr(iCryptChar)
+   next
+   EnCrypt = strEncrypted
+End Function
+Function ConvertToAsc(strAsc)
+	Dim iCount
+	Dim strTemp
+	ConvertToAsc = ""
+	for iCount = 1 to len(strAsc)
+		strTemp = (asc(mid(strAsc,iCount,1)))
+		ConvertToAsc = ConvertToAsc & len(strTemp) & strTemp
+	next
+End Function
+'*********************************************************************
+%>
+</form>
+</BODY>
+</HTML>
--- a/CUST/AAEN/tasks/.gitignore
+++ b/CUST/AAEN/tasks/.gitignore
--- a/CUST/AAEN/tasks/PutOrders.ini
+++ b/CUST/AAEN/tasks/PutOrders.ini
@@ -0,0 +1,69 @@
+// Putorders.ini
+//
+// SAMPLE configuration file for Facilitor PutOrders routine.
+// This routine handles the internal Facilitor orders and notifications queueus and
+// takes care of sending these messages into the world. It normally is the only way out
+// for messages from Facilitor
+//
+// Several protocols are supported, like e-mail, SMS, FTP, HTTP and XML/SOAP
+// Its actual behaviour (like which messages are send by what means) is defined
+// by the applicationmanager using several settings, parameters and XSL stylesheets
+//
+// This sample needs to be copied to the ../../CUST/XXXX/Putorders folder, where
+// all the actual and appropriate settings *need* to be altered on installation.
+//
+// $Revision: 1 $
+// $Modtime: 3-09-10 10:57 $
+//
+
+[SYSTEM]
+// The FULL FYSICAL (LOCAL) PATH to the Facilitor webroot folder (containing a.o. global.asa)
+FacilitorHome = "c:/inetpub/wwwroot/sm44/facilitor5iwork/"
+
+[ADO]
+ConnectionString = "File Name=..\Oracle.udl "
+Database_Name = "ORACLE"
+CustomerId = "AAEN"
+
+[GENERAL]
+;// 0 = as attachments, 1 = in body
+NotificationInMailBody = "1"
+;// stylesheet to be applied for notifications
+NotificationXSL = "../xsl/cust.xsl"
+;// Mail subject prefix for orders (to be followed by ordernr)
+SubjectPrefix = "Facilitor opdracht nr."
+;// the fixed From address for Facilitor orders
+FromAddress = "a.egberink@sgfacilitor.nl"
+;// optional reply address if that is different from FromAddress
+ReplyAddress = "a.egberink@sgfacilitor.nl"
+;// Level of logging (0-3) for troubleshooting purposes
+LogLevel = 3
+;// INTERNET_FLAG_PASSIVE = 0x8000000, else = 0
+ConnectionFlag = 0
+;// 1 = Use Proxy Server (recognizes TIS FTP gateway only), 0 = don't use Proxy
+UseProxy = 0
+;// Proxy Server IP Address, only used when UseProxy = 1
+ProxyServerIPAddress = "127.0.0.1:8888"
+;// SOAP Certificate reference
+SoapCertificateName  = LOCAL_MACHINE\My\it.dijkoraad.nl
+;; Minuten
+NotificationDelay=0
+LogDestination = 3
+EmergencyMailAddress = "aeg@it.dijkoraad.nl"
+; // force this email address for test purposes
+ForceMailAddress = "a.egberink@sgfacilitor.nl"
+; // force this order address for test purposes
+ForceOrderAddress = "mailto:a.egberink@sgfacilitor.nl"
+; // force this mobile number for test purposes
+ForceMobile = "31651193520"
+
+[SMS]
+SmsAccount = ""
+;// SMS accountinfo
+UID = ""
+PWD = ""
+ReplyPhone = ""
+SMSProtocol = ""
+
+
+
--- a/CUST/AAEN/tasks/gen_notify.bat
+++ b/CUST/AAEN/tasks/gen_notify.bat
@@ -0,0 +1,4 @@
+@echo off
+REM Moet gescheduled worden (normaliter 1 keer per uur) om door de applicatiebeheerder
+REM ingeregelde notificaties te genereren.
+wscript ..\..\..\utils\gen_notify\gen_notify.js ../oracle.udl AAEN
--- a/CUST/AAEN/tasks/gen_scheduler.bat
+++ b/CUST/AAEN/tasks/gen_scheduler.bat
@@ -0,0 +1,4 @@
+@echo off
+REM Moet gescheduled worden (normaliter 1 keer per dag) om door de applicatiebeheerder
+REM ingeregelde jobs (aanmaak van periodieke opdrachten) uit te voeren.
+wscript ..\..\..\utils\gen_scheduler\gen_scheduler.js ../oracle.udl
--- a/CUST/AAEN/tasks/putOrders.bat
+++ b/CUST/AAEN/tasks/putOrders.bat
@@ -0,0 +1 @@
+..\..\..\utils\putOrders\putOrders.exe
--- a/CUST/AAEN/tmpl_logo.gif
+++ b/CUST/AAEN/tmpl_logo.gif
--- a/CUST/AAEN/tmpl_logo_sm.gif
+++ b/CUST/AAEN/tmpl_logo_sm.gif
--- a/CUST/AAEN/xsl/.gitignore
+++ b/CUST/AAEN/xsl/.gitignore
--- a/CUST/AAEN/xsl/cust.xsl
+++ b/CUST/AAEN/xsl/cust.xsl