68 lines
2.5 KiB
Plaintext
68 lines
2.5 KiB
Plaintext
<%@ language = "JavaScript" %>
|
|
<% /*
|
|
$Revision$
|
|
$Id$
|
|
|
|
File: res_load_title_rsv.asp
|
|
Description: Genereer non-HTML title voor een Reservering in het planbord
|
|
Parameters: res_rsv_ruimte_key een reservering
|
|
Context: asynchrone aanroep vanuit setResRsvTitle()
|
|
Notes:
|
|
|
|
*/ %>
|
|
<%
|
|
DOCTYPE_Disable = 1;
|
|
%>
|
|
<!-- #include file="../Shared/common.inc" -->
|
|
<!-- #include file="./res.inc" -->
|
|
<%
|
|
|
|
var rsv_ruimte_key = getQParamInt("rsv_ruimte_key");
|
|
res.res_set_dialect(rsv_ruimte_key);
|
|
|
|
var sql = "SELECT "
|
|
+ " COALESCE(rr.res_rsv_ruimte_omschrijving,'-') res_rsv_ruimte_omschrijving"
|
|
+ ", p1.prs_perslid_naam_friendly contact"
|
|
+ ", p2.prs_perslid_naam_friendly host"
|
|
+ ", rr.res_rsv_ruimte_van"
|
|
+ ", rr.res_rsv_ruimte_tot"
|
|
+ ", rr.res_rsv_ruimte_dirtlevel"
|
|
+ ", rr.res_reservering_key"
|
|
+ ", rr.res_rsv_ruimte_volgnr"
|
|
+ ", rr.res_ruimte_opstel_key"
|
|
+ ", rr.alg_ruimte_key"
|
|
+ ", rr.res_rsv_ruimte_bezoekers"
|
|
+ " FROM res_rsv_ruimte rr"
|
|
+ ", prs_v_perslid_fullnames_all p1"
|
|
+ ", prs_v_perslid_fullnames_all p2"
|
|
+ " WHERE rr.res_rsv_ruimte_key = " + rsv_ruimte_key
|
|
+ " AND p1.prs_perslid_key(+) = rr.res_rsv_ruimte_contact_key" // met FSN#34086 moeten de outer joins weer weg
|
|
+ " AND p2.prs_perslid_key(+) = rr.res_rsv_ruimte_host_key";
|
|
|
|
var oRs = Oracle.Execute(sql);
|
|
|
|
var txt_min = L("lcl_reservation")
|
|
+ " "
|
|
+ " " + toTimeString(new Date(oRs("res_rsv_ruimte_van").Value))
|
|
+ "-" + toTimeString(new Date(oRs("res_rsv_ruimte_tot").Value));
|
|
var txt = L("lcl_reservation") + " " + oRs("res_reservering_key").Value + "/" + oRs("res_rsv_ruimte_volgnr").Value
|
|
+ " " + toTimeString(new Date(oRs("res_rsv_ruimte_van").Value))
|
|
+ "-" + toTimeString(new Date(oRs("res_rsv_ruimte_tot").Value));
|
|
|
|
if (oRs("res_rsv_ruimte_dirtlevel").Value & res.dirtlevel.ruimte.notavailable)
|
|
txt += "\n" + L("lcl_res_dirtyroom");
|
|
|
|
txt += "\n" + oRs("res_rsv_ruimte_omschrijving").Value
|
|
+ "\n" + oRs("contact").Value
|
|
+ (oRs("contact").Value != oRs("host").Value ? " (" + oRs("host").Value + ")" : "");
|
|
|
|
if (oRs("res_rsv_ruimte_bezoekers").Value > 0)
|
|
txt += "\n" + oRs("res_rsv_ruimte_bezoekers").Value + " " + L("lcl_res_visitors");
|
|
|
|
oRs.Close();
|
|
|
|
if (!planbordTooltipShowing(rsv_ruimte_key))
|
|
txt = txt_min;
|
|
|
|
Response.Write(txt);
|
|
%> |