39 lines
1.0 KiB
Plaintext
39 lines
1.0 KiB
Plaintext
<%@language = "javascript" %>
|
|
<% /*
|
|
$Revision$
|
|
$Id$
|
|
|
|
File: shared/loadRuimteOptions.asp
|
|
Description: Aanmaken van de options voor een listbox met (meerdere) ruimtes
|
|
Parameters:
|
|
Context: Vanuit CAD als een verdieping is gekozen.
|
|
Note: 'oude' load_rooms moet obsolete worden
|
|
*/ %>
|
|
|
|
<%
|
|
DOCTYPE_Disable = true;
|
|
%>
|
|
|
|
<!-- #include file="../Shared/common.inc" -->
|
|
<!-- #include file="../Shared/selector.inc" -->
|
|
|
|
<%
|
|
// Build a building list
|
|
var floor_key = getQParamInt("floor_key");
|
|
var ruimte_key = getQParamInt("ruimte_key", -1); // optionele default
|
|
|
|
var sql = "SELECT alg_ruimte_key"
|
|
+ ", alg_ruimte_nr || ' (' || alg_ruimte_omschrijving || ')' oms"
|
|
+ " FROM ALG_v_aanwezigRUIMTE R"
|
|
+ " WHERE alg_verdieping_key = " + floor_key
|
|
+ " ORDER BY 2";
|
|
|
|
FCLTselectorOptions(
|
|
sql,
|
|
{ initKey: ruimte_key,
|
|
emptyOption: "",
|
|
initEmpty: true
|
|
});
|
|
%>
|
|
|