Files
Customer/CONN/Once/CONN_19607.asp
2012-09-23 15:37:06 +00:00

63 lines
1.9 KiB
Plaintext

<%@ language = "JavaScript" %>
<% /*
$Revision$
$Id$
File: CONN_19607.asp
Description: Patch om inconsistentie in huurcontracten op locatie Neede op te lossen
*/ %>
<%
Response.Expires=0;
%>
<!-- #include file="../../cust/install.inc" -->
<!-- #include file="../../Appl/Shared/funcodes.inc" -->
<!-- #include file="../../Appl/Shared/date_sql.inc" -->
<!-- #include file="../../Appl/Shared/resultset_table_v2.inc" -->
<html>
<head>
<%
var outputmode = getQParam("outputmode", 0);
FCLTHeader.Generate({ root: "../../appl/" });
sql = "DELETE cnt_contract_onrgoed"
+ " WHERE alg_onrgoed_key IN (SELECT alg_onroerendgoed_keys"
+ " FROM alg_v_allonroerendgoed"
+ " WHERE alg_locatie_key = 265)";
Oracle.Execute(sql);
sql = "delete imp_log where imp_log_applicatie = 'CONTRACTMUTATIE'";
Oracle.Execute(sql);
sql = "BEGIN CONN_UPDATE_CONTRACTMUTATIE('CONTRACTMUTATIE', to_char(SYSDATE)); END;";
Oracle.Execute(sql);
%>
</head>
<body>
<p>Script CONN_19607.asp is uitgevoerd.</P>
<%
sql = "SELECT imp_log_status, imp_log_omschrijving, imp_log_hint FROM imp_log WHERE imp_log_applicatie = 'CONTRACTMUTATIE'";
var rst = new ResultsetTable({ sql: sql,
ID: "huurmut",
outputmode: outputmode,
title: "resultaat import huurmutaties"
});
rst.addColumn(new Column({caption: 'Status', content: "imp_log_status"}));
rst.addColumn(new Column({caption: lcl_descr, content: "imp_log_omschrijving"}));
rst.addColumn(new Column({caption: 'Hint', content: "imp_log_hint"}));
var cnt = rst.processResultset();
%>
</body>
</head>