 <%@language = "javascript" %>
<% /*
     $Revision$
     $Id$

     File:         ins_srtdeel_volg.asp
     Description:  Bepaal een nieuwe code (volgnummer) voor een nieuw ins_deel
*/
 %>
<%
    var DOCTYPE_Disable = true;
%>

<!--#include file="../Shared/common.inc"-->
<!--#include file="../shared/json2.js"-->

<%
    var srt_deel_key = getQParamInt("srtdeel_key");
    var parent_key = getQParamInt("parent_key", -1);

    var sql = "SELECT "
            + "ins.get_description('"+(parent_key<0?"LPN_INS_DEEL":"LPN_INS_ONDERDEEL")+"',"
            + (parent_key<0?"NULL":parent_key)  // scope for uniqueness could be location (unused) or parent
            + ", ins_srtdeel_code_upper)"
            + " FROM ins_srtdeel WHERE ins_srtdeel_key="+srt_deel_key;
    var oRs = Oracle.Execute( sql );

    var result = { success: true, volgnr: oRs(0).Value };
    Response.Write(JSON.stringify(result));
%>

