fac-verify ook Invalid Objects rapporteren (en recompile optie geven)
svn path=/Website/branches/v2018.1/; revision=38997
This commit is contained in:
@@ -33,6 +33,12 @@ if (Application("otap_environment") != "O")
|
||||
}
|
||||
|
||||
if (Server.ScriptTimeout<600) Server.ScriptTimeout=600; // 10 minuten moet lukken
|
||||
|
||||
if (getQParamInt("recompile", 0) == "1")
|
||||
{
|
||||
var sql = "BEGIN DBMS_UTILITY.COMPILE_SCHEMA(USER, FALSE); END;";
|
||||
Oracle.Execute(sql);
|
||||
}
|
||||
%>
|
||||
<html>
|
||||
<head>
|
||||
@@ -63,10 +69,9 @@ if (Server.ScriptTimeout<600) Server.ScriptTimeout=600; // 10 minuten moet lukke
|
||||
else
|
||||
itm.style.display = 'none';
|
||||
}
|
||||
function reload()
|
||||
function reload(recompile)
|
||||
{
|
||||
var hrefBase = window.location.href;
|
||||
window.location.href = hrefBase;
|
||||
window.location.href = "fac_verify_data.asp" + (recompile?"?recompile=1":"");
|
||||
}
|
||||
|
||||
function showSQL(sql)
|
||||
@@ -170,7 +175,7 @@ function checker (description, fnCheck, toggler)
|
||||
<br>Checking <%= toDateTimeString(new Date(), true) %>
|
||||
<br>Customer: <%=customerId%>
|
||||
<br>Database: <%=Oracle.RealConnection.Properties("User Name")+'@'+Oracle.RealConnection.Properties("Data source") %>
|
||||
<% if (user_key > 0) Response.Write("<br>User: " + user.naam()); %>
|
||||
<% if (user_key > 0) Response.Write("<br>User: " + safe.html(user.naam())); %>
|
||||
</th>
|
||||
<th>Information</th><th>Result</th></tr></thead>
|
||||
<%
|
||||
@@ -223,7 +228,13 @@ checker("Meta consistentie van de database, belangrijk om te controleren voor op
|
||||
" AND SUBSTR(table_name, 1, 4) <> '{0}'".format(customerId) +
|
||||
" AND SUBSTR(table_name, 1, 6) <> 'T_{0}'".format(customerId) +
|
||||
" ORDER BY table_name"
|
||||
},
|
||||
},
|
||||
{ msg: "Invalid objects <input type='button' onclick='reload(true)' value='Recompile'>",
|
||||
sql: "SELECT object_type, object_name, created, last_ddl_time" +
|
||||
" FROM user_objects" +
|
||||
" WHERE status <> 'VALID'" +
|
||||
" ORDER BY object_type, object_name"
|
||||
},
|
||||
{ msg: "PROCEDURE/FUNCTION/PACKAGE die niet wrapped zijn",
|
||||
sql: "SELECT TYPE, name, text" +
|
||||
" FROM user_source" +
|
||||
|
||||
Reference in New Issue
Block a user