Files
Facilitor/APPL/RES/res_load_plan_obj.asp
Peter Feij 413498318a 0-versie
svn path=/Website/trunk/; revision=6
2009-10-05 06:44:06 +00:00

85 lines
3.4 KiB
Plaintext

<%@ language = "JavaScript" %>
<% /*
$Revision: 1 $
$Modtime: 7-07-09 11:17 $
File: obj_schedule.asp
Description: Create small planboard for reservable objects
At the body.onload it copies its entire innerHTML to the parent
Parameters: urole
rsv_ruimte_key optioneel. Als meegegeven dan zitten we in edit mode en komen er
extra edit veldjes in beeld.
Als niet meegegeven dan is rsv_van verplicht en tonen we
alleen een planbordje
rsv_van datum, optioneel, zie rsv_ruimte_key
Context: Called in hidden frame of reserv_Objects_js.asp when user 'opens' object categorie
??Let wel: 'onder het grote planbord' en 'na drukken knop voorzieningen bij een
bestaande of nieuwe reservering' geeft iets ander gedrag??
Notes: See also cons_objects.asp for consumable objects. Solved differently
though.
het RES_RSV_RUIMTE record bestaat altijd al!
res_rsv_ruimte_key is dan ook zo'n beetje de enige parameter?
*/
%>
<% Response.Expires = -1; %>
<!--#include file="../../cust/install.inc"-->
<!--#include file="../Shared/funcodes.inc"-->
<!--#include file="../Shared/date_sql.inc" -->
<!--#include file="../Shared/escape.inc" -->
<!--#include file="../Shared/discxalg3d.inc"-->
<!--#include file="obj_schedule.inc"-->
<%
var urole = getQParam("urole");
var rsv_ruimte_key = getQParam("rsv_ruimte_key", -1);
if (rsv_ruimte_key>0)
{
// Zo snel mogelijk relevante basisinformatie opzoeken
sql = "select res_reservering_key, "
+ " alg_ruimte_key, res_ruimte_opstel_key, "
+ " res_rsv_ruimte_van, res_rsv_ruimte_tot,"
+ " prs_kostenplaats_key"
+ " from res_rsv_ruimte"
+ " where res_rsv_ruimte_key = " + rsv_ruimte_key;
oRs = Oracle.Execute(sql);
var res_key = oRs("res_reservering_key").value;
var res_van = new Date(oRs("res_rsv_ruimte_van").value);
var res_tot = new Date(oRs("res_rsv_ruimte_tot").value);
}
else
{
var res_van = new Date(parseInt(getQParam("rsv_van")));
res_tot = rsv_van;
}
var fronto = (urole=='fo');;
var backo = (urole=='bo');
var jumped = Request.QueryString("jumped").Count>0;
var sdisc = parseInt( Request.QueryString("sdisc") );
var yy = res_van.getFullYear();
var mm = res_van.getMonth()+1;
var dd = res_van.getDate();
var h1 = '00'; // Request.QueryString("h1"); // these params represent _current_ reservation start/end time,
var m1 = '00'; // Request.QueryString("m1"); // but these way they don't show all reserved objects of a day for
var h2 = '23'; // Request.QueryString("h2"); // object editing
var m2 = '59'; // Request.QueryString("m2");
var ch_obj_mode = parseInt(Request.QueryString("ch_obj_mode"));
if (urole=="fe")
autfunction = 'WEB_RESUSE';
else
autfunction = 'WEB_RESFOF';
%>
<!--#include file="../Shared/autlevel.inc"-->
<%
objSchedule(fronto, backo, jumped, sdisc,
rsv_ruimte_key,
res_van, res_tot, ch_obj_mode);
%>