admin/Facilitor
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fac_verify_data ook controle op Oracle user_errors waarin wordt vermeldt *wat* er fout is aan een view/proc

Browse Source 
svn path=/Website/branches/v2019.1/; revision=42549
This commit is contained in:
Jos Groot Lipman
2019-05-16 09:11:54 +00:00
parent 2e49a67fba
commit 89fbd6c921
1 changed files with 8 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
APPL/FAC/fac_verify_data.asp
View File

@@ -249,6 +249,11 @@ checker("Meta consistentie van de database, belangrijk om te controleren voor op
" WHERE status <> 'VALID'" +
" ORDER BY object_type, object_name"
},
{ msg: "Object errors <input type='button' onclick='reload(true)' value='Recompile'>",
sql: "SELECT type, name, sequence, line, position, text, message_number" +
" FROM user_errors" +
" ORDER BY type, name, sequence"
},
{ msg: "PROCEDURE/FUNCTION/PACKAGE die niet wrapped zijn",
sql: "SELECT TYPE, name, text" +
" FROM user_source" +
@@ -381,7 +386,8 @@ function fnNoresults(noResults)
oRs.Close();
var oRs = Oracle.Execute(noResults[noResult].sql);
tbl = ["<table>", "<thead>", "<tr>"];
for (var i = 0; i < oRs.Fields.Count && i < 5; i++)
var collimit = noResults[noResult].sql.match(/^SELECT \*/i)? 5: oRs.Fields.Count;
for (var i = 0; i < oRs.Fields.Count && i < collimit; i++)
{
tbl.push("<th style='text-align:left'>" + safe.html(oRs.Fields(i).Name) + "</th>");
}
@@ -390,7 +396,7 @@ function fnNoresults(noResults)
while (!oRs.Eof)
{
tbl.push("<tr>");
for (var i = 0; i < oRs.Fields.Count && i < 5; i++)
for (var i = 0; i < oRs.Fields.Count && i < collimit; i++)
{
tbl.push("<td>" + safe.html(oRs(i).Value) + "</td>");
}