63 lines
1.9 KiB
Plaintext
63 lines
1.9 KiB
Plaintext
<%@ language = "JavaScript" %>
|
|
<% /*
|
|
$Revision: 1 $
|
|
$Modtime: 2-02-11 13:13 $
|
|
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>
|